get_excit Module

Contents

Functions

exciteIlut

Subroutines

make_single make_double

Functions

public function exciteIlut(ilut, src, orbs) result(ilutJ)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=n_int),	intent(in)			::	ilut(0:NIfTot)
integer,	intent(in)			::	src(2)
integer,	intent(in)			::	orbs(2)

Return Value integer(kind=n_int), (0:NIfTot)

Subroutines

public subroutine make_single(nI, nJ, elec, tgt, ex, tParity)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	nI(nel)
integer,	intent(out)			::	nJ(nel)
integer,	intent(in)			::	elec
integer,	intent(in)			::	tgt
integer,	intent(out)			::	ex(2,1)
logical,	intent(out)			::	tParity

public subroutine make_double(nI, nJ, elec1, elec2, tgt1, tgt2, ex, tParity)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	nI(:)
integer,	intent(inout)			::	nJ(:)
integer,	intent(in)			::	elec1
integer,	intent(in)			::	elec2
integer,	intent(in)			::	tgt1
integer,	intent(in)			::	tgt2
integer,	intent(inout)			::	ex(2,2)
logical,	intent(out)			::	tParity