Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(lattice) | :: | this | ||||
integer, | intent(in) | :: | orb |
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