set_bath Subroutine

private subroutine set_bath(this, flag)

Type Bound

site

Arguments

Type IntentOptional Attributes Name
class(site) :: this
logical, intent(in) :: flag

Contents

Source Code

set_bath

Source Code

    subroutine set_bath(this, flag)
        class(site) :: this
        logical, intent(in) :: flag

        this%t_bath = flag

    end subroutine set_bath