occ2cistate Subroutine

public subroutine occ2cistate(xdata_cptr, occ_in, l_occ_in, state) bind(c)

randomly selects a CI states according to overlap with given occupation

Arguments

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