class_pick_singles Subroutine

public subroutine class_pick_singles(nI, ilut, csf_i, excitInfo, 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
type(ExcitationInformation_t),	intent(out)			::	excitInfo
real(kind=dp),	intent(out)			::	pgen