is_bath_site Function

private function is_bath_site(this, ind)

Type Bound

aim

Arguments

Type IntentOptional Attributes Name
class(aim) :: this
integer, intent(in) :: ind

Return Value logical


Contents

Source Code

is_bath_site

Source Code

    logical function is_bath_site(this, ind)
        class(aim) :: this
        integer, intent(in) :: ind
        character(*), parameter :: this_routine = "is_bath_site"

        ASSERT(ind > 0)
        ASSERT(ind <= this%get_nsites())

        is_bath_site = this%sites(ind)%is_bath()

    end function is_bath_site