7.1.3. generic_cobalt module reference¶
Generic version of the COBALTv3.0 that includes 4 phytoplankton functional groups and photoacclimation and photoadaptation improvements.
7.1.3.1. Data Types¶
phytoplankton data type |
|
zooplankton data type |
|
bacteria data type |
|
data type for other variables used in |
|
An auxiliary type for storing varible names. |
7.1.3.2. Functions/Subroutines¶
|
|
|
|
|
|
|
|
salting out correction for solubility (Johnson 2010, Ocean Science) |
|
7.1.3.3. Detailed Description¶
Generic version of the COBALTv3.0 that includes 4 phytoplankton functional groups and photoacclimation and photoadaptation improvements.
7.1.3.4. Type Documentation¶
-
type
generic_cobalt/phytoplankton¶ phytoplankton data type
- Type fields
%alpha_hl[real,private] :: Chlorophyll a-specific initial slope of the photosynthesis-irradiance curve high level (g C g Chl-1 sec-1 (W m-2)-1)%alpha_ll[real,private] :: Chlorophyll a-specific initial slope of the photosynthesis-irradiance curve low level (g C g Chl-1 sec-1 (W m-2)-1)%fe_2_n_max[real,private] :: Maximum iron to nitrogen ratio (mol Fe mol N-1)%p_2_n_static[real,private] :: Fixed P:N ratio in phytoplankton (mol P mol N-1)%p_2_n_min[real,private] :: Minimum P:N ratio (mol P mol N-1)%p_2_n_slope[real,private] :: P:N slope (mol P mol N-1 mol P-1 kg)%p_2_n_max[real,private] :: Maximum P:N ratio (mol P mol N-1)%k_fe_2_n[real,private] :: Half-saturation iron to nitrogen for phytoplankton growth (mol Fe mol N-1)%k_fed[real,private] :: Half-saturation constant for iron uptake (mol Fed kg-1)%k_nh4[real,private] :: Half-saturation constant for ammonium limitation (mol NH4 kg-1)%k_no3[real,private] :: Half-saturation constant for nitrate limitation (mol NO3 kg-1)%k_po4[real,private] :: Half-saturation constant for phosphate limitation (mol PO4 kg-1)%k_sio4[real,private] :: Half-saturation constant for silicate limitation (mol SiO4 kg-1)%p_c_max_hl[real,private] :: Light-saturated carbon-specific photosynthesis rate high level (s-1)%p_c_max_ll[real,private] :: Light-saturated carbon-specific photosynthesis rate low level (s-1)%si_2_n_max[real,private] :: Maximum silica to nitrogen ratio (mol Si mol N-1)%si_2_n_static[real,private] :: Fixed SI:N ratio in phytoplankton (mol Si mol N-1)%thetamax[real,private] :: Maximum chlorophyll to carbon ratio (g Chl g C-1)%bresp_frac_mixed[real,private] :: basal respiration rate in mixed layer%bresp_frac_strat[real,private] :: basal respiration rate outside mixed layer%sink_max[real,private]%agg[real,private]%frac_mu_stress[real,private]%vir[real,private]%mort[real,private]%exu[real,private]%jprod_n_100[real(:,:),allocatable, private]%jprod_n_new_100[real(:,:),allocatable, private]%jprod_n_n2_100[real(:,:),allocatable, private]%jzloss_n_100[real(:,:),allocatable, private]%jaggloss_n_100[real(:,:),allocatable, private]%jvirloss_n_100[real(:,:),allocatable, private]%jmortloss_n_100[real(:,:),allocatable, private]%jexuloss_n_100[real(:,:),allocatable, private]%f_n_100[real(:,:),allocatable, private]%juptake_fe_100[real(:,:),allocatable, private]%juptake_po4_100[real(:,:),allocatable, private]%juptake_sio4_100[real(:,:),allocatable, private]%nlim_bw_100[real(:,:),allocatable, private]%plim_bw_100[real(:,:),allocatable, private]%def_fe_bw_100[real(:,:),allocatable, private]%irrlim_bw_100[real(:,:),allocatable, private]%fn_btm[real(:,:),allocatable, private]%ffe_btm[real(:,:),allocatable, private]%fp_btm[real(:,:),allocatable, private]%fsi_btm[real(:,:),allocatable, private]%p_c_max[real(:,:,:),allocatable, private]%alpha[real(:,:,:),allocatable, private]%bresp[real(:,:,:),allocatable, private]%def_fe[real(:,:,:),allocatable, private]%def_p[real(:,:,:),allocatable, private]%f_fe[real(:,:,:),allocatable, private]%f_n[real(:,:,:),allocatable, private]%f_p[real(:,:,:),allocatable, private]%felim[real(:,:,:),allocatable, private]%irrlim[real(:,:,:),allocatable, private]%jzloss_fe[real(:,:,:),allocatable, private]%jzloss_n[real(:,:,:),allocatable, private]%jzloss_p[real(:,:,:),allocatable, private]%jzloss_sio2[real(:,:,:),allocatable, private]%jaggloss_fe[real(:,:,:),allocatable, private]%jaggloss_n[real(:,:,:),allocatable, private]%jaggloss_p[real(:,:,:),allocatable, private]%jaggloss_sio2[real(:,:,:),allocatable, private]%stress_fac[real(:,:,:),allocatable, private]%jvirloss_fe[real(:,:,:),allocatable, private]%jvirloss_n[real(:,:,:),allocatable, private]%jvirloss_p[real(:,:,:),allocatable, private]%jvirloss_sio2[real(:,:,:),allocatable, private]%jmortloss_fe[real(:,:,:),allocatable, private]%jmortloss_n[real(:,:,:),allocatable, private]%jmortloss_p[real(:,:,:),allocatable, private]%jmortloss_sio2[real(:,:,:),allocatable, private]%jexuloss_fe[real(:,:,:),allocatable, private]%jexuloss_n[real(:,:,:),allocatable, private]%jexuloss_p[real(:,:,:),allocatable, private]%jhploss_fe[real(:,:,:),allocatable, private]%jhploss_n[real(:,:,:),allocatable, private]%jhploss_p[real(:,:,:),allocatable, private]%jhploss_sio2[real(:,:,:),allocatable, private]%juptake_n2[real(:,:,:),allocatable, private]%juptake_fe[real(:,:,:),allocatable, private]%juptake_nh4[real(:,:,:),allocatable, private]%juptake_no3[real(:,:,:),allocatable, private]%juptake_po4[real(:,:,:),allocatable, private]%juptake_sio4[real(:,:,:),allocatable, private]%uptake_p_2_n[real(:,:,:),allocatable, private]%jprod_n[real(:,:,:),allocatable, private]%liebig_lim[real(:,:,:),allocatable, private]%mu[real(:,:,:),allocatable, private]%f_mu_mem[real(:,:,:),allocatable, private]%mu_mix[real(:,:,:),allocatable, private]%nh4lim[real(:,:,:),allocatable, private]%no3lim[real(:,:,:),allocatable, private]%po4lim[real(:,:,:),allocatable, private]%o2lim[real(:,:,:),allocatable, private]%q_fe_2_n[real(:,:,:),allocatable, private]%q_p_2_n[real(:,:,:),allocatable, private]%silim[real(:,:,:),allocatable, private]%q_si_2_n[real(:,:,:),allocatable, private]%theta[real(:,:,:),allocatable, private]%chl[real(:,:,:),allocatable, private]%vmove[real(:,:,:),allocatable, private]%id_p_c_max[integer,private]%id_alpha[integer,private]%id_bresp[integer,private]%id_def_fe[integer,private]%id_def_p[integer,private]%id_felim[integer,private]%id_irrlim[integer,private]%id_jzloss_fe[integer,private]%id_jzloss_n[integer,private]%id_jzloss_p[integer,private]%id_jzloss_sio2[integer,private]%id_jaggloss_fe[integer,private]%id_jaggloss_n[integer,private]%id_jaggloss_p[integer,private]%id_jaggloss_sio2[integer,private]%id_stress_fac[integer,private]%id_jvirloss_fe[integer,private]%id_jvirloss_n[integer,private]%id_jvirloss_p[integer,private]%id_jvirloss_sio2[integer,private]%id_jmortloss_fe[integer,private]%id_jmortloss_n[integer,private]%id_jmortloss_p[integer,private]%id_jmortloss_sio2[integer,private]%id_jexuloss_n[integer,private]%id_jexuloss_p[integer,private]%id_jexuloss_fe[integer,private]%id_jhploss_fe[integer,private]%id_jhploss_n[integer,private]%id_jhploss_p[integer,private]%id_jhploss_sio2[integer,private]%id_juptake_n2[integer,private]%id_juptake_fe[integer,private]%id_juptake_nh4[integer,private]%id_juptake_no3[integer,private]%id_juptake_po4[integer,private]%id_juptake_sio4[integer,private]%id_jprod_n[integer,private]%id_liebig_lim[integer,private]%id_mu[integer,private]%id_f_mu_mem[integer,private]%id_mu_mix[integer,private]%id_nh4lim[integer,private]%id_no3lim[integer,private]%id_po4lim[integer,private]%id_o2lim[integer,private]%id_q_fe_2_n[integer,private]%id_q_p_2_n[integer,private]%id_silim[integer,private]%id_q_si_2_n[integer,private]%id_theta[integer,private]%id_chl[integer,private]%id_vmove[integer,private]%id_jprod_n_100[integer,private]%id_jprod_n_new_100[integer,private]%id_jprod_n_n2_100[integer,private]%id_jzloss_n_100[integer,private]%id_jaggloss_n_100[integer,private]%id_jvirloss_n_100[integer,private]%id_jmortloss_n_100[integer,private]%id_jexuloss_n_100[integer,private]%id_f_n_100[integer,private]%id_sfc_f_n[integer,private]%id_sfc_chl[integer,private]%id_sfc_def_fe[integer,private]%id_sfc_felim[integer,private]%id_sfc_q_fe_2_n[integer,private]%id_sfc_q_p_2_n[integer,private]%id_sfc_nh4lim[integer,private]%id_sfc_no3lim[integer,private]%id_sfc_po4lim[integer,private]%id_sfc_irrlim[integer,private]%id_sfc_theta[integer,private]%id_sfc_mu[integer,private]%id_fn_btm[integer,private]%id_fp_btm[integer,private]%id_ffe_btm[integer,private]%id_fsi_btm[integer,private]
-
type
generic_cobalt/zooplankton¶ zooplankton data type
- Type fields
%imax[real,private] :: maximum ingestion rate (sec-1)%ki[real,private] :: half-sat for ingestion (moles N m-3)%gge_max[real,private] :: max gross growth efficiciency (approached as i >> bresp, dimensionless)%nswitch[real,private] :: switching parameter (dimensionless)%mswitch[real,private] :: switching parameter (dimensionless)%bresp[real,private] :: basal respiration rate (sec-1)%ktemp[real,private] :: temperature dependence of zooplankton rates (C-1)%upswim_chl_thresh[real,private] :: threshold for swimming the the mixed layer (chl/chl_surf < thresh)%upswim_i_thresh[real,private] :: Irradiance threshold for upward swimming (watts m-2)%swim_max[real,private] :: maximum upward swimming speed (m s-2)%phi_det[real,private] :: fraction of ingested N to detritus%phi_ldon[real,private] :: fraction of ingested N/P to labile don%phi_sldon[real,private] :: fraction of ingested N/P to semi-labile don%phi_srdon[real,private] :: fraction of ingested N/P to semi-refractory don%phi_ldop[real,private] :: fraction of ingested N/P to labile dop%phi_sldop[real,private] :: fraction of ingested N/P to semi-labile dop%phi_srdop[real,private] :: fraction of ingested N/P to semi-refractory dop%q_p_2_n[real,private] :: p:n ratio of zooplankton%ipa_smp[real,private] :: innate prey availability of low-light adapt. small phytos%ipa_mdp[real,private] :: innate prey availability of medium phytoplankton%ipa_lgp[real,private] :: innate prey availability of large phytoplankton%ipa_diaz[real,private] :: innate prey availability of diazotrophs%ipa_smz[real,private] :: innate prey availability of small zooplankton%ipa_mdz[real,private] :: innate prey availability of large zooplankton%ipa_lgz[real,private] :: innate prey availability of x-large zooplankton%ipa_det[real,private] :: innate prey availability of detritus%ipa_bact[real,private] :: innate prey availability for bacteria%jprod_n_100[real(:,:),allocatable, private] :: zooplankton nitrogen prod. integral in upper 100m%jingest_n_100[real(:,:),allocatable, private] :: zooplankton nitrogen ingestion integral in upper 100m%jzloss_n_100[real(:,:),allocatable, private] :: zooplankton nitrogen loss to zooplankton integral in upper 100m%jhploss_n_100[real(:,:),allocatable, private] :: zooplankton nitrogen loss to higher preds. integral in upper 100m%jprod_ndet_100[real(:,:),allocatable, private] :: zooplankton nitrogen detritus prod. integral in upper 100m%jprod_don_100[real(:,:),allocatable, private] :: zooplankton dissolved org. nitrogen prod. integral in upper 100m%jremin_n_100[real(:,:),allocatable, private] :: zooplankton nitrogen remineralization integral in upper 100m%f_n_100[real(:,:),allocatable, private] :: zooplankton nitrogen biomass in upper 100m%f_n[real(:,:,:),allocatable, private] :: zooplankton biomass%jzloss_n[real(:,:,:),allocatable, private] :: Losses of n due to consumption by other zooplankton groups.%jzloss_p[real(:,:,:),allocatable, private] :: Losses of p due to consumption by other zooplankton groups.%jhploss_n[real(:,:,:),allocatable, private] :: Losses of n due to consumption by unresolved higher preds.%jhploss_p[real(:,:,:),allocatable, private] :: Losses of p due to consumption by unresolved higher preds.%jingest_n[real(:,:,:),allocatable, private] :: Total ingestion of n.%jingest_p[real(:,:,:),allocatable, private] :: Total ingestion of p.%jingest_sio2[real(:,:,:),allocatable, private] :: Total ingestion of silicate.%jingest_fe[real(:,:,:),allocatable, private] :: Total ingestion of iron.%jprod_ndet[real(:,:,:),allocatable, private] :: production of nitrogen detritus by zooplankton group%jprod_pdet[real(:,:,:),allocatable, private] :: production of phosphorous detritus by zooplankton group%jprod_ldon[real(:,:,:),allocatable, private] :: production of labile dissolved organic N by zooplankton group%jprod_ldop[real(:,:,:),allocatable, private] :: production of labile dissolved organic P by zooplankton group%jprod_srdon[real(:,:,:),allocatable, private] :: production of semi-refractory dissolved organic N by zooplankton group%jprod_srdop[real(:,:,:),allocatable, private] :: production of semi-refractory dissolved organic P by zooplankton group%jprod_sldon[real(:,:,:),allocatable, private] :: production of semi-labile dissolved organic N by zooplankton group%jprod_sldop[real(:,:,:),allocatable, private] :: production of semi-labile dissolved organic P by zooplankton group%jprod_fed[real(:,:,:),allocatable, private] :: production of dissolved iron%jprod_fedet[real(:,:,:),allocatable, private] :: production of iron detritus%jprod_sidet[real(:,:,:),allocatable, private] :: production of silica detritus%jprod_sio4[real(:,:,:),allocatable, private] :: production of silicate via rapid dissolution at surface%jprod_po4[real(:,:,:),allocatable, private] :: phosphate production by zooplankton%jprod_nh4[real(:,:,:),allocatable, private] :: ammonia production by zooplankton%jprod_n[real(:,:,:),allocatable, private] :: zooplankton production%o2lim[real(:,:,:),allocatable, private] :: oxygen limitation of zooplankton activity%temp_lim[real(:,:,:),allocatable, private] :: Temperature limitation.%vmove[real(:,:,:),allocatable, private] :: Vertical movement.%id_jzloss_n[integer,private] :: ID associated with diagnostics for losses of n due to consumption by other zooplankton groups.%id_jzloss_p[integer,private] :: ID associated with diagnostics for losses of p due to consumption by other zooplankton groups.%id_jhploss_n[integer,private] :: ID associated with diagnostics for losses of n due to consumption by unresolved higher preds.%id_jhploss_p[integer,private] :: ID associated with diagnostics for losses of p due to consumption by unresolved higher preds.%id_jingest_n[integer,private] :: ID associated with diagnostics for total ingestion of n.%id_jingest_p[integer,private] :: ID associated with diagnostics for total ingestion of p.%id_jingest_sio2[integer,private] :: ID associated with diagnostics for total ingestion of silicate.%id_jingest_fe[integer,private] :: ID associated with diagnostics for total ingestion of iron.%id_jprod_ndet[integer,private] :: ID associated with diagnostics for production of nitrogen detritus by zooplankton group.%id_jprod_pdet[integer,private] :: ID associated with diagnostics for production of phosphorous detritus by zooplankton group.%id_jprod_ldon[integer,private] :: ID associated with diagnostics for production of labile dissolved organic N by zooplankton group.%id_jprod_ldop[integer,private] :: ID associated with diagnostics for production of labile dissolved organic P by zooplankton group.%id_jprod_srdon[integer,private] :: ID associated with diagnostics for production of semi-refractory dissolved organic N by zooplankton group.%id_jprod_srdop[integer,private] :: ID associated with diagnostics for production of semi-refractory dissolved organic P by zooplankton group.%id_jprod_sldon[integer,private] :: ID associated with diagnostics for production of semi-labile dissolved organic N by zooplankton group.%id_jprod_sldop[integer,private] :: ID associated with diagnostics for production of semi-labile dissolved organic P by zooplankton group.%id_jprod_fed[integer,private] :: ID associated with diagnostics for production of dissolved iron.%id_jprod_fedet[integer,private] :: ID associated with diagnostics for production of iron detritus.%id_jprod_sidet[integer,private] :: ID associated with diagnostics for production of silica detritus.%id_jprod_sio4[integer,private] :: ID associated with diagnostics for production of silicate via rapid dissolution at surface.%id_jprod_po4[integer,private] :: ID associated with diagnostics for phosphate production by zooplankton.%id_jprod_nh4[integer,private] :: ID associated with diagnostics for ammonia production by zooplankton.%id_jprod_n[integer,private] :: ID associated with diagnostics for zooplankton production.%id_o2lim[integer,private] :: ID associated with diagnostics for oxygen limitation of zooplankton activity.%id_temp_lim[integer,private] :: ID associated with diagnostics for temperature limitation.%id_vmove[integer,private] :: ID associated with diagnostics for vertical movement.%id_jprod_n_100[integer,private] :: ID associated with diagnostics for zooplankton nitrogen prod. integral in upper 100m.%id_jingest_n_100[integer,private] :: ID associated with diagnostics for zooplankton nitrogen ingestion integral in upper 100m.%id_jzloss_n_100[integer,private] :: ID associated with diagnostics for zooplankton nitrogen loss to zooplankton integral in upper 100m.%id_jhploss_n_100[integer,private] :: ID associated with diagnostics for zooplankton nitrogen loss to higher preds. integral in upper 100m.%id_jprod_ndet_100[integer,private] :: ID associated with diagnostics for zooplankton nitrogen detritus prod. integral in upper 100m.%id_jprod_don_100[integer,private] :: ID associated with diagnostics for zooplankton dissolved org. nitrogen prod. integral in upper 100m.%id_jremin_n_100[integer,private] :: ID associated with diagnostics for zooplankton nitrogen remineralization integral in upper 100m.%id_f_n_100[integer,private] :: ID associated with diagnostics for zooplankton nitrogen biomass in upper 100m.
-
type
generic_cobalt/bacteria¶ bacteria data type
- Type fields
%mu_max[real,private] :: maximum bacterial growth rate (sec-1)%k_ldon[real,private] :: half-sat for nitrogen-limited growth (mmoles N m-3)%gge_max[real,private] :: max gross growth efficiciency (dimensionless)%amx_ge[real,private] :: growth efficiency due to anammox reaction (dimensionless)%nitrif_ge[real,private] :: growth efficiency of nitrifying bacteria (dimensionless)%bresp[real,private] :: basal respiration rate (sec-1)%ktemp[real,private] :: temperature dependence of bacterial rates (C-1)%vir[real,private] :: virus-driven loss rate for bacteria (sec-1 mmole N m-3)%q_p_2_n[real,private] :: p:n ratio for bacteria%jprod_n_100[real(:,:),allocatable, private] :: Bacteria nitrogen prod. integral in upper 100m.%jzloss_n_100[real(:,:),allocatable, private] :: Bacteria nitrogen loss to zooplankton integral in upper 100m.%jvirloss_n_100[real(:,:),allocatable, private] :: Bacteria nitrogen loss to viruses integral in upper 100m.%jremin_n_100[real(:,:),allocatable, private] :: Bacteria nitrogen remineralization integral in upper 100m.%juptake_ldon_100[real(:,:),allocatable, private] :: Bacterial uptake of labile dissolved org. nitrogen in upper 100m.%f_n_100[real(:,:),allocatable, private] :: Bacterial nitrogen biomass in upper 100m.%f_n[real(:,:,:),allocatable, private] :: bacteria biomass%jzloss_n[real(:,:,:),allocatable, private] :: Losses of n due to consumption by zooplankton.%jzloss_p[real(:,:,:),allocatable, private] :: Losses of p due to consumption by zooplankton.%jhploss_n[real(:,:,:),allocatable, private] :: Losses of n due to consumption by unresolved higher preds.%jhploss_p[real(:,:,:),allocatable, private] :: Losses of p due to consumption by unresolved higher preds.%jvirloss_n[real(:,:,:),allocatable, private] :: nitrogen losses via viruses%jvirloss_p[real(:,:,:),allocatable, private] :: phosphorous losses via viruses%juptake_ldon[real(:,:,:),allocatable, private] :: Total uptake of ldon.%juptake_ldop[real(:,:,:),allocatable, private] :: Total uptake of sldon.%juptake_po4[real(:,:,:),allocatable, private] :: phosphate uptake with anammox/nitrification%jprod_nh4[real(:,:,:),allocatable, private] :: production of ammonia bacteria%jprod_po4[real(:,:,:),allocatable, private] :: production of phosphate by bacteria%jprod_n[real(:,:,:),allocatable, private] :: total free-living bacterial production%jprod_n_het[real(:,:,:),allocatable, private] :: heterotrophic bacteria production%jprod_n_amx[real(:,:,:),allocatable, private] :: anammox bacteria production%jprod_n_nitrif[real(:,:,:),allocatable, private] :: nitrifying bacteria production%mu_h[real(:,:,:),allocatable, private] :: growth rate of heterotrophic bacteria%mu_cstar[real(:,:,:),allocatable, private] :: biomass turnover due to chemosynthesis%bhet[real(:,:,:),allocatable, private] :: heterotrophic bacteria biomass%ldonlim[real(:,:,:),allocatable, private] :: limitation due to organic substrate%o2lim[real(:,:,:),allocatable, private] :: limitation due to oxygen%temp_lim[real(:,:,:),allocatable, private] :: Temperature limitation.%id_jzloss_n[integer,private] :: ID associated with diagnostics for losses of n due to consumption by zooplankton.%id_jzloss_p[integer,private] :: ID associated with diagnostics for losses of p due to consumption by zooplankton.%id_jhploss_n[integer,private] :: ID associated with diagnostics for losses of n due to consumption by unresolved higher preds.%id_jhploss_p[integer,private] :: ID associated with diagnostics for losses of p due to consumption by unresolved higher preds.%id_jvirloss_n[integer,private] :: ID associated with diagnostics for nitrogen losses via viruses.%id_jvirloss_p[integer,private] :: ID associated with diagnostics for phosphorous losses via viruses.%id_juptake_ldon[integer,private] :: ID associated with diagnostics for total uptake of ldon.%id_juptake_ldop[integer,private] :: ID associated with diagnostics for total uptake of sldon.%id_juptake_po4[integer,private] :: ID associated with diagnostics for phosphate uptake with anammox/nitrification.%id_jprod_nh4[integer,private] :: ID associated with diagnostics for production of ammonia bacteria.%id_jprod_po4[integer,private] :: ID associated with diagnostics for production of phosphate by bacteria.%id_jprod_n[integer,private] :: ID associated with diagnostics for total free-living bacterial production.%id_jprod_n_het[integer,private] :: ID associated with diagnostics for heterotrophic bacteria production.%id_jprod_n_amx[integer,private] :: ID associated with diagnostics for anammox bacteria production.%id_jprod_n_nitrif[integer,private] :: ID associated with diagnostics for nitrifying bacteria production.%id_mu_h[integer,private] :: ID associated with diagnostics for growth rate of heterotrophic bacteria.%id_mu_cstar[integer,private] :: ID associated with diagnostics for biomass turnover due to chemosynthesis.%id_bhet[integer,private] :: ID associated with diagnostics for heterotrophic bacteria biomass.%id_temp_lim[integer,private] :: ID associated with diagnostics for temperature limitation.%id_o2lim[integer,private] :: ID associated with diagnostics for limitation due to oxygen.%id_ldonlim[integer,private] :: ID associated with diagnostics for limitation due to organic substrate.%id_jprod_n_100[integer,private] :: ID associated with diagnostics for bacteria nitrogen prod. integral in upper 100m.%id_jzloss_n_100[integer,private] :: ID associated with diagnostics for bacteria nitrogen loss to zooplankton integral in upper 100m.%id_jvirloss_n_100[integer,private] :: ID associated with diagnostics for bacteria nitrogen loss to viruses integral in upper 100m.%id_jremin_n_100[integer,private] :: ID associated with diagnostics for bacteria nitrogen remineralization integral in upper 100m.%id_juptake_ldon_100[integer,private] :: ID associated with diagnostics for bacterial uptake of labile dissolved org. nitrogen in upper 100m%id_f_n_100[integer,private] :: ID associated with diagnostics for bacterial nitrogen biomass in upper 100m.
-
type
generic_cobalt/generic_cobalt_type¶ data type for other variables used in
generic_cobalt()module module- Type fields
%init[logical,private]%force_update_fluxes[logical,private]%p_2_n_static[logical,private]%cased_steady[logical,private]%tracer_debug[logical,private]%atm_co2_flux[real,private]%c_2_n[real,private]%ca_2_n_arag[real,private]%ca_2_n_calc[real,private]%caco3_sat_max[real,private]%doc_background[real,private]%fe_2_n_upt_fac[real,private]%fe_2_n_sed[real,private]%ffe_sed_max[real,private]%ffe_geotherm_ratio[real,private]%jfe_iceberg_ratio[real,private]%jno3_iceberg_ratio[real,private]%jpo4_iceberg_ratio[real,private]%fe_coast[real,private]%felig_2_don[real,private]%felig_bkg[real,private]%gamma_cadet_arag[real,private]%gamma_cadet_calc[real,private]%par_adj[real,private]%gamma_irr_aclm[real,private]%ml_aclm_efold[real,private]%zmld_ref[real,private]%densdiff_mld[real,private]%irrad_day_thresh[real,private]%min_daylength[real,private]%gamma_irr_mem_dp[real,private]%gamma_mu_mem[real,private]%irr_mem_dpthresh1[real,private]%irr_mem_dpthresh2[real,private]%dpause_max[real,private]%gamma_ndet[real,private]%gamma_nitrif[real,private]%k_nh3_nitrif[real,private]%gamma_sidet[real,private]%gamma_srdon[real,private]%gamma_srdop[real,private]%gamma_sldon[real,private]%gamma_sldop[real,private]%gamma_nh4amx[real,private]%kappa_sidet[real,private]%irr_inhibit[real,private]%k_n_inhib_di[real,private]%k_o2[real,private]%k_o2_nit[real,private]%kappa_eppley[real,private]%kappa_remin[real,private]%remin_ramp_scale[real,private]%kfe_eq_lig_hl[real,private]%kfe_eq_lig_ll[real,private]%alpha_fescav[real,private]%beta_fescav[real,private]%io_fescav[real,private]%remin_eff_fedet[real,private]%half_life_14c[real,private]%lambda_14c[real,private]%k_lith[real,private]%phi_lith[real,private]%alk_2_n_denit[real,private]%n_2_n_denit[real,private]%k_no3_denit[real,private]%no3_2_nh4_amx[real,private]%alk_2_nh4_amx[real,private]%z_burial[real,private]%phi_surfresp_cased[real,private]%phi_deepresp_cased[real,private]%alpha_cased[real,private]%beta_cased[real,private]%gamma_cased[real,private]%co_cased[real,private]%o2_min[real,private]%o2_min_amx[real,private]%o2_min_nit[real,private]%o2_2_nfix[real,private]%o2_2_nh4[real,private]%o2_2_no3[real,private]%o2_2_nitrif[real,private]%o2_inhib_di_pow[real,private]%o2_inhib_di_sat[real,private]%rpcaco3[real,private]%rplith[real,private]%rpsio2[real,private]%thetamin[real,private]%vir_ktemp[real,private]%lysis_phi_ldon[real,private]%lysis_phi_srdon[real,private]%lysis_phi_sldon[real,private]%lysis_phi_ldop[real,private]%lysis_phi_srdop[real,private]%lysis_phi_sldop[real,private]%wsink[real,private]%bottom_thickness[real,private]%z_sed[real,private]%zeta[real,private]%refuge_conc[real,private]%imax_hp[real,private]%ki_hp[real,private]%ktemp_hp[real,private]%coef_hp[real,private]%nswitch_hp[real,private]%mswitch_hp[real,private]%hp_ipa_smp[real,private]%hp_ipa_mdp[real,private]%hp_ipa_lgp[real,private]%hp_ipa_diaz[real,private]%hp_ipa_bact[real,private]%hp_ipa_smz[real,private]%hp_ipa_mdz[real,private]%hp_ipa_lgz[real,private]%hp_ipa_det[real,private]%hp_phi_det[real,private]%total_atm_co2[real(3),private]%htotal_scale_lo[real,private]%htotal_scale_hi[real,private]%htotal_in[real,private]%rho_0[real,private]%a_0[real,private]%a_1[real,private]%a_2[real,private]%a_3[real,private]%a_4[real,private]%a_5[real,private]%b_0[real,private]%b_1[real,private]%b_2[real,private]%b_3[real,private]%c_0[real,private]%a1_co2[real,private]%a2_co2[real,private]%a3_co2[real,private]%a4_co2[real,private]%a5_co2[real,private]%a1_o2[real,private]%a2_o2[real,private]%a3_o2[real,private]%a4_o2[real,private]%a5_o2[real,private]%mask_z_sat_arag[logical(:,:),allocatable, private]%mask_z_sat_calc[logical(:,:),allocatable, private]%f_alk[real(:,:,:),allocatable, private]%f_cadet_arag[real(:,:,:),allocatable, private]%f_cadet_calc[real(:,:,:),allocatable, private]%f_dic[real(:,:,:),allocatable, private]%f_fed[real(:,:,:),allocatable, private]%f_fedet[real(:,:,:),allocatable, private]%f_ldon[real(:,:,:),allocatable, private]%f_ldop[real(:,:,:),allocatable, private]%f_lith[real(:,:,:),allocatable, private]%f_lithdet[real(:,:,:),allocatable, private]%f_ndet[real(:,:,:),allocatable, private]%f_nh4[real(:,:,:),allocatable, private]%f_no3[real(:,:,:),allocatable, private]%f_o2[real(:,:,:),allocatable, private]%f_pdet[real(:,:,:),allocatable, private]%f_po4[real(:,:,:),allocatable, private]%f_srdon[real(:,:,:),allocatable, private]%f_srdop[real(:,:,:),allocatable, private]%f_sldon[real(:,:,:),allocatable, private]%f_sldop[real(:,:,:),allocatable, private]%f_sidet[real(:,:,:),allocatable, private]%f_simd[real(:,:,:),allocatable, private]%f_silg[real(:,:,:),allocatable, private]%f_sio4[real(:,:,:),allocatable, private]%co3_sol_arag[real(:,:,:),allocatable, private]%co3_sol_calc[real(:,:,:),allocatable, private]%rho_test[real(:,:,:),allocatable, private]%f_chl[real(:,:,:),allocatable, private]%f_nh3[real(:,:,:),allocatable, private]%f_co3_ion[real(:,:,:),allocatable, private]%f_htotal[real(:,:,:),allocatable, private]%f_irr_aclm[real(:,:,:),allocatable, private]%f_irr_aclm_z[real(:,:,:),allocatable, private]%f_irr_aclm_sfc[real(:,:,:),allocatable, private]%f_irr_mem_dp[real(:,:,:),allocatable, private]%f_cased[real(:,:,:),allocatable, private]%f_cadet_arag_btf[real(:,:,:),allocatable, private]%f_cadet_calc_btf[real(:,:,:),allocatable, private]%f_fedet_btf[real(:,:,:),allocatable, private]%f_lithdet_btf[real(:,:,:),allocatable, private]%f_ndet_btf[real(:,:,:),allocatable, private]%f_pdet_btf[real(:,:,:),allocatable, private]%f_sidet_btf[real(:,:,:),allocatable, private]%f_nsm_btf[real(:,:,:),allocatable, private]%f_nmd_btf[real(:,:,:),allocatable, private]%f_nlg_btf[real(:,:,:),allocatable, private]%f_ndi_btf[real(:,:,:),allocatable, private]%f_simd_btf[real(:,:,:),allocatable, private]%f_silg_btf[real(:,:,:),allocatable, private]%f_fesm_btf[real(:,:,:),allocatable, private]%f_femd_btf[real(:,:,:),allocatable, private]%f_felg_btf[real(:,:,:),allocatable, private]%f_fedi_btf[real(:,:,:),allocatable, private]%f_psm_btf[real(:,:,:),allocatable, private]%f_pmd_btf[real(:,:,:),allocatable, private]%f_plg_btf[real(:,:,:),allocatable, private]%f_pdi_btf[real(:,:,:),allocatable, private]%jnbact[real(:,:,:),allocatable, private]%jndi[real(:,:,:),allocatable, private]%jnsm[real(:,:,:),allocatable, private]%jnmd[real(:,:,:),allocatable, private]%jnlg[real(:,:,:),allocatable, private]%jnsmz[real(:,:,:),allocatable, private]%jnmdz[real(:,:,:),allocatable, private]%jnlgz[real(:,:,:),allocatable, private]%jalk[real(:,:,:),allocatable, private]%jalk_plus_btm[real(:,:,:),allocatable, private]%jcadet_arag[real(:,:,:),allocatable, private]%jcadet_calc[real(:,:,:),allocatable, private]%jdic[real(:,:,:),allocatable, private]%jdic_plus_btm[real(:,:,:),allocatable, private]%jdin_plus_btm[real(:,:,:),allocatable, private]%jfed[real(:,:,:),allocatable, private]%jfed_plus_btm[real(:,:,:),allocatable, private]%jfedi[real(:,:,:),allocatable, private]%jfesm[real(:,:,:),allocatable, private]%jfemd[real(:,:,:),allocatable, private]%jfelg[real(:,:,:),allocatable, private]%jpdi[real(:,:,:),allocatable, private]%jpsm[real(:,:,:),allocatable, private]%jpmd[real(:,:,:),allocatable, private]%jplg[real(:,:,:),allocatable, private]%jfedet[real(:,:,:),allocatable, private]%jldon[real(:,:,:),allocatable, private]%jldop[real(:,:,:),allocatable, private]%jlith[real(:,:,:),allocatable, private]%jlithdet[real(:,:,:),allocatable, private]%jndet[real(:,:,:),allocatable, private]%jnh4[real(:,:,:),allocatable, private]%jnh4_plus_btm[real(:,:,:),allocatable, private]%jno3[real(:,:,:),allocatable, private]%jno3_plus_btm[real(:,:,:),allocatable, private]%jo2[real(:,:,:),allocatable, private]%jo2_plus_btm[real(:,:,:),allocatable, private]%jpdet[real(:,:,:),allocatable, private]%jpo4[real(:,:,:),allocatable, private]%jpo4_plus_btm[real(:,:,:),allocatable, private]%jsrdon[real(:,:,:),allocatable, private]%jsrdop[real(:,:,:),allocatable, private]%jsldon[real(:,:,:),allocatable, private]%jsldop[real(:,:,:),allocatable, private]%jsidet[real(:,:,:),allocatable, private]%jsimd[real(:,:,:),allocatable, private]%jsilg[real(:,:,:),allocatable, private]%jsio4[real(:,:,:),allocatable, private]%jsio4_plus_btm[real(:,:,:),allocatable, private]%jprod_ndet[real(:,:,:),allocatable, private]%jprod_pdet[real(:,:,:),allocatable, private]%jprod_ldon[real(:,:,:),allocatable, private]%jprod_ldop[real(:,:,:),allocatable, private]%jprod_sldon[real(:,:,:),allocatable, private]%jprod_sldop[real(:,:,:),allocatable, private]%jprod_srdon[real(:,:,:),allocatable, private]%jprod_srdop[real(:,:,:),allocatable, private]%jprod_fed[real(:,:,:),allocatable, private]%jprod_fedet[real(:,:,:),allocatable, private]%jprod_sidet[real(:,:,:),allocatable, private]%jprod_sio4[real(:,:,:),allocatable, private]%jprod_lithdet[real(:,:,:),allocatable, private]%jprod_cadet_arag[real(:,:,:),allocatable, private]%jprod_cadet_calc[real(:,:,:),allocatable, private]%jprod_nh4[real(:,:,:),allocatable, private]%jprod_nh4_plus_btm[real(:,:,:),allocatable, private]%jprod_po4[real(:,:,:),allocatable, private]%net_phyto_resp[real(:,:,:),allocatable, private]%det_jzloss_n[real(:,:,:),allocatable, private]%det_jzloss_p[real(:,:,:),allocatable, private]%det_jzloss_fe[real(:,:,:),allocatable, private]%det_jzloss_si[real(:,:,:),allocatable, private]%det_jhploss_n[real(:,:,:),allocatable, private]%det_jhploss_p[real(:,:,:),allocatable, private]%det_jhploss_fe[real(:,:,:),allocatable, private]%det_jhploss_si[real(:,:,:),allocatable, private]%jdiss_cadet_arag[real(:,:,:),allocatable, private]%jdiss_cadet_arag_plus_btm[real(:,:,:),allocatable, private]%jdiss_cadet_calc[real(:,:,:),allocatable, private]%jdiss_cadet_calc_plus_btm[real(:,:,:),allocatable, private]%jdiss_sidet[real(:,:,:),allocatable, private]%jremin_ndet[real(:,:,:),allocatable, private]%jremin_pdet[real(:,:,:),allocatable, private]%jremin_fedet[real(:,:,:),allocatable, private]%jfe_ads[real(:,:,:),allocatable, private]%jfe_coast[real(:,:,:),allocatable, private]%jfe_iceberg[real(:,:,:),allocatable, private]%jno3_iceberg[real(:,:,:),allocatable, private]%jpo4_iceberg[real(:,:,:),allocatable, private]%kfe_eq_lig[real(:,:,:),allocatable, private]%feprime[real(:,:,:),allocatable, private]%ligand[real(:,:,:),allocatable, private]%fe_sol[real(:,:,:),allocatable, private]%expkt[real(:,:,:),allocatable, private]%expkremint[real(:,:,:),allocatable, private]%hp_temp_lim[real(:,:,:),allocatable, private]%hp_o2lim[real(:,:,:),allocatable, private]%hp_jingest_n[real(:,:,:),allocatable, private]%hp_jingest_p[real(:,:,:),allocatable, private]%hp_jingest_fe[real(:,:,:),allocatable, private]%hp_jingest_sio2[real(:,:,:),allocatable, private]%irr_inst[real(:,:,:),allocatable, private]%irr_mix[real(:,:,:),allocatable, private]%irr_aclm_inst[real(:,:,:),allocatable, private]%chl2sfcchl[real(:,:,:),allocatable, private]%jno3denit_wc[real(:,:,:),allocatable, private]%juptake_no3amx[real(:,:,:),allocatable, private]%juptake_nh4amx[real(:,:,:),allocatable, private]%jprod_n2amx[real(:,:,:),allocatable, private]%juptake_nh4nitrif[real(:,:,:),allocatable, private]%jprod_no3nitrif[real(:,:,:),allocatable, private]%jo2resp_wc[real(:,:,:),allocatable, private]%omega_arag[real(:,:,:),allocatable, private]%omega_calc[real(:,:,:),allocatable, private]%omegaa[real(:,:,:),allocatable, private]%omegac[real(:,:,:),allocatable, private]%fntot[real(:,:,:),allocatable, private]%fptot[real(:,:,:),allocatable, private]%ffetot[real(:,:,:),allocatable, private]%fsitot[real(:,:,:),allocatable, private]%tot_layer_int_c[real(:,:,:),allocatable, private]%tot_layer_int_fe[real(:,:,:),allocatable, private]%tot_layer_int_n[real(:,:,:),allocatable, private]%tot_layer_int_p[real(:,:,:),allocatable, private]%tot_layer_int_si[real(:,:,:),allocatable, private]%tot_layer_int_o2[real(:,:,:),allocatable, private]%tot_layer_int_alk[real(:,:,:),allocatable, private]%total_filter_feeding[real(:,:,:),allocatable, private]%nmd_diatoms[real(:,:,:),allocatable, private]%nlg_diatoms[real(:,:,:),allocatable, private]%q_si_2_n_md_diatoms[real(:,:,:),allocatable, private]%q_si_2_n_lg_diatoms[real(:,:,:),allocatable, private]%zt[real(:,:,:),allocatable, private]%c14_2_n[real(:,:,:),allocatable, private]%f_di14c[real(:,:,:),allocatable, private]%f_do14c[real(:,:,:),allocatable, private]%fpo14c[real(:,:,:),allocatable, private]%j14c_decay_dic[real(:,:,:),allocatable, private]%j14c_decay_doc[real(:,:,:),allocatable, private]%j14c_reminp[real(:,:,:),allocatable, private]%jdi14c[real(:,:,:),allocatable, private]%jdo14c[real(:,:,:),allocatable, private]%dissoc[real(:,:,:),allocatable, private]%o2sat[real(:,:,:),allocatable, private]%remoc[real(:,:,:),allocatable, private]%tot_layer_int_doc[real(:,:,:),allocatable, private]%tot_layer_int_poc[real(:,:,:),allocatable, private]%tot_layer_int_dic[real(:,:,:),allocatable, private]%b_alk[real(:,:),allocatable, private]%b_dic[real(:,:),allocatable, private]%b_fed[real(:,:),allocatable, private]%b_nh4[real(:,:),allocatable, private]%b_no3[real(:,:),allocatable, private]%b_o2[real(:,:),allocatable, private]%b_po4[real(:,:),allocatable, private]%b_sio4[real(:,:),allocatable, private]%b_di14c[real(:,:),allocatable, private]%co2_csurf[real(:,:),allocatable, private]%pco2_csurf[real(:,:),allocatable, private]%co2_alpha[real(:,:),allocatable, private]%c14o2_csurf[real(:,:),allocatable, private]%c14o2_alpha[real(:,:),allocatable, private]%nh3_csurf[real(:,:),allocatable, private]%nh3_alpha[real(:,:),allocatable, private]%pnh3_csurf[real(:,:),allocatable, private]%fcadet_arag_btm[real(:,:),allocatable, private]%fcadet_calc_btm[real(:,:),allocatable, private]%ffedet_btm[real(:,:),allocatable, private]%flithdet_btm[real(:,:),allocatable, private]%fpdet_btm[real(:,:),allocatable, private]%fndet_btm[real(:,:),allocatable, private]%fsidet_btm[real(:,:),allocatable, private]%fntot_btm[real(:,:),allocatable, private]%fptot_btm[real(:,:),allocatable, private]%ffetot_btm[real(:,:),allocatable, private]%fsitot_btm[real(:,:),allocatable, private]%fcased_burial[real(:,:),allocatable, private]%fcased_redis[real(:,:),allocatable, private]%fcased_redis_surfresp[real(:,:),allocatable, private]%cased_redis_coef[real(:,:),allocatable, private]%cased_redis_delz[real(:,:),allocatable, private]%ffe_sed[real(:,:),allocatable, private]%ffe_geotherm[real(:,:),allocatable, private]%ffe_iceberg[real(:,:),allocatable, private]%fnfeso4red_sed[real(:,:),allocatable, private]%fno3denit_sed[real(:,:),allocatable, private]%fnoxic_sed[real(:,:),allocatable, private]%frac_burial[real(:,:),allocatable, private]%fn_burial[real(:,:),allocatable, private]%fp_burial[real(:,:),allocatable, private]%jprod_allphytos_100[real(:,:),allocatable, private]%jprod_allphytos_200[real(:,:),allocatable, private]%jprod_diat_100[real(:,:),allocatable, private]%mld_aclm[real(:,:),allocatable, private]%htotallo[real(:,:),allocatable, private]%htotalhi[real(:,:),allocatable, private]%hp_jingest_n_100[real(:,:),allocatable, private]%hp_jremin_n_100[real(:,:),allocatable, private]%hp_jprod_ndet_100[real(:,:),allocatable, private]%jprod_lithdet_100[real(:,:),allocatable, private]%jprod_sidet_100[real(:,:),allocatable, private]%jprod_cadet_calc_100[real(:,:),allocatable, private]%jprod_cadet_arag_100[real(:,:),allocatable, private]%jprod_mesozoo_200[real(:,:),allocatable, private]%jremin_ndet_100[real(:,:),allocatable, private]%f_ndet_100[real(:,:),allocatable, private]%f_don_100[real(:,:),allocatable, private]%f_simd_100[real(:,:),allocatable, private]%f_silg_100[real(:,:),allocatable, private]%f_mesozoo_200[real(:,:),allocatable, private]%fndet_100[real(:,:),allocatable, private]%fpdet_100[real(:,:),allocatable, private]%fsidet_100[real(:,:),allocatable, private]%fcadet_calc_100[real(:,:),allocatable, private]%fcadet_arag_100[real(:,:),allocatable, private]%ffedet_100[real(:,:),allocatable, private]%flithdet_100[real(:,:),allocatable, private]%fntot_100[real(:,:),allocatable, private]%fptot_100[real(:,:),allocatable, private]%fsitot_100[real(:,:),allocatable, private]%ffetot_100[real(:,:),allocatable, private]%btm_temp[real(:,:),allocatable, private]%btm_temp_old[real(:,:),allocatable, private]%btm_o2_old[real(:,:),allocatable, private]%btm_o2[real(:,:),allocatable, private]%btm_no3[real(:,:),allocatable, private]%btm_alk[real(:,:),allocatable, private]%btm_dic[real(:,:),allocatable, private]%grid_kmt_diag[real(:,:),allocatable, private]%k_bot_diag[real(:,:),allocatable, private]%rho_dzt_kmt_diag[real(:,:),allocatable, private]%rho_dzt_bot_diag[real(:,:),allocatable, private]%btm_htotal[real(:,:),allocatable, private]%btm_htotal_old[real(:,:),allocatable, private]%btm_co3_ion[real(:,:),allocatable, private]%btm_co3_ion_old[real(:,:),allocatable, private]%btm_co3_sol_arag[real(:,:),allocatable, private]%btm_co3_sol_arag_old[real(:,:),allocatable, private]%btm_co3_sol_calc[real(:,:),allocatable, private]%btm_co3_sol_calc_old[real(:,:),allocatable, private]%btm_omega_calc[real(:,:),allocatable, private]%btm_omega_arag[real(:,:),allocatable, private]%cased_2d[real(:,:),allocatable, private]%o2min[real(:,:),allocatable, private]%z_o2min[real(:,:),allocatable, private]%z_sat_arag[real(:,:),allocatable, private]%z_sat_calc[real(:,:),allocatable, private]%dp_fac[real(:,:),allocatable, private]%daylength[real(:,:),allocatable, private]%f_alk_int_100[real(:,:),allocatable, private]%f_dic_int_100[real(:,:),allocatable, private]%f_din_int_100[real(:,:),allocatable, private]%f_fed_int_100[real(:,:),allocatable, private]%f_po4_int_100[real(:,:),allocatable, private]%f_sio4_int_100[real(:,:),allocatable, private]%jalk_100[real(:,:),allocatable, private]%jdic_100[real(:,:),allocatable, private]%jdin_100[real(:,:),allocatable, private]%jfed_100[real(:,:),allocatable, private]%jpo4_100[real(:,:),allocatable, private]%jsio4_100[real(:,:),allocatable, private]%jprod_ptot_100[real(:,:),allocatable, private]%wc_vert_int_c[real(:,:),allocatable, private]%wc_vert_int_dic[real(:,:),allocatable, private]%wc_vert_int_doc[real(:,:),allocatable, private]%wc_vert_int_poc[real(:,:),allocatable, private]%wc_vert_int_n[real(:,:),allocatable, private]%wc_vert_int_p[real(:,:),allocatable, private]%wc_vert_int_fe[real(:,:),allocatable, private]%wc_vert_int_si[real(:,:),allocatable, private]%wc_vert_int_o2[real(:,:),allocatable, private]%wc_vert_int_alk[real(:,:),allocatable, private]%wc_vert_int_chemoautopp[real(:,:),allocatable, private]%wc_vert_int_net_phyto_resp[real(:,:),allocatable, private]%wc_vert_int_npp[real(:,:),allocatable, private]%wc_vert_int_jdiss_sidet[real(:,:),allocatable, private]%wc_vert_int_jdiss_cadet[real(:,:),allocatable, private]%wc_vert_int_jo2resp[real(:,:),allocatable, private]%wc_vert_int_jprod_cadet[real(:,:),allocatable, private]%wc_vert_int_jno3denit[real(:,:),allocatable, private]%wc_vert_int_jprod_no3nitrif[real(:,:),allocatable, private]%wc_vert_int_juptake_nh4[real(:,:),allocatable, private]%wc_vert_int_jprod_nh4[real(:,:),allocatable, private]%wc_vert_int_juptake_no3[real(:,:),allocatable, private]%wc_vert_int_nfix[real(:,:),allocatable, private]%wc_vert_int_jprod_n2amx[real(:,:),allocatable, private]%wc_vert_int_jfe_iceberg[real(:,:),allocatable, private]%wc_vert_int_jno3_iceberg[real(:,:),allocatable, private]%wc_vert_int_jpo4_iceberg[real(:,:),allocatable, private]%p_alk[real(:,:,:,:),pointer, private]%p_cadet_arag[real(:,:,:,:),pointer, private]%p_cadet_calc[real(:,:,:,:),pointer, private]%p_dic[real(:,:,:,:),pointer, private]%p_di14c[real(:,:,:,:),pointer, private]%p_do14c[real(:,:,:,:),pointer, private]%p_fed[real(:,:,:,:),pointer, private]%p_fedet[real(:,:,:,:),pointer, private]%p_fedi[real(:,:,:,:),pointer, private]%p_felg[real(:,:,:,:),pointer, private]%p_femd[real(:,:,:,:),pointer, private]%p_fesm[real(:,:,:,:),pointer, private]%p_pdi[real(:,:,:,:),pointer, private]%p_plg[real(:,:,:,:),pointer, private]%p_pmd[real(:,:,:,:),pointer, private]%p_psm[real(:,:,:,:),pointer, private]%p_ldon[real(:,:,:,:),pointer, private]%p_ldop[real(:,:,:,:),pointer, private]%p_lith[real(:,:,:,:),pointer, private]%p_lithdet[real(:,:,:,:),pointer, private]%p_nbact[real(:,:,:,:),pointer, private]%p_ndet[real(:,:,:,:),pointer, private]%p_ndi[real(:,:,:,:),pointer, private]%p_nlg[real(:,:,:,:),pointer, private]%p_nmd[real(:,:,:,:),pointer, private]%p_nsm[real(:,:,:,:),pointer, private]%p_nh4[real(:,:,:,:),pointer, private]%p_no3[real(:,:,:,:),pointer, private]%p_o2[real(:,:,:,:),pointer, private]%p_pdet[real(:,:,:,:),pointer, private]%p_po4[real(:,:,:,:),pointer, private]%p_srdon[real(:,:,:,:),pointer, private]%p_srdop[real(:,:,:,:),pointer, private]%p_sldon[real(:,:,:,:),pointer, private]%p_sldop[real(:,:,:,:),pointer, private]%p_sidet[real(:,:,:,:),pointer, private]%p_silg[real(:,:,:,:),pointer, private]%p_simd[real(:,:,:,:),pointer, private]%p_sio4[real(:,:,:,:),pointer, private]%p_nsmz[real(:,:,:,:),pointer, private]%p_nmdz[real(:,:,:,:),pointer, private]%p_nlgz[real(:,:,:,:),pointer, private]%runoff_flux_alk[real(:,:),allocatable, private]%runoff_flux_dic[real(:,:),allocatable, private]%runoff_flux_di14c[real(:,:),allocatable, private]%runoff_flux_lith[real(:,:),allocatable, private]%runoff_flux_fed[real(:,:),allocatable, private]%runoff_flux_no3[real(:,:),allocatable, private]%runoff_flux_ldon[real(:,:),allocatable, private]%runoff_flux_sldon[real(:,:),allocatable, private]%runoff_flux_srdon[real(:,:),allocatable, private]%runoff_flux_ndet[real(:,:),allocatable, private]%runoff_flux_pdet[real(:,:),allocatable, private]%runoff_flux_po4[real(:,:),allocatable, private]%runoff_flux_ldop[real(:,:),allocatable, private]%runoff_flux_sldop[real(:,:),allocatable, private]%runoff_flux_srdop[real(:,:),allocatable, private]%dry_fed[real(:,:),allocatable, private]%wet_fed[real(:,:),allocatable, private]%dry_lith[real(:,:),allocatable, private]%wet_lith[real(:,:),allocatable, private]%dry_no3[real(:,:),allocatable, private]%wet_no3[real(:,:),allocatable, private]%dry_nh4[real(:,:),allocatable, private]%wet_nh4[real(:,:),allocatable, private]%dry_po4[real(:,:),allocatable, private]%wet_po4[real(:,:),allocatable, private]%stf_gas_dic[real(:,:),allocatable, private]%stf_gas_o2[real(:,:),allocatable, private]%deltap_dic[real(:,:),allocatable, private]%deltap_o2[real(:,:),allocatable, private]%nkml[integer,private]%numlightadapt[integer,private]%file[character(len=fm_string_len),private]%ice_restart_file[character(len=fm_string_len),private]%ocean_restart_file[character(len=fm_string_len),private]%ic_file[character(len=fm_string_len),private]%id_ndi[integer,private]%id_nlg[integer,private]%id_nmd[integer,private]%id_nsm[integer,private]%id_nsmz[integer,private]%id_nmdz[integer,private]%id_nlgz[integer,private]%id_nbact[integer,private]%id_alk[integer,private]%id_cadet_arag[integer,private]%id_cadet_calc[integer,private]%id_dic[integer,private]%id_fed[integer,private]%id_fedet[integer,private]%id_fedi[integer,private]%id_felg[integer,private]%id_femd[integer,private]%id_fesm[integer,private]%id_pdi[integer,private]%id_plg[integer,private]%id_pmd[integer,private]%id_psm[integer,private]%id_ldon[integer,private]%id_ldop[integer,private]%id_lith[integer,private]%id_lithdet[integer,private]%id_ndet[integer,private]%id_nh4[integer,private]%id_no3[integer,private]%id_o2[integer,private]%id_pdet[integer,private]%id_po4[integer,private]%id_srdop[integer,private]%id_srdon[integer,private]%id_sldon[integer,private]%id_sldop[integer,private]%id_sidet[integer,private]%id_silg[integer,private]%id_simd[integer,private]%id_sio4[integer,private]%id_co3_sol_arag[integer,private]%id_co3_sol_calc[integer,private]%id_rho_test[integer,private]%id_dep_dry_fed[integer,private]%id_dep_dry_nh4[integer,private]%id_dep_dry_no3[integer,private]%id_dep_dry_po4[integer,private]%id_dep_wet_fed[integer,private]%id_dep_wet_nh4[integer,private]%id_dep_wet_no3[integer,private]%id_dep_wet_po4[integer,private]%id_dep_wet_lith[integer,private]%id_dep_dry_lith[integer,private]%id_omega_arag[integer,private]%id_omega_calc[integer,private]%id_chl[integer,private]%id_co3_ion[integer,private]%id_htotal[integer,private]%id_irr_aclm[integer,private]%id_irr_aclm_z[integer,private]%id_irr_mem_dp[integer,private]%id_cased[integer,private]%id_cadet_arag_btf[integer,private]%id_cadet_calc_btf[integer,private]%id_fedet_btf[integer,private]%id_lithdet_btf[integer,private]%id_ndet_btf[integer,private]%id_pdet_btf[integer,private]%id_sidet_btf[integer,private]%id_jfed[integer,private]%id_jfedc[integer,private]%id_jprod_ndet[integer,private]%id_jprod_pdet[integer,private]%id_jprod_sldon[integer,private]%id_jprod_ldon[integer,private]%id_jprod_srdon[integer,private]%id_jprod_sldop[integer,private]%id_jprod_ldop[integer,private]%id_jprod_srdop[integer,private]%id_jprod_fed[integer,private]%id_jprod_fedet[integer,private]%id_jprod_sidet[integer,private]%id_jprod_sio4[integer,private]%id_jprod_lithdet[integer,private]%id_jprod_cadet_arag[integer,private]%id_jprod_cadet_calc[integer,private]%id_jprod_po4[integer,private]%id_jprod_nh4[integer,private]%id_jprod_nh4_plus_btm[integer,private]%id_net_phyto_resp[integer,private]%id_det_jzloss_n[integer,private]%id_det_jzloss_p[integer,private]%id_det_jzloss_fe[integer,private]%id_det_jzloss_si[integer,private]%id_det_jhploss_n[integer,private]%id_det_jhploss_p[integer,private]%id_det_jhploss_fe[integer,private]%id_det_jhploss_si[integer,private]%id_jdiss_sidet[integer,private]%id_jdiss_cadet_arag[integer,private]%id_jdiss_cadet_arag_plus_btm[integer,private]%id_jdiss_cadet_calc[integer,private]%id_jdiss_cadet_calc_plus_btm[integer,private]%id_jremin_ndet[integer,private]%id_jremin_pdet[integer,private]%id_jremin_fedet[integer,private]%id_jfe_ads[integer,private]%id_jfe_coast[integer,private]%id_jfe_iceberg[integer,private]%id_jno3_iceberg[integer,private]%id_jpo4_iceberg[integer,private]%id_kfe_eq_lig[integer,private]%id_feprime[integer,private]%id_ligand[integer,private]%id_fe_sol[integer,private]%id_expkt[integer,private]%id_expkremint[integer,private]%id_hp_temp_lim[integer,private]%id_hp_o2lim[integer,private]%id_hp_jingest_n[integer,private]%id_hp_jingest_p[integer,private]%id_hp_jingest_fe[integer,private]%id_hp_jingest_sio2[integer,private]%id_irr_inst[integer,private]%id_irr_mix[integer,private]%id_irr_aclm_inst[integer,private]%id_chl2sfcchl[integer,private]%id_jalk[integer,private]%id_jalkc[integer,private]%id_jalk_plus_btm[integer,private]%id_jdic[integer,private]%id_jdicc[integer,private]%id_jno3c[integer,private]%id_jpo4c[integer,private]%id_jsio4c[integer,private]%id_jdic_plus_btm[integer,private]%id_jnh4[integer,private]%id_jndet[integer,private]%id_jnh4_plus_btm[integer,private]%id_jno3denit_wc[integer,private]%id_juptake_no3amx[integer,private]%id_juptake_nh4amx[integer,private]%id_jprod_n2amx[integer,private]%id_juptake_nh4nitrif[integer,private]%id_jprod_no3nitrif[integer,private]%id_jo2resp_wc[integer,private]%id_co2_csurf[integer,private]%id_pco2_csurf[integer,private]%id_co2_alpha[integer,private]%id_nh3_csurf[integer,private]%id_nh3_alpha[integer,private]%id_fcadet_arag[integer,private]%id_fcadet_calc[integer,private]%id_ffedet[integer,private]%id_fndet[integer,private]%id_fpdet[integer,private]%id_fsidet[integer,private]%id_fntot[integer,private]%id_fptot[integer,private]%id_fsitot[integer,private]%id_ffetot[integer,private]%id_flithdet[integer,private]%id_fcadet_arag_btm[integer,private]%id_fcadet_calc_btm[integer,private]%id_ffedet_btm[integer,private]%id_flithdet_btm[integer,private]%id_fndet_btm[integer,private]%id_fpdet_btm[integer,private]%id_fsidet_btm[integer,private]%id_fntot_btm[integer,private]%id_fptot_btm[integer,private]%id_ffetot_btm[integer,private]%id_fsitot_btm[integer,private]%id_fcased_burial[integer,private]%id_fcased_redis[integer,private]%id_fcased_redis_surfresp[integer,private]%id_cased_redis_coef[integer,private]%id_cased_redis_delz[integer,private]%id_ffe_sed[integer,private]%id_ffe_geotherm[integer,private]%id_ffe_iceberg[integer,private]%id_fnfeso4red_sed[integer,private]%id_fno3denit_sed[integer,private]%id_fnoxic_sed[integer,private]%id_frac_burial[integer,private]%id_fn_burial[integer,private]%id_fp_burial[integer,private]%id_nphyto_tot[integer,private]%id_no3_in_source[integer,private]%id_pco2surf[integer,private]%id_pnh3surf[integer,private]%id_sfc_alk[integer,private]%id_sfc_cadet_arag[integer,private]%id_sfc_cadet_calc[integer,private]%id_sfc_dic[integer,private]%id_sfc_fed[integer,private]%id_sfc_ldon[integer,private]%id_sfc_sldon[integer,private]%id_sfc_srdon[integer,private]%id_sfc_no3[integer,private]%id_sfc_nh4[integer,private]%id_sfc_po4[integer,private]%id_sfc_sio4[integer,private]%id_sfc_htotal[integer,private]%id_sfc_o2[integer,private]%id_sfc_chl[integer,private]%id_sfc_irr[integer,private]%id_sfc_irr_aclm[integer,private]%id_sfc_irr_mem_dp[integer,private]%id_sfc_temp[integer,private]%id_btm_temp[integer,private]%id_btm_temp_old[integer,private]%id_btm_o2_old[integer,private]%id_btm_o2[integer,private]%id_btm_no3[integer,private]%id_btm_alk[integer,private]%id_btm_dic[integer,private]%id_grid_kmt_diag[integer,private]%id_k_bot_diag[integer,private]%id_rho_dzt_kmt_diag[integer,private]%id_rho_dzt_bot_diag[integer,private]%id_btm_htotal[integer,private]%id_btm_htotal_old[integer,private]%id_btm_co3_sol_arag[integer,private]%id_btm_co3_sol_arag_old[integer,private]%id_btm_co3_sol_calc[integer,private]%id_btm_co3_sol_calc_old[integer,private]%id_btm_co3_ion[integer,private]%id_btm_co3_ion_old[integer,private]%id_btm_omega_calc[integer,private]%id_btm_omega_arag[integer,private]%id_cased_2d[integer,private]%id_sfc_co3_ion[integer,private]%id_sfc_co3_sol_arag[integer,private]%id_sfc_co3_sol_calc[integer,private]%id_runoff_flux_alk[integer,private]%id_runoff_flux_dic[integer,private]%id_runoff_flux_di14c[integer,private]%id_runoff_flux_fed[integer,private]%id_runoff_flux_lith[integer,private]%id_runoff_flux_no3[integer,private]%id_runoff_flux_ldon[integer,private]%id_runoff_flux_sldon[integer,private]%id_runoff_flux_srdon[integer,private]%id_runoff_flux_ndet[integer,private]%id_runoff_flux_pdet[integer,private]%id_runoff_flux_po4[integer,private]%id_runoff_flux_ldop[integer,private]%id_runoff_flux_sldop[integer,private]%id_runoff_flux_srdop[integer,private]%id_tot_layer_int_c[integer,private]%id_tot_layer_int_fe[integer,private]%id_tot_layer_int_n[integer,private]%id_tot_layer_int_p[integer,private]%id_tot_layer_int_si[integer,private]%id_tot_layer_int_o2[integer,private]%id_tot_layer_int_alk[integer,private]%id_wc_vert_int_c[integer,private]%id_wc_vert_int_dic[integer,private]%id_wc_vert_int_doc[integer,private]%id_wc_vert_int_poc[integer,private]%id_wc_vert_int_n[integer,private]%id_wc_vert_int_p[integer,private]%id_wc_vert_int_fe[integer,private]%id_wc_vert_int_si[integer,private]%id_wc_vert_int_o2[integer,private]%id_wc_vert_int_alk[integer,private]%id_wc_vert_int_chemoautopp[integer,private]%id_wc_vert_int_npp[integer,private]%id_wc_vert_int_net_phyto_resp[integer,private]%id_wc_vert_int_jdiss_sidet[integer,private]%id_wc_vert_int_jdiss_cadet[integer,private]%id_wc_vert_int_jo2resp[integer,private]%id_wc_vert_int_jprod_cadet[integer,private]%id_wc_vert_int_jno3denit[integer,private]%id_wc_vert_int_jprod_no3nitrif[integer,private]%id_wc_vert_int_juptake_nh4[integer,private]%id_wc_vert_int_jprod_nh4[integer,private]%id_wc_vert_int_juptake_no3[integer,private]%id_wc_vert_int_nfix[integer,private]%id_wc_vert_int_jfe_iceberg[integer,private]%id_wc_vert_int_jno3_iceberg[integer,private]%id_wc_vert_int_jpo4_iceberg[integer,private]%id_wc_vert_int_jprod_n2amx[integer,private]%id_total_filter_feeding[integer,private]%id_nlg_diatoms[integer,private]%id_nmd_diatoms[integer,private]%id_jprod_allphytos_100[integer,private]%id_jprod_allphytos_200[integer,private]%id_jprod_diat_100[integer,private]%id_mld_aclm[integer,private]%id_q_si_2_n_lg_diatoms[integer,private]%id_q_si_2_n_md_diatoms[integer,private]%id_hp_jingest_n_100[integer,private]%id_hp_jremin_n_100[integer,private]%id_hp_jprod_ndet_100[integer,private]%id_jprod_lithdet_100[integer,private]%id_jprod_sidet_100[integer,private]%id_jprod_cadet_calc_100[integer,private]%id_jprod_cadet_arag_100[integer,private]%id_jprod_mesozoo_200[integer,private]%id_dp_fac[integer,private]%id_daylength[integer,private]%id_jremin_ndet_100[integer,private]%id_f_ndet_100[integer,private]%id_f_don_100[integer,private]%id_f_silg_100[integer,private]%id_f_simd_100[integer,private]%id_f_mesozoo_200[integer,private]%id_fndet_100[integer,private]%id_fpdet_100[integer,private]%id_ffedet_100[integer,private]%id_fcadet_calc_100[integer,private]%id_fcadet_arag_100[integer,private]%id_flithdet_100[integer,private]%id_fsidet_100[integer,private]%id_fntot_100[integer,private]%id_fptot_100[integer,private]%id_ffetot_100[integer,private]%id_fsitot_100[integer,private]%id_o2min[integer,private]%id_z_o2min[integer,private]%id_z_sat_arag[integer,private]%id_z_sat_calc[integer,private]%id_b_di14c[integer,private]%id_c14_2_n[integer,private]%id_c14o2_csurf[integer,private]%id_c14o2_alpha[integer,private]%id_fpo14c[integer,private]%id_j14c_decay_dic[integer,private]%id_j14c_decay_doc[integer,private]%id_j14c_reminp[integer,private]%id_jdi14c[integer,private]%id_jdo14c[integer,private]%id_di14c[integer,private]%id_do14c[integer,private]%id_f_alk_int_100[integer,private]%id_f_dic_int_100[integer,private]%id_f_din_int_100[integer,private]%id_f_fed_int_100[integer,private]%id_f_po4_int_100[integer,private]%id_f_sio4_int_100[integer,private]%id_jo2_plus_btm[integer,private]%id_jo2[integer,private]%id_jo2c[integer,private]%id_jalk_100[integer,private]%id_jdic_100[integer,private]%id_jdin_100[integer,private]%id_jfed_100[integer,private]%id_jpo4_100[integer,private]%id_jsio4_100[integer,private]%id_thetao[integer,private]%id_dissic[integer,private]%id_dissicnat[integer,private]%id_dissicabio[integer,private]%id_dissi14cabio[integer,private]%id_dissoc[integer,private]%id_phyc[integer,private]%id_zooc[integer,private]%id_bacc[integer,private]%id_detoc[integer,private]%id_calc[integer,private]%id_arag[integer,private]%id_phydiat[integer,private]%id_phydiaz[integer,private]%id_phypico[integer,private]%id_phymisc[integer,private]%id_zmicro[integer,private]%id_zmeso[integer,private]%id_talk[integer,private]%id_talknat[integer,private]%id_ph[integer,private]%id_phnat[integer,private]%id_phabio[integer,private]%id_o2_cmip[integer,private]%id_o2sat[integer,private]%id_no3_cmip[integer,private]%id_pka_nh3[integer,private]%id_nh4_cmip[integer,private]%id_po4_cmip[integer,private]%id_dfe[integer,private]%id_si[integer,private]%id_chl_cmip[integer,private]%id_chldiat[integer,private]%id_chldiaz[integer,private]%id_chlpico[integer,private]%id_chlmisc[integer,private]%id_poc[integer,private]%id_pon[integer,private]%id_pop[integer,private]%id_bfe[integer,private]%id_bsi[integer,private]%id_phyn[integer,private]%id_phyp[integer,private]%id_phyfe[integer,private]%id_physi[integer,private]%id_co3[integer,private]%id_co3nat[integer,private]%id_co3abio[integer,private]%id_co3satcalc[integer,private]%id_co3satarag[integer,private]%id_pp[integer,private]%id_pnitrate[integer,private]%id_pphosphate[integer,private]%id_pbfe[integer,private]%id_pbsi[integer,private]%id_parag[integer,private]%id_pcalc[integer,private]%id_expc[integer,private]%id_expn[integer,private]%id_expp[integer,private]%id_expfe[integer,private]%id_expsi[integer,private]%id_expcalc[integer,private]%id_exparag[integer,private]%id_remoc[integer,private]%id_dcalc[integer,private]%id_darag[integer,private]%id_ppdiat[integer,private]%id_ppdiaz[integer,private]%id_pppico[integer,private]%id_ppmisc[integer,private]%id_bddtdic[integer,private]%id_bddtdin[integer,private]%id_bddtdip[integer,private]%id_bddtdife[integer,private]%id_bddtdisi[integer,private]%id_bddtalk[integer,private]%id_fescav[integer,private]%id_fediss[integer,private]%id_graz[integer,private]%id_dissicos[integer,private]%id_dissicnatos[integer,private]%id_dissicabioos[integer,private]%id_dissi14cabioos[integer,private]%id_dissocos[integer,private]%id_phycos[integer,private]%id_zoocos[integer,private]%id_baccos[integer,private]%id_detocos[integer,private]%id_calcos[integer,private]%id_aragos[integer,private]%id_phydiatos[integer,private]%id_phydiazos[integer,private]%id_phypicoos[integer,private]%id_phymiscos[integer,private]%id_zmicroos[integer,private]%id_zmesoos[integer,private]%id_talkos[integer,private]%id_talknatos[integer,private]%id_phos[integer,private]%id_phnatos[integer,private]%id_phabioos[integer,private]%id_o2os[integer,private]%id_o2satos[integer,private]%id_no3os[integer,private]%id_nh4os[integer,private]%id_po4os[integer,private]%id_dfeos[integer,private]%id_sios[integer,private]%id_chlos[integer,private]%id_chldiatos[integer,private]%id_chldiazos[integer,private]%id_chlpicoos[integer,private]%id_chlmiscos[integer,private]%id_ponos[integer,private]%id_popos[integer,private]%id_bfeos[integer,private]%id_bsios[integer,private]%id_phynos[integer,private]%id_phypos[integer,private]%id_phyfeos[integer,private]%id_physios[integer,private]%id_co3os[integer,private]%id_co3natos[integer,private]%id_co3abioos[integer,private]%id_co3satcalcos[integer,private]%id_co3sataragos[integer,private]%id_limndiat[integer,private]%id_limndiaz[integer,private]%id_limnpico[integer,private]%id_limnmisc[integer,private]%id_limirrdiat[integer,private]%id_limirrdiaz[integer,private]%id_limirrpico[integer,private]%id_limirrmisc[integer,private]%id_limfediat[integer,private]%id_limfediaz[integer,private]%id_limfepico[integer,private]%id_limfemisc[integer,private]%id_limpdiat[integer,private]%id_limpdiaz[integer,private]%id_limppico[integer,private]%id_limpmisc[integer,private]%id_intpp[integer,private]%id_intppnitrate[integer,private]%id_intppdiat[integer,private]%id_intppdiaz[integer,private]%id_intpppico[integer,private]%id_intppmisc[integer,private]%id_intpbn[integer,private]%id_intpbp[integer,private]%id_intpbfe[integer,private]%id_intpbsi[integer,private]%id_intpcalcite[integer,private]%id_intparag[integer,private]%id_epc100[integer,private]%id_epn100[integer,private]%id_epp100[integer,private]%id_epfe100[integer,private]%id_epsi100[integer,private]%id_epcalc100[integer,private]%id_eparag100[integer,private]%id_intdic[integer,private]%id_intdoc[integer,private]%id_intpoc[integer,private]%id_spco2[integer,private]%id_spco2nat[integer,private]%id_spco2abio[integer,private]%id_dpco2[integer,private]%id_dpco2nat[integer,private]%id_dpco2abio[integer,private]%id_dpo2[integer,private]%id_fgco2[integer,private]%id_fgco2nat[integer,private]%id_fgco2abio[integer,private]%id_fg14co2abio[integer,private]%id_fgo2[integer,private]%id_icfriver[integer,private]%id_fric[integer,private]%id_ocfriver[integer,private]%id_froc[integer,private]%id_intpn2[integer,private]%id_fsn[integer,private]%id_frn[integer,private]%id_fsfe[integer,private]%id_frfe[integer,private]%id_zo2min[integer,private]%id_zsatcalc[integer,private]%id_zsatarag[integer,private]%id_fddtdic[integer,private]%id_fddtdin[integer,private]%id_fddtdip[integer,private]%id_fddtdife[integer,private]%id_fddtdisi[integer,private]%id_fddtalk[integer,private]%id_fbddtdic[integer,private]%id_fbddtdin[integer,private]%id_fbddtdip[integer,private]%id_fbddtdife[integer,private]%id_fbddtdisi[integer,private]%id_fbddtalk[integer,private]
-
type
generic_cobalt/vardesc¶ An auxiliary type for storing varible names.
- Type fields
%name[character(len=fm_string_len)] :: The variable name in a NetCDF file.%longname[character(len=fm_string_len)] :: The long name of that variable.%hor_grid[character(len=1)] :: The hor. grid: u, v, h, q, or 1.%z_grid[character(len=1)] :: The vert. grid: L, i, or 1.%t_grid[character(len=1)] :: The time description: s, a, m, or 1.%units[character(len=fm_string_len)] :: The dimensions of the variable.%mem_size[character(len=1)] :: The size in memory: d or f.
7.1.3.5. Function/Subroutine Documentation¶
-
subroutine
generic_cobalt/generic_cobalt_register(tracer_list)¶ - Call to
co2_calcdo_14cmod_nameuser_add_tracers
-
subroutine
generic_cobalt/generic_cobalt_init(tracer_list, force_update_fluxes)¶ - Call to
cobaltdo_nh3_atm_ocean_exchangedo_nh3_diagid_clock_bacteria_growthid_clock_ballast_loopsid_clock_carbon_calculationsid_clock_cobalt_calc_diagnosticsid_clock_cobalt_send_diagnosticsid_clock_other_lossesid_clock_phyto_growthid_clock_production_loopid_clock_source_sink_loop1id_clock_source_sink_loop2id_clock_source_sink_loop3id_clock_source_sink_loop4id_clock_source_sink_loop5id_clock_source_sink_loop6id_clock_zooplankton_calculationsscheme_nitrifuser_add_paramsuser_allocate_arrays
-
subroutine
generic_cobalt/generic_cobalt_register_diag(diag_list)¶ - Call to
bactcobaltdiazodo_14clargemediummissing_value1package_namephytosmallzoo
-
subroutine
generic_cobalt/user_add_paramsNone()¶ - Call to
as_param_cobaltbactcobaltdiazogamma_nitrifirr_inhibitk_nh3_nitrifk_o2_nitlargemediumo2_min_nitpackage_namephytosmallsperdsperyzoo- Called from
-
subroutine
generic_cobalt/user_add_tracers(tracer_list)¶ - Call to
as_param_cobaltcobaltdo_14cdo_nh3_atm_ocean_exchangepackage_namescheme_nitrifsperdvb_nh3- Called from
-
subroutine
generic_cobalt/generic_cobalt_update_from_coupler(tracer_list)¶
-
subroutine
generic_cobalt/generic_cobalt_update_from_bottom(tracer_list, dt, tau, model_time)¶ - Call to
cobaltdiazolargemediumphytosmall
-
subroutine
generic_cobalt/generic_cobalt_update_from_source(tracer_list, Temp, Salt, rho_dzt, dzt, hblt_depth, ilb, jlb, tau, dt, grid_dat, model_time, nbands, max_wavelength_band, sw_pen_band, opacity_band, internal_heat, frunoff, geolat, eqn_of_state)¶ - Parameters
eqn_of_state :: [in] Equation of state structure
- Call to
bactcalc_pka_nh3co2_calcco2_dope_veccobaltdiazodo_14cdo_nh3_atm_ocean_exchangedo_nh3_diagdo_vertfill_preepslng_tracer_utils::g_tracer_get_nextg_tracer_utils::g_tracer_is_progg_tracer_utils::g_tracer_vertfillid_clock_bacteria_growthid_clock_ballast_loopsid_clock_carbon_calculationsid_clock_cobalt_calc_diagnosticsid_clock_cobalt_send_diagnosticsid_clock_other_lossesid_clock_phyto_growthid_clock_production_loopid_clock_source_sink_loop1id_clock_source_sink_loop2id_clock_source_sink_loop3id_clock_source_sink_loop4id_clock_source_sink_loop5id_clock_source_sink_loop6id_clock_zooplankton_calculationsimbalance_tolerancelargemediummissing_value1num_phytonum_preynum_zoophytosaltout_correctionscheme_nitrifscheme_no3_nh4_limsmallsperdsperyvb_nh3zoo
-
subroutine
generic_cobalt/generic_cobalt_set_boundary_values(tracer_list, SST, SSS, rho, ilb, jlb, tau, dzt, model_time)¶ - Call to
as_param_cobaltcalc_pka_nh3co2_calcco2_dope_veccobaltdo_14cdo_nh3_atm_ocean_exchangeepslnsaltout_correctionschmidt_wvb_nh3
-
subroutine
generic_cobalt/generic_cobalt_endNone()¶ - Call to
user_deallocate_arrays
-
subroutine
generic_cobalt/user_allocate_arraysNone()¶ - Call to
bactco2_dope_veccobaltdiazodo_14cdo_nh3_diaglargemediumnum_phytonum_zoophytozoo- Called from
-
subroutine
generic_cobalt/user_deallocate_arraysNone()¶ - Call to
bactcobaltdiazodo_14clargemediumnum_phytonum_zoophytozoo- Called from
generic_cobalt_end
-
function
generic_cobalt/calc_pka_nh3(tc, salt) [real]¶
-
function
generic_cobalt/saltout_correction(kh, vb, salt) [real]¶ salting out correction for solubility (Johnson 2010, Ocean Science)
-
function
generic_cobalt/schmidt_w(t, s, vb, rho) [real]¶ - Call to
- Called from