S2_expval_exc_Excite_0_t Function

private pure function S2_expval_exc_Excite_0_t(nI, exc) result(res)

Evaluates $< D_i | S^2 | D_i >$

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	nI(:)	The bra Slater determinant in nI format.
type(Excite_0_t),	intent(in)			::	exc

Return Value real(kind=dp)

The matrix element. It is real even for complex NECI.

Contents