radiation_context_t Derived Type

type, public :: radiation_context_t


Components

Type Visibility Attributes Name Initial
logical, public :: debug = .false.
character(len=path_len), public :: diagnostics_file = ''
logical, public :: diagnostics_initialized = .false.
logical, public :: enabled = .false.
logical, public :: mesh_cached = .false.
character(len=name_len), public :: model = 'none'
integer, public :: n_scalars = 0
integer, public :: n_species = 0
integer, public :: n_wavenumbers = 0
integer, public :: ncells = 0
integer, public :: nfaces = 0
integer, public :: nlocal_wavenumbers = 0
character(len=name_len), public :: pressure_source = 'background'
integer, public :: rad_rank = -1
integer, public :: rad_size = 0
character(len=name_len), public, allocatable :: scalar_name(:)
character(len=path_len), public :: setup_file = ''
logical, public :: setup_written = .false.
integer, public, allocatable :: species_index(:)
character(len=name_len), public, allocatable :: species_name(:)
integer, public :: wn_first = 0
integer, public :: wn_last = -1
logical, public :: write_diagnostics = .true.

Source Code

   type :: radiation_context_t
      logical :: enabled = .false.
      character(len=name_len) :: model = 'none'
      integer :: rad_rank = -1
      integer :: rad_size = 0
      integer :: n_wavenumbers = 0
      integer :: wn_first = 0
      integer :: wn_last = -1
      integer :: nlocal_wavenumbers = 0
      integer :: ncells = 0
      integer :: nfaces = 0
      integer :: n_species = 0
      character(len=name_len), allocatable :: species_name(:)
      integer, allocatable :: species_index(:)
      integer :: n_scalars = 0
      character(len=name_len), allocatable :: scalar_name(:)
      character(len=name_len) :: pressure_source = 'background'
      logical :: mesh_cached = .false.
      logical :: debug = .false.
      logical :: write_diagnostics = .true.
      logical :: setup_written = .false.
      logical :: diagnostics_initialized = .false.
      character(len=path_len) :: setup_file = ''
      character(len=path_len) :: diagnostics_file = ''
   end type radiation_context_t