select_orb Function

public function select_orb(ilut, src, cc_index, orb_pair, cpt, cum_sum) result(orb)

Arguments

Type IntentOptional Attributes Name
integer(kind=n_int), intent(in) :: ilut(0:NifTot)
integer, intent(in) :: src(2)
integer, intent(in) :: cc_index
integer, intent(in) :: orb_pair
real(kind=dp), intent(out) :: cpt
real(kind=dp), intent(out) :: cum_sum

Return Value integer


Contents