linear_orb_ind Function

private function linear_orb_ind(a, b) result(ind)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	a
integer,	intent(in)			::	b

Return Value integer

Source Code

    function linear_orb_ind(a, b) result(ind)
        integer, intent(in) :: a, b
        integer :: ind

        ! see above!
        ind = orb_ind_mat(a, b)

    end function linear_orb_ind