ideal_age_example::ideal_age_tracer_cs integer integer ideal_age_example::ideal_age_tracer_cs::ntr ntr The number of tracers that are actually used. logical logical ideal_age_example::ideal_age_tracer_cs::coupled_tracers coupled_tracers = .false. These tracers are not offered to the coupler. integer integer ideal_age_example::ideal_age_tracer_cs::nkml nkml The number of layers in the mixed layer. The ideal. character(len=200) character(len=200) ideal_age_example::ideal_age_tracer_cs::ic_file ic_file The file in which the age-tracer initial values can be found, or an empty string for internal initialization. logical logical ideal_age_example::ideal_age_tracer_cs::z_ic_file z_ic_file If true, the IC_file is in Z-space. The default is false. type(time_type), pointer type(time_type), pointer ideal_age_example::ideal_age_tracer_cs::time time => NULL() A pointer to the ocean model's clock. type(tracer_registry_type), pointer type(tracer_registry_type), pointer ideal_age_example::ideal_age_tracer_cs::tr_reg tr_reg => NULL() A pointer to the tracer registry. real, dimension(:,:,:,:), pointer real, dimension(:,:,:,:), pointer ideal_age_example::ideal_age_tracer_cs::tr tr => NULL() The array of tracers used in this package, in g m-3? real, dimension(ntr_max) real, dimension(ntr_max) ideal_age_example::ideal_age_tracer_cs::ic_val ic_val = 0.0 The (uniform) initial condition value. real, dimension(ntr_max) real, dimension(ntr_max) ideal_age_example::ideal_age_tracer_cs::young_val young_val = 0.0 The value assigned to tr at the surface. real, dimension(ntr_max) real, dimension(ntr_max) ideal_age_example::ideal_age_tracer_cs::land_val land_val = -1.0 The value of tr used where land is masked out. real, dimension(ntr_max) real, dimension(ntr_max) ideal_age_example::ideal_age_tracer_cs::sfc_growth_rate sfc_growth_rate The exponential growth rate for the surface value [year-1]. real, dimension(ntr_max) real, dimension(ntr_max) ideal_age_example::ideal_age_tracer_cs::tracer_start_year tracer_start_year The year in which tracers start aging, or at which the surface value equals young_val, in years. logical logical ideal_age_example::ideal_age_tracer_cs::tracers_may_reinit tracers_may_reinit If true, these tracers be set up via the initialization code if they are not found in the restart files. logical, dimension(ntr_max) logical, dimension(ntr_max) ideal_age_example::ideal_age_tracer_cs::tracer_ages tracer_ages Indicates whether each tracer ages. integer, dimension(ntr_max) integer, dimension(ntr_max) ideal_age_example::ideal_age_tracer_cs::ind_tr ind_tr Indices returned by aof_set_coupler_flux if it is used and the surface tracer concentrations are to be provided to the coupler. type(diag_ctrl), pointer type(diag_ctrl), pointer ideal_age_example::ideal_age_tracer_cs::diag diag => NULL() A structure that is used to regulate the timing of diagnostic output. type(mom_restart_cs), pointer type(mom_restart_cs), pointer ideal_age_example::ideal_age_tracer_cs::restart_csp restart_csp => NULL() A pointer to the restart controls structure. type(vardesc), dimension(ntr_max) type(vardesc), dimension(ntr_max) ideal_age_example::ideal_age_tracer_cs::tr_desc tr_desc Descriptions and metadata for the tracers. The control structure for the ideal_age_tracer package. real vardesc logical ideal_age_example::ideal_age_tracer_cs tracer_ages z_ic_file coupled_tracers tracers_may_reinit time tr_reg ic_file tr_desc restart_csp diag land_val tracer_start_year ic_val young_val tr sfc_growth_rate ntr nkml ind_tr time_type diag_ctrl integer character(len=200) type(mom_restart_cs), pointer tracer_registry_type ideal_age_example::ideal_age_tracer_cscoupled_tracers ideal_age_example::ideal_age_tracer_csdiag ideal_age_example::ideal_age_tracer_csic_file ideal_age_example::ideal_age_tracer_csic_val ideal_age_example::ideal_age_tracer_csind_tr ideal_age_example::ideal_age_tracer_csland_val ideal_age_example::ideal_age_tracer_csnkml ideal_age_example::ideal_age_tracer_csntr ideal_age_example::ideal_age_tracer_csrestart_csp ideal_age_example::ideal_age_tracer_cssfc_growth_rate ideal_age_example::ideal_age_tracer_cstime ideal_age_example::ideal_age_tracer_cstr ideal_age_example::ideal_age_tracer_cstr_desc ideal_age_example::ideal_age_tracer_cstr_reg ideal_age_example::ideal_age_tracer_cstracer_ages ideal_age_example::ideal_age_tracer_cstracer_start_year ideal_age_example::ideal_age_tracer_cstracers_may_reinit ideal_age_example::ideal_age_tracer_csyoung_val ideal_age_example::ideal_age_tracer_csz_ic_file