gen_single Function

public function gen_single(nI, nJ, ExcitMat, tParity, CCOcc, CCUnocc, pair_list, occ_list, virt_list) result(pGen)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	nI(nel)
integer,	intent(out)			::	nJ(nel)
integer,	intent(out)			::	ExcitMat(2,maxExcit)
logical,	intent(out)			::	tParity
integer,	intent(in)			::	CCOcc(ScratchSize)
integer,	intent(in)			::	CCUnocc(ScratchSize)
integer,	intent(out)			::	pair_list(ScratchSize)
integer,	intent(in)			::	occ_list(:,:)
integer,	intent(in)			::	virt_list(:,:)

Return Value real(kind=dp)

Contents