get_pgen_UniformParticles_t Function

private pure function get_pgen_UniformParticles_t(this, nI, csf_i, i_sg, i, j) result(p)

Calculates $p(\{I, J\}) \Big |_{D_i}$

This is the probability of drawing two particles from a given determinant $D_i$ regardless of order.

Note that the unordered probability is given by the ordered probability as: $$p(\{I, J\}) \Big |_{D_i} = p((I, J)) \Big |_{D_i} + p((J, I)) \Big |_{D_i} \quad.$$ In addition we have $$p((I, J)) \Big |_{D_i} \neq p((J, I)) \Big |_{D_i}$$ so we have to actually calculate the probability of drawing two given particles in different order.

Type Bound

UniformParticles_t

Arguments

Type	Intent	Optional	Attributes		Name
class(UniformParticles_t),	intent(in)			::	this
integer,	intent(in)			::	nI(nEl)	The CSF in nI-format
type(CSF_Info_t),	intent(in)			::	csf_i
integer,	intent(in)			::	i_sg	The CSF in nI-format
integer,	intent(in)			::	i	The particles.
integer,	intent(in)			::	j	The particles.

Return Value real(kind=dp)