ecrad_driver_config Module


Uses

  • module~~ecrad_driver_config~~UsesGraph module~ecrad_driver_config ecrad_driver_config module~parkind1~2 PARKIND1 module~ecrad_driver_config->module~parkind1~2

Used by

  • module~~ecrad_driver_config~~UsedByGraph module~ecrad_driver_config ecrad_driver_config program~ecrad_ifs_driver~2 ecrad_ifs_driver program~ecrad_ifs_driver~2->module~ecrad_driver_config proc~ifs_copy_fluxes_from_blocked ifs_copy_fluxes_from_blocked proc~ifs_copy_fluxes_from_blocked->module~ecrad_driver_config proc~ifs_copy_inputs_to_blocked ifs_copy_inputs_to_blocked proc~ifs_copy_inputs_to_blocked->module~ecrad_driver_config program~ecrad_ifs_driver ecrad_ifs_driver program~ecrad_ifs_driver->module~ecrad_driver_config proc~read_input read_input proc~read_input->module~ecrad_driver_config program~ecrad_driver ecrad_driver program~ecrad_driver->module~ecrad_driver_config proc~ifs_setup_indices ifs_setup_indices proc~ifs_setup_indices->module~ecrad_driver_config

Contents


Variables

Type Visibility Attributes Name Initial
integer, public, parameter :: NMaxStringLength = 2000
integer, public, parameter :: NMaxSpectralDiag = 256

Derived Types

type, public ::  driver_config_type

Components

Type Visibility Attributes Name Initial
logical, public :: do_parallel
integer, public :: nblocksize
real(kind=jprb), public :: fractional_std_override
real(kind=jprb), public :: overlap_decorr_length_override
real(kind=jprb), public :: high_inv_effective_size_override = -1.0_jprb
real(kind=jprb), public :: middle_inv_effective_size_override = -1.0_jprb
real(kind=jprb), public :: low_inv_effective_size_override = -1.0_jprb
real(kind=jprb), public :: effective_size_scaling
real(kind=jprb), public :: sw_albedo_override
real(kind=jprb), public :: lw_emissivity_override
real(kind=jprb), public :: q_liq_scaling
real(kind=jprb), public :: q_ice_scaling
real(kind=jprb), public :: cloud_fraction_scaling
real(kind=jprb), public :: overlap_decorr_length_scaling
real(kind=jprb), public :: skin_temperature_override
real(kind=jprb), public :: solar_irradiance_override
real(kind=jprb), public :: solar_cycle_multiplier_override
real(kind=jprb), public :: cos_sza_override
real(kind=jprb), public :: cloud_inhom_separation_factor = 1.0_jprb
real(kind=jprb), public :: cloud_separation_scale_surface = -1.0_jprb
real(kind=jprb), public :: cloud_separation_scale_toa = -1.0_jprb
real(kind=jprb), public :: cloud_separation_scale_power = 1.0_jprb
real(kind=jprb), public :: h2o_scaling = 1.0_jprb
real(kind=jprb), public :: co2_scaling = 1.0_jprb
real(kind=jprb), public :: o3_scaling = 1.0_jprb
real(kind=jprb), public :: co_scaling = 1.0_jprb
real(kind=jprb), public :: ch4_scaling = 1.0_jprb
real(kind=jprb), public :: n2o_scaling = 1.0_jprb
real(kind=jprb), public :: o2_scaling = 1.0_jprb
real(kind=jprb), public :: cfc11_scaling = 1.0_jprb
real(kind=jprb), public :: cfc12_scaling = 1.0_jprb
real(kind=jprb), public :: hcfc22_scaling = 1.0_jprb
real(kind=jprb), public :: ccl4_scaling = 1.0_jprb
real(kind=jprb), public :: no2_scaling = 1.0_jprb
real(kind=jprb), public :: sw_diag_wavelength_bound(NMaxSpectralDiag+1) = -1.0_jprb
character(len=NMaxStringLength), public :: sw_diag_file_name = 'sw_diagnostics.nc'
integer, public :: n_sw_diag
character(len=32), public :: vmr_suffix_str = '_vmr'
integer, public :: istartcol
integer, public :: iendcol
logical, public :: do_save_inputs
logical, public :: do_save_aerosol_optics
logical, public :: do_save_cloud_optics
logical, public :: do_save_net_fluxes
logical, public :: do_ignore_inhom_effective_size = .false.
integer, public :: nrepeat
logical, public :: do_correct_unphysical_inputs = .false.
logical, public :: do_write_hdf5 = .false.
logical, public :: do_write_double_precision = .false.
character(len=NMaxStringLength), public :: experiment_name = ''
integer, public :: iverbose

Type-Bound Procedures

procedure , public :: read => read_config_from_namelist Subroutine

Subroutines

public subroutine read_config_from_namelist(this, file_name, is_success)

Arguments

Type IntentOptional Attributes Name
class(driver_config_type), intent(inout) :: this
character, intent(in) :: file_name
logical, intent(out), optional :: is_success