7.1.3. generic_cobalt module reference

Generic version of the COBALTv3.0 that includes 4 phytoplankton functional groups and photoacclimation and photoadaptation improvements.

More…

7.1.3.1. Data Types

phytoplankton

phytoplankton data type

zooplankton

zooplankton data type

bacteria

bacteria data type

generic_cobalt_type

data type for other variables used in generic_cobalt() module module

vardesc

An auxiliary type for storing varible names.

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_calc do_14c mod_name user_add_tracers

subroutine generic_cobalt/generic_cobalt_init(tracer_list, force_update_fluxes)
Call to

cobalt do_nh3_atm_ocean_exchange do_nh3_diag id_clock_bacteria_growth id_clock_ballast_loops id_clock_carbon_calculations id_clock_cobalt_calc_diagnostics id_clock_cobalt_send_diagnostics id_clock_other_losses id_clock_phyto_growth id_clock_production_loop id_clock_source_sink_loop1 id_clock_source_sink_loop2 id_clock_source_sink_loop3 id_clock_source_sink_loop4 id_clock_source_sink_loop5 id_clock_source_sink_loop6 id_clock_zooplankton_calculations scheme_nitrif user_add_params user_allocate_arrays

subroutine generic_cobalt/generic_cobalt_register_diag(diag_list)
Call to

bact cobalt diazo do_14c large medium missing_value1 package_name phyto small zoo

subroutine generic_cobalt/user_add_paramsNone()
Call to

as_param_cobalt bact cobalt diazo gamma_nitrif irr_inhibit k_nh3_nitrif k_o2_nit large medium o2_min_nit package_name phyto small sperd spery zoo

Called from

generic_cobalt_init

subroutine generic_cobalt/user_add_tracers(tracer_list)
Call to

as_param_cobalt cobalt do_14c do_nh3_atm_ocean_exchange package_name scheme_nitrif sperd vb_nh3

Called from

generic_cobalt_register

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

cobalt diazo large medium phyto small

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

bact calc_pka_nh3 co2_calc co2_dope_vec cobalt diazo do_14c do_nh3_atm_ocean_exchange do_nh3_diag do_vertfill_pre epsln g_tracer_utils::g_tracer_get_next g_tracer_utils::g_tracer_is_prog g_tracer_utils::g_tracer_vertfill id_clock_bacteria_growth id_clock_ballast_loops id_clock_carbon_calculations id_clock_cobalt_calc_diagnostics id_clock_cobalt_send_diagnostics id_clock_other_losses id_clock_phyto_growth id_clock_production_loop id_clock_source_sink_loop1 id_clock_source_sink_loop2 id_clock_source_sink_loop3 id_clock_source_sink_loop4 id_clock_source_sink_loop5 id_clock_source_sink_loop6 id_clock_zooplankton_calculations imbalance_tolerance large medium missing_value1 num_phyto num_prey num_zoo phyto saltout_correction scheme_nitrif scheme_no3_nh4_lim small sperd spery vb_nh3 zoo

subroutine generic_cobalt/generic_cobalt_set_boundary_values(tracer_list, SST, SSS, rho, ilb, jlb, tau, dzt, model_time)
Call to

as_param_cobalt calc_pka_nh3 co2_calc co2_dope_vec cobalt do_14c do_nh3_atm_ocean_exchange epsln saltout_correction schmidt_w vb_nh3

subroutine generic_cobalt/generic_cobalt_endNone()
Call to

user_deallocate_arrays

subroutine generic_cobalt/user_allocate_arraysNone()
Call to

bact co2_dope_vec cobalt diazo do_14c do_nh3_diag large medium num_phyto num_zoo phyto zoo

Called from

generic_cobalt_init

subroutine generic_cobalt/user_deallocate_arraysNone()
Call to

bact cobalt diazo do_14c large medium num_phyto num_zoo phyto zoo

Called from

generic_cobalt_end

function generic_cobalt/calc_pka_nh3(tc, salt) [real]
Called from

generic_cobalt_set_boundary_values generic_cobalt_update_from_source

function generic_cobalt/saltout_correction(kh, vb, salt) [real]

salting out correction for solubility (Johnson 2010, Ocean Science)

Called from

generic_cobalt_set_boundary_values generic_cobalt_update_from_source

function generic_cobalt/schmidt_w(t, s, vb, rho) [real]
Call to

d_hm d_wc v_sw

Called from

generic_cobalt_set_boundary_values

function generic_cobalt/v_sw(t, s, rho) [real]
Call to

n_sw p_sw

Called from

schmidt_w

function generic_cobalt/p_sw(t, s) [real]
Called from

v_sw

function generic_cobalt/d_wc(t, s, vb) [real]
Call to

n_sw

Called from

schmidt_w

function generic_cobalt/d_hm(t, s, vb) [real]
Call to

n_sw

Called from

schmidt_w

function generic_cobalt/n_sw(t, s) [real]
Called from

d_hm d_wc v_sw