calc_pgen Function

private function calc_pgen(this, nI, ilutI, csf_i, excitInfo) result(pgen)

Type Bound

PCHB_t

Arguments

Type	Intent	Optional	Attributes		Name
class(PCHB_t),	intent(in)			::	this
integer,	intent(in)			::	nI(nEl)
integer(kind=n_int),	intent(in)			::	ilutI(0:GugaBits%len_tot)
type(CSF_Info_t),	intent(in)			::	csf_i
type(ExcitationInformation_t),	intent(in)			::	excitInfo

Return Value real(kind=dp)