mod_resistivity_settings Module


Uses


Derived Types

type, public ::  resistivity_settings_t

Components

Type Visibility Attributes Name Initial
logical, private :: has_resistivity
real(kind=dp), private :: fixed_resistivity_value
logical, private :: fixed_resistivity
logical, public :: use_dropoff

Type-Bound Procedures

procedure, public :: enable
procedure, public :: disable
procedure, public :: is_enabled
procedure, public :: set_fixed_resistivity
procedure, public :: get_fixed_resistivity
procedure, public :: has_fixed_resistivity

Functions

public pure function new_resistivity_settings() result(resistivity)

Arguments

None

Return Value type(resistivity_settings_t)

private pure function is_enabled(this)

Arguments

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

Return Value logical

private pure function get_fixed_resistivity(this)

Arguments

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

Return Value real(kind=dp)

private pure function has_fixed_resistivity(this)

Arguments

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

Return Value logical


Subroutines

private pure subroutine enable(this)

Arguments

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

private pure subroutine disable(this)

Arguments

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

private pure subroutine set_fixed_resistivity(this, eta)

Arguments

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