cistate2occ Subroutine

public subroutine cistate2occ(xdata_cptr, state, occ, l_occ) bind(c)

returns the dominant configuration of the CI state with state index state

Arguments

Type	Intent	Optional	Attributes		Name
type(c_ptr),	intent(inout)			::	xdata_cptr
integer(kind=c_int),	intent(in)			::	state
integer(kind=c_int),	intent(inout)			::	occ(l_occ)
integer(kind=c_int),	intent(inout)			::	l_occ