get_r_vec Function

private function get_r_vec(this, orb) result(r_vec)

Type Bound

lattice

Arguments

Type IntentOptional Attributes Name
class(lattice) :: this
integer, intent(in) :: orb

Return Value integer, (3)


Source Code

    function get_r_vec(this, orb) result(r_vec)
        class(lattice) :: this
        integer, intent(in) :: orb
        integer :: r_vec(3)

        r_vec = this%sites(orb)%r_vec

    end function get_r_vec