occupation_allowed_Excite_1_t Function

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

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	nI(:)
type(Excite_1_t),	intent(in)			::	exc

Return Value logical

Contents