nI_invariant_sltcnd_2_purify_spin Function

private function nI_invariant_sltcnd_2_purify_spin(exc) result(hel)

Arguments

Type	Intent	Optional	Attributes		Name
type(Excite_2_t),	intent(in)			::	exc

Return Value real(kind=dp)

Contents