profiles_overrides_type Derived Type

type, public :: profiles_overrides_type

An object for overriding all or selected profile parameters, for example species temps, densities or gradients or the flow gradient or mach number. Note that all species parameters are arrays of size nspec and you must set the override switches individually for each species.


Contents


Components

Type Visibility Attributes Name Initial
logical, private :: init = .false.
logical, public, dimension (:), allocatable :: override_dens
real, public, dimension (:), allocatable :: dens
logical, public, dimension (:), allocatable :: override_temp
real, public, dimension (:), allocatable :: temp
logical, public, dimension (:), allocatable :: override_tprim
real, public, dimension (:), allocatable :: tprim
logical, public, dimension (:), allocatable :: override_fprim
real, public, dimension (:), allocatable :: fprim
logical, public, dimension (:), allocatable :: override_vnewk
real, public, dimension (:), allocatable :: vnewk
logical, public :: override_g_exb = .false.
real, public :: g_exb
logical, public :: override_mach = .false.
real, public :: mach

Type-Bound Procedures

procedure, public, :: initialise => init_profiles_overrides

procedure, public, :: finish => finish_profiles_overrides

procedure, public, :: is_initialised => is_initialised_profiles_overrides

Source Code

type profiles_overrides_type
  logical, private :: init = .false.
logical, dimension (:), allocatable :: override_dens
real, dimension (:), allocatable :: dens
logical, dimension (:), allocatable :: override_temp
real, dimension (:), allocatable :: temp
logical, dimension (:), allocatable :: override_tprim
real, dimension (:), allocatable :: tprim
logical, dimension (:), allocatable :: override_fprim
real, dimension (:), allocatable :: fprim
logical, dimension (:), allocatable :: override_vnewk
real, dimension (:), allocatable :: vnewk
logical :: override_g_exb = .false.
real :: g_exb
logical :: override_mach = .false.
real :: mach
 contains
  procedure :: initialise => init_profiles_overrides
  procedure :: finish => finish_profiles_overrides
  procedure :: is_initialised => is_initialised_profiles_overrides
end type profiles_overrides_type