MOM6
Public variables and constants | List of all members
ideal_age_example::ideal_age_tracer_cs Type Reference

Detailed Description

Definition at line 95 of file ideal_age_example.F90.

Collaboration diagram for ideal_age_example::ideal_age_tracer_cs:
[legend]

Public variables and constants

integer ntr
 
logical coupled_tracers = .false.
 
integer nkml
 
character(len=200) ic_file
 
logical z_ic_file
 
type(time_type), pointer time
 
type(tracer_registry_type), pointer tr_reg => NULL()
 
real, dimension(:,:,:,:), pointer tr => NULL()
 
real, dimension(:,:,:,:), pointer tr_aux => NULL()
 
type(p3d), dimension(ntr_max) tr_adx
 
type(p3d), dimension(ntr_max) tr_ady
 
type(p3d), dimension(ntr_max) tr_dfx
 
type(p3d), dimension(ntr_max) tr_dfy
 
real, dimension(ntr_max) ic_val = 0.0
 
real, dimension(ntr_max) young_val = 0.0
 
real, dimension(ntr_max) land_val = -1.0
 
real, dimension(ntr_max) sfc_growth_rate
 
real, dimension(ntr_max) tracer_start_year
 
logical mask_tracers
 
logical tracers_may_reinit
 
logical, dimension(ntr_max) tracer_ages
 
integer, dimension(ntr_max) ind_tr
 
integer, dimension(ntr_max) id_tracer = -1
 
integer, dimension(ntr_max) id_tr_adx = -1
 
integer, dimension(ntr_max) id_tr_ady = -1
 
integer, dimension(ntr_max) id_tr_dfx = -1
 
integer, dimension(ntr_max) id_tr_dfy = -1
 
type(diag_ctrl), pointer diag
 
type(mom_restart_cs), pointer restart_csp => NULL()
 
type(vardesc), dimension(ntr_max) tr_desc
 

Variables and constants

◆ coupled_tracers

logical ideal_age_example::ideal_age_tracer_cs::coupled_tracers = .false.

Definition at line 97 of file ideal_age_example.F90.

97  logical :: coupled_tracers = .false. ! These tracers are not offered to the

◆ diag

type(diag_ctrl), pointer ideal_age_example::ideal_age_tracer_cs::diag

Definition at line 135 of file ideal_age_example.F90.

135  type(diag_ctrl), pointer :: diag ! A structure that is used to regulate the

◆ ic_file

character(len=200) ideal_age_example::ideal_age_tracer_cs::ic_file

Definition at line 101 of file ideal_age_example.F90.

101  character(len=200) :: ic_file ! The file in which the age-tracer initial values

◆ ic_val

real, dimension(ntr_max) ideal_age_example::ideal_age_tracer_cs::ic_val = 0.0

Definition at line 115 of file ideal_age_example.F90.

115  real, dimension(NTR_MAX) :: &
116  ic_val = 0.0, & ! The (uniform) initial condition value.
117  young_val = 0.0, & ! The value assigned to tr at the surface.
118  land_val = -1.0, & ! The value of tr used where land is masked out.
119  sfc_growth_rate, & ! The exponential growth rate for the surface value,
120  ! in units of year-1.
121  tracer_start_year ! The year in which tracers start aging, or at which the

◆ id_tr_adx

integer, dimension(ntr_max) ideal_age_example::ideal_age_tracer_cs::id_tr_adx = -1

Definition at line 129 of file ideal_age_example.F90.

◆ id_tr_ady

integer, dimension(ntr_max) ideal_age_example::ideal_age_tracer_cs::id_tr_ady = -1

Definition at line 129 of file ideal_age_example.F90.

◆ id_tr_dfx

integer, dimension(ntr_max) ideal_age_example::ideal_age_tracer_cs::id_tr_dfx = -1

Definition at line 129 of file ideal_age_example.F90.

◆ id_tr_dfy

integer, dimension(ntr_max) ideal_age_example::ideal_age_tracer_cs::id_tr_dfy = -1

Definition at line 129 of file ideal_age_example.F90.

◆ id_tracer

integer, dimension(ntr_max) ideal_age_example::ideal_age_tracer_cs::id_tracer = -1

Definition at line 129 of file ideal_age_example.F90.

◆ ind_tr

integer, dimension(ntr_max) ideal_age_example::ideal_age_tracer_cs::ind_tr

Definition at line 129 of file ideal_age_example.F90.

129  integer, dimension(NTR_MAX) :: &
130  ind_tr, & ! Indices returned by aof_set_coupler_flux if it is used and the
131  ! surface tracer concentrations are to be provided to the coupler.
132  id_tracer = -1, id_tr_adx = -1, id_tr_ady = -1, &
133  id_tr_dfx = -1, id_tr_dfy = -1

◆ land_val

real, dimension(ntr_max) ideal_age_example::ideal_age_tracer_cs::land_val = -1.0

Definition at line 115 of file ideal_age_example.F90.

◆ mask_tracers

logical ideal_age_example::ideal_age_tracer_cs::mask_tracers

Definition at line 123 of file ideal_age_example.F90.

123  logical :: mask_tracers ! If true, tracers are masked out in massless layers.

◆ nkml

integer ideal_age_example::ideal_age_tracer_cs::nkml

Definition at line 99 of file ideal_age_example.F90.

99  integer :: nkml ! The number of layers in the mixed layer. The ideal

◆ ntr

integer ideal_age_example::ideal_age_tracer_cs::ntr

Definition at line 96 of file ideal_age_example.F90.

96  integer :: ntr ! The number of tracers that are actually used.

◆ restart_csp

type(mom_restart_cs), pointer ideal_age_example::ideal_age_tracer_cs::restart_csp => NULL()

Definition at line 137 of file ideal_age_example.F90.

137  type(mom_restart_cs), pointer :: restart_csp => null()

◆ sfc_growth_rate

real, dimension(ntr_max) ideal_age_example::ideal_age_tracer_cs::sfc_growth_rate

Definition at line 115 of file ideal_age_example.F90.

◆ time

type(time_type), pointer ideal_age_example::ideal_age_tracer_cs::time

Definition at line 104 of file ideal_age_example.F90.

104  type(time_type), pointer :: time ! A pointer to the ocean model's clock.

◆ tr

real, dimension(:,:,:,:), pointer ideal_age_example::ideal_age_tracer_cs::tr => NULL()

Definition at line 106 of file ideal_age_example.F90.

106  real, pointer :: tr(:,:,:,:) => null() ! The array of tracers used in this

◆ tr_adx

type(p3d), dimension(ntr_max) ideal_age_example::ideal_age_tracer_cs::tr_adx

Definition at line 110 of file ideal_age_example.F90.

110  type(p3d), dimension(NTR_MAX) :: &
111  tr_adx, &! Tracer zonal advective fluxes in g m-3 m3 s-1.
112  tr_ady, &! Tracer meridional advective fluxes in g m-3 m3 s-1.
113  tr_dfx, &! Tracer zonal diffusive fluxes in g m-3 m3 s-1.
114  tr_dfy ! Tracer meridional diffusive fluxes in g m-3 m3 s-1.

◆ tr_ady

type(p3d), dimension(ntr_max) ideal_age_example::ideal_age_tracer_cs::tr_ady

Definition at line 110 of file ideal_age_example.F90.

◆ tr_aux

real, dimension(:,:,:,:), pointer ideal_age_example::ideal_age_tracer_cs::tr_aux => NULL()

Definition at line 108 of file ideal_age_example.F90.

108  real, pointer :: tr_aux(:,:,:,:) => null() ! The masked tracer concentration

◆ tr_desc

type(vardesc), dimension(ntr_max) ideal_age_example::ideal_age_tracer_cs::tr_desc

Definition at line 139 of file ideal_age_example.F90.

139  type(vardesc) :: tr_desc(ntr_max)

◆ tr_dfx

type(p3d), dimension(ntr_max) ideal_age_example::ideal_age_tracer_cs::tr_dfx

Definition at line 110 of file ideal_age_example.F90.

◆ tr_dfy

type(p3d), dimension(ntr_max) ideal_age_example::ideal_age_tracer_cs::tr_dfy

Definition at line 110 of file ideal_age_example.F90.

◆ tr_reg

type(tracer_registry_type), pointer ideal_age_example::ideal_age_tracer_cs::tr_reg => NULL()

Definition at line 105 of file ideal_age_example.F90.

105  type(tracer_registry_type), pointer :: tr_reg => null()

◆ tracer_ages

logical, dimension(ntr_max) ideal_age_example::ideal_age_tracer_cs::tracer_ages

Definition at line 127 of file ideal_age_example.F90.

127  logical :: tracer_ages(ntr_max)

◆ tracer_start_year

real, dimension(ntr_max) ideal_age_example::ideal_age_tracer_cs::tracer_start_year

Definition at line 115 of file ideal_age_example.F90.

◆ tracers_may_reinit

logical ideal_age_example::ideal_age_tracer_cs::tracers_may_reinit

Definition at line 124 of file ideal_age_example.F90.

124  logical :: tracers_may_reinit ! If true, tracers may go through the

◆ young_val

real, dimension(ntr_max) ideal_age_example::ideal_age_tracer_cs::young_val = 0.0

Definition at line 115 of file ideal_age_example.F90.

◆ z_ic_file

logical ideal_age_example::ideal_age_tracer_cs::z_ic_file

Definition at line 103 of file ideal_age_example.F90.

103  logical :: z_ic_file ! If true, the IC_file is in Z-space. The default is false.
The documentation for this type was generated from the following file: