gndts_mod Module

Contents

Subroutines

gndts gndts_r gndts_all_sym_this_proc gndts_all_sym_this_proc_r

Subroutines

public subroutine gndts(nel, nhg, brr, nBasisMax, nMrks, tCount, G1, tSpn, lms, tParity, SymRestrict, ii, IFDet)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	nel
integer,	intent(in)			::	nhg
integer,	intent(in)			::	brr(nhg)
integer,	intent(in)			::	nBasisMax(5,*)
integer,	intent(inout)			::	nMrks(:,:)
logical,	intent(in)			::	tCount
type(BasisFN),	intent(in)			::	G1(:)
logical,	intent(in)			::	tSpn
integer,	intent(in)			::	lms
logical,	intent(in)			::	tParity
type(BasisFN),	intent(in)			::	SymRestrict
integer,	intent(out)			::	ii
integer,	intent(out)			::	IFDet

public recursive subroutine gndts_r(nel, nhg, brr, nBasisMax, nMrks, tCount, G1, tSpn, LMS, tParity, SymRestrict, ii, iElecs, iSpins, iElec, kJ)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	nel
integer,	intent(in)			::	nhg
integer,	intent(in)			::	brr(nhg)
integer,	intent(in)			::	nBasisMax(5,*)
integer,	intent(inout)			::	nMrks(:,:)
logical,	intent(in)			::	tCount
type(BasisFN),	intent(in)			::	G1(:)
logical,	intent(in)			::	tSpn
integer,	intent(in)			::	LMS
logical,	intent(in)			::	tParity
type(BasisFN),	intent(in)			::	SymRestrict
integer,	intent(inout)			::	ii
integer,	intent(inout)			::	iElecs(nel)
integer,	intent(inout)			::	iSpins(nel)
integer,			value	::	iElec
type(BasisFN),	intent(in)			::	kJ

public subroutine gndts_all_sym_this_proc(ilut_list, tCount, ndets)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=n_int),	intent(out)			::	ilut_list(0:,:)
logical,	intent(in)			::	tCount
integer,	intent(out)			::	ndets

public recursive subroutine gndts_all_sym_this_proc_r(ilut_list, tCount, ndets, nI, ielec)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=n_int),	intent(inout)			::	ilut_list(0:,:)
logical,	intent(in)			::	tCount
integer,	intent(inout)			::	ndets
integer,	intent(inout)			::	nI(nel)
integer,			value	::	ielec