GAS_singles_get_pgen Function

private function GAS_singles_get_pgen(this, nI, ilutI, ex, ic, ClassCount2, ClassCountUnocc2) result(pgen)

Type Bound

GAS_singles_heat_bath_ExcGen_t

Arguments

Type	Intent	Optional	Attributes		Name
class(GAS_singles_heat_bath_ExcGen_t),	intent(inout)			::	this
integer,	intent(in)			::	nI(nEl)
integer(kind=n_int),	intent(in)			::	ilutI(0:NIfTot)
integer,	intent(in)			::	ex(2,maxExcit)
integer,	intent(in)			::	ic
integer,	intent(in)			::	ClassCount2(ScratchSize)
integer,	intent(in)			::	ClassCountUnocc2(ScratchSize)

Return Value real(kind=dp)

Contents