class_calc_orb_pgen_contr_str Subroutine

public subroutine class_calc_orb_pgen_contr_str(nI, ilut, csf_i, occ_orbs, a, orb_pgen)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	nI(nEl)
integer(kind=n_int),	intent(in)			::	ilut(0:GugaBits%len_tot)
type(CSF_Info_t),	intent(in)			::	csf_i
integer,	intent(in)			::	occ_orbs(2)
integer,	intent(in)			::	a
real(kind=dp),	intent(out)			::	orb_pgen