viscosity_settings_t Derived Type

type, public :: viscosity_settings_t


Components

Type Visibility Attributes Name Initial
logical, private :: has_viscosity
logical, private :: viscous_heating
real(kind=dp), private :: viscosity_value

Type-Bound Procedures

procedure, public :: disable

  • private pure subroutine disable(this)

    Arguments

    Type IntentOptional Attributes Name
    class(viscosity_settings_t), intent(inout) :: this

procedure, public :: is_enabled

  • private pure function is_enabled(this)

    Arguments

    Type IntentOptional Attributes Name
    class(viscosity_settings_t), intent(in) :: this

    Return Value logical

procedure, public :: enable_viscous_heating

procedure, public :: has_viscous_heating

procedure, public :: set_viscosity_value

  • private pure subroutine set_viscosity_value(this, viscosity_value)

    Arguments

    Type IntentOptional Attributes Name
    class(viscosity_settings_t), intent(inout) :: this
    real(kind=dp), intent(in) :: viscosity_value

procedure, public :: get_viscosity_value