is_pair_occupied Function

public function is_pair_occupied(p, f, n_occ, oi, oj) result(res)

function is_pair_occupied: P: Parameter structure N_occ: occ array oi: orbital index oj: orbital index returns TRUE if there is a statistical chance that orbital oi and oj are both occupied otherwise FALSE

Arguments

Type	Intent	Optional	Attributes		Name
type(param),	intent(in)			::	p
type(wf_data),	intent(in)			::	f
integer,	intent(in)			::	n_occ(:)
integer,	intent(in)			::	oi
integer,	intent(in)			::	oj

Return Value logical