carbon_module.f90 Source File


Files dependent on this one

sourcefile~~carbon_module.f90~~AfferentGraph sourcefile~carbon_module.f90 carbon_module.f90 sourcefile~basin_output.f90 basin_output.f90 sourcefile~basin_output.f90->sourcefile~carbon_module.f90 sourcefile~carbon_read.f90 carbon_read.f90 sourcefile~carbon_read.f90->sourcefile~carbon_module.f90 sourcefile~cbn_zhang2.f90 cbn_zhang2.f90 sourcefile~cbn_zhang2.f90->sourcefile~carbon_module.f90 sourcefile~organic_mineral_mass_module.f90 organic_mineral_mass_module.f90 sourcefile~cbn_zhang2.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~soil_module.f90 soil_module.f90 sourcefile~cbn_zhang2.f90->sourcefile~soil_module.f90 sourcefile~hru_allo.f90 hru_allo.f90 sourcefile~hru_allo.f90->sourcefile~carbon_module.f90 sourcefile~hru_allo.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~hru_allo.f90->sourcefile~soil_module.f90 sourcefile~hru_carbon_output.f90 hru_carbon_output.f90 sourcefile~hru_carbon_output.f90->sourcefile~carbon_module.f90 sourcefile~hru_carbon_output.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~hru_carbon_output.f90->sourcefile~soil_module.f90 sourcefile~hru_control.f90 hru_control.f90 sourcefile~hru_control.f90->sourcefile~carbon_module.f90 sourcefile~hru_control.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~hru_control.f90->sourcefile~soil_module.f90 sourcefile~hru_output.f90 hru_output.f90 sourcefile~hru_output.f90->sourcefile~carbon_module.f90 sourcefile~hru_output.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~hru_output.f90->sourcefile~soil_module.f90 sourcefile~hru_output_allo.f90 hru_output_allo.f90 sourcefile~hru_output_allo.f90->sourcefile~carbon_module.f90 sourcefile~mgt_harvbiomass.f90 mgt_harvbiomass.f90 sourcefile~mgt_harvbiomass.f90->sourcefile~carbon_module.f90 sourcefile~mgt_harvbiomass.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~mgt_harvbiomass.f90->sourcefile~soil_module.f90 sourcefile~mgt_harvgrain.f90 mgt_harvgrain.f90 sourcefile~mgt_harvgrain.f90->sourcefile~carbon_module.f90 sourcefile~mgt_harvgrain.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~mgt_harvresidue.f90 mgt_harvresidue.f90 sourcefile~mgt_harvresidue.f90->sourcefile~carbon_module.f90 sourcefile~mgt_harvresidue.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~mgt_harvtuber.f90 mgt_harvtuber.f90 sourcefile~mgt_harvtuber.f90->sourcefile~carbon_module.f90 sourcefile~mgt_harvtuber.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~mgt_harvtuber.f90->sourcefile~soil_module.f90 sourcefile~mgt_killop.f90 mgt_killop.f90 sourcefile~mgt_killop.f90->sourcefile~carbon_module.f90 sourcefile~mgt_killop.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~mgt_killop.f90->sourcefile~soil_module.f90 sourcefile~nut_orgnc2.f90 nut_orgnc2.f90 sourcefile~nut_orgnc2.f90->sourcefile~carbon_module.f90 sourcefile~nut_orgnc2.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~nut_orgnc2.f90->sourcefile~soil_module.f90 sourcefile~organic_mineral_mass_module.f90->sourcefile~carbon_module.f90 sourcefile~pl_biomass_gro.f90 pl_biomass_gro.f90 sourcefile~pl_biomass_gro.f90->sourcefile~carbon_module.f90 sourcefile~pl_biomass_gro.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~pl_burnop.f90 pl_burnop.f90 sourcefile~pl_burnop.f90->sourcefile~carbon_module.f90 sourcefile~pl_burnop.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~pl_burnop.f90->sourcefile~soil_module.f90 sourcefile~pl_graze.f90 pl_graze.f90 sourcefile~pl_graze.f90->sourcefile~carbon_module.f90 sourcefile~pl_graze.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~pl_graze.f90->sourcefile~soil_module.f90 sourcefile~pl_grow.f90 pl_grow.f90 sourcefile~pl_grow.f90->sourcefile~carbon_module.f90 sourcefile~pl_grow.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~pl_leaf_gro.f90 pl_leaf_gro.f90 sourcefile~pl_leaf_gro.f90->sourcefile~carbon_module.f90 sourcefile~pl_leaf_gro.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~pl_leaf_senes.f90 pl_leaf_senes.f90 sourcefile~pl_leaf_senes.f90->sourcefile~carbon_module.f90 sourcefile~pl_leaf_senes.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~pl_mortality.f90 pl_mortality.f90 sourcefile~pl_mortality.f90->sourcefile~carbon_module.f90 sourcefile~pl_mortality.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~pl_mortality.f90->sourcefile~soil_module.f90 sourcefile~pl_partition.f90 pl_partition.f90 sourcefile~pl_partition.f90->sourcefile~carbon_module.f90 sourcefile~pl_partition.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~pl_root_gro.f90 pl_root_gro.f90 sourcefile~pl_root_gro.f90->sourcefile~carbon_module.f90 sourcefile~pl_root_gro.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~pl_root_gro.f90->sourcefile~soil_module.f90 sourcefile~rsd_decomp.f90 rsd_decomp.f90 sourcefile~rsd_decomp.f90->sourcefile~carbon_module.f90 sourcefile~rsd_decomp.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~rsd_decomp.f90->sourcefile~soil_module.f90 sourcefile~sim_initday.f90 sim_initday.f90 sourcefile~sim_initday.f90->sourcefile~carbon_module.f90 sourcefile~sim_initday.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~sim_initday.f90->sourcefile~soil_module.f90 sourcefile~soil_module.f90->sourcefile~carbon_module.f90 sourcefile~soil_nutcarb_write.f90 soil_nutcarb_write.f90 sourcefile~soil_nutcarb_write.f90->sourcefile~carbon_module.f90 sourcefile~soil_nutcarb_write.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~soil_nutcarb_write.f90->sourcefile~soil_module.f90 sourcefile~swr_subwq.f90 swr_subwq.f90 sourcefile~swr_subwq.f90->sourcefile~carbon_module.f90 sourcefile~swr_subwq.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~swr_subwq.f90->sourcefile~soil_module.f90 sourcefile~actions.f90 actions.f90 sourcefile~actions.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~actions.f90->sourcefile~soil_module.f90 sourcefile~albedo.f90 albedo.f90 sourcefile~albedo.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~albedo.f90->sourcefile~soil_module.f90 sourcefile~basin_read_objs.f90 basin_read_objs.f90 sourcefile~basin_read_objs.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~basin_sw_init.f90 basin_sw_init.f90 sourcefile~basin_sw_init.f90->sourcefile~soil_module.f90 sourcefile~cal_allo_init.f90 cal_allo_init.f90 sourcefile~cal_allo_init.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~cal_allo_init.f90->sourcefile~soil_module.f90 sourcefile~cal_conditions.f90 cal_conditions.f90 sourcefile~cal_conditions.f90->sourcefile~soil_module.f90 sourcefile~cal_parm_select.f90 cal_parm_select.f90 sourcefile~cal_parm_select.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~cal_parm_select.f90->sourcefile~soil_module.f90 sourcefile~calsoft_control.f90 calsoft_control.f90 sourcefile~calsoft_control.f90->sourcefile~soil_module.f90 sourcefile~calsoft_hyd.f90 calsoft_hyd.f90 sourcefile~calsoft_hyd.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~calsoft_hyd.f90->sourcefile~soil_module.f90 sourcefile~calsoft_hyd_bfr.f90 calsoft_hyd_bfr.f90 sourcefile~calsoft_hyd_bfr.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~calsoft_hyd_bfr.f90->sourcefile~soil_module.f90 sourcefile~calsoft_hyd_bfr_et.f90 calsoft_hyd_bfr_et.f90 sourcefile~calsoft_hyd_bfr_et.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~calsoft_hyd_bfr_et.f90->sourcefile~soil_module.f90 sourcefile~calsoft_hyd_bfr_latq.f90 calsoft_hyd_bfr_latq.f90 sourcefile~calsoft_hyd_bfr_latq.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~calsoft_hyd_bfr_latq.f90->sourcefile~soil_module.f90 sourcefile~calsoft_hyd_bfr_perc.f90 calsoft_hyd_bfr_perc.f90 sourcefile~calsoft_hyd_bfr_perc.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~calsoft_hyd_bfr_perc.f90->sourcefile~soil_module.f90 sourcefile~calsoft_hyd_bfr_pet.f90 calsoft_hyd_bfr_pet.f90 sourcefile~calsoft_hyd_bfr_pet.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~calsoft_hyd_bfr_pet.f90->sourcefile~soil_module.f90 sourcefile~calsoft_hyd_bfr_surq.f90 calsoft_hyd_bfr_surq.f90 sourcefile~calsoft_hyd_bfr_surq.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~calsoft_hyd_bfr_surq.f90->sourcefile~soil_module.f90 sourcefile~calsoft_plant.f90 calsoft_plant.f90 sourcefile~calsoft_plant.f90->sourcefile~soil_module.f90 sourcefile~calsoft_read_codes.f90 calsoft_read_codes.f90 sourcefile~calsoft_read_codes.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~calsoft_read_codes.f90->sourcefile~soil_module.f90 sourcefile~calsoft_sed.f90 calsoft_sed.f90 sourcefile~calsoft_sed.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~calsoft_sed.f90->sourcefile~soil_module.f90 sourcefile~cn2_init.f90 cn2_init.f90 sourcefile~cn2_init.f90->sourcefile~soil_module.f90 sourcefile~cn2_init_all.f90 cn2_init_all.f90 sourcefile~cn2_init_all.f90->sourcefile~soil_module.f90 sourcefile~command.f90 command.f90 sourcefile~command.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~command.f90->sourcefile~soil_module.f90 sourcefile~conditions.f90 conditions.f90 sourcefile~conditions.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~conditions.f90->sourcefile~soil_module.f90 sourcefile~cs_balance.f90 cs_balance.f90 sourcefile~cs_balance.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~cs_balance.f90->sourcefile~soil_module.f90 sourcefile~cs_cha_read.f90 cs_cha_read.f90 sourcefile~cs_cha_read.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~cs_hru_init.f90 cs_hru_init.f90 sourcefile~cs_hru_init.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~cs_hru_init.f90->sourcefile~soil_module.f90 sourcefile~cs_lch.f90 cs_lch.f90 sourcefile~cs_lch.f90->sourcefile~soil_module.f90 sourcefile~cs_rain.f90 cs_rain.f90 sourcefile~cs_rain.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~cs_rctn_aqu.f90 cs_rctn_aqu.f90 sourcefile~cs_rctn_aqu.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~cs_rctn_hru.f90 cs_rctn_hru.f90 sourcefile~cs_rctn_hru.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~cs_rctn_hru.f90->sourcefile~soil_module.f90 sourcefile~cs_sed.f90 cs_sed.f90 sourcefile~cs_sed.f90->sourcefile~soil_module.f90 sourcefile~cs_sorb_aqu.f90 cs_sorb_aqu.f90 sourcefile~cs_sorb_aqu.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~cs_sorb_hru.f90 cs_sorb_hru.f90 sourcefile~cs_sorb_hru.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~cs_sorb_hru.f90->sourcefile~soil_module.f90 sourcefile~cs_uptake.f90 cs_uptake.f90 sourcefile~cs_uptake.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~cs_uptake.f90->sourcefile~soil_module.f90 sourcefile~dr_read.f90 dr_read.f90 sourcefile~dr_read.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~dr_read_hmet.f90 dr_read_hmet.f90 sourcefile~dr_read_hmet.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~dr_read_om.f90 dr_read_om.f90 sourcefile~dr_read_om.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~dr_read_path.f90 dr_read_path.f90 sourcefile~dr_read_path.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~dr_read_pest.f90 dr_read_pest.f90 sourcefile~dr_read_pest.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~dr_read_salt.f90 dr_read_salt.f90 sourcefile~dr_read_salt.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~ero_ovrsed.f90 ero_ovrsed.f90 sourcefile~ero_ovrsed.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~ero_ovrsed.f90->sourcefile~soil_module.f90 sourcefile~ero_ysed.f90 ero_ysed.f90 sourcefile~ero_ysed.f90->sourcefile~soil_module.f90 sourcefile~et_act.f90 et_act.f90 sourcefile~et_act.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~et_act.f90->sourcefile~soil_module.f90 sourcefile~exco_read.f90 exco_read.f90 sourcefile~exco_read.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~exco_read_hmet.f90 exco_read_hmet.f90 sourcefile~exco_read_hmet.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~exco_read_om.f90 exco_read_om.f90 sourcefile~exco_read_om.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~exco_read_path.f90 exco_read_path.f90 sourcefile~exco_read_path.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~exco_read_pest.f90 exco_read_pest.f90 sourcefile~exco_read_pest.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~exco_read_salt.f90 exco_read_salt.f90 sourcefile~exco_read_salt.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~gwflow_ppag.f90 gwflow_ppag.f90 sourcefile~gwflow_ppag.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~gwflow_simulate.f90 gwflow_simulate.f90 sourcefile~gwflow_simulate.f90->sourcefile~soil_module.f90 sourcefile~gwflow_soil.f90 gwflow_soil.f90 sourcefile~gwflow_soil.f90->sourcefile~soil_module.f90 sourcefile~hyd_connect.f90 hyd_connect.f90 sourcefile~hyd_connect.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~hydro_init.f90 hydro_init.f90 sourcefile~hydro_init.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~hydro_init.f90->sourcefile~soil_module.f90 sourcefile~layersplit.f90 layersplit.f90 sourcefile~layersplit.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~layersplit.f90->sourcefile~soil_module.f90 sourcefile~lsreg_output.f90 lsreg_output.f90 sourcefile~lsreg_output.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~mallo_control.f90 mallo_control.f90 sourcefile~mallo_control.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~mallo_control.f90->sourcefile~soil_module.f90 sourcefile~mgt_newtillmix.f90 mgt_newtillmix.f90 sourcefile~mgt_newtillmix.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~mgt_newtillmix.f90->sourcefile~soil_module.f90 sourcefile~mgt_newtillmix_wet.f90 mgt_newtillmix_wet.f90 sourcefile~mgt_newtillmix_wet.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~mgt_newtillmix_wet.f90->sourcefile~soil_module.f90 sourcefile~mgt_plantop.f90 mgt_plantop.f90 sourcefile~mgt_plantop.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~mgt_plantop.f90->sourcefile~soil_module.f90 sourcefile~mgt_sched.f90 mgt_sched.f90 sourcefile~mgt_sched.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~mgt_sched.f90->sourcefile~soil_module.f90 sourcefile~mgt_tillfactor.f90 mgt_tillfactor.f90 sourcefile~mgt_tillfactor.f90->sourcefile~soil_module.f90 sourcefile~mgt_transplant.f90 mgt_transplant.f90 sourcefile~mgt_transplant.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~nut_denit.f90 nut_denit.f90 sourcefile~nut_denit.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~nut_denit.f90->sourcefile~soil_module.f90 sourcefile~nut_nitvol.f90 nut_nitvol.f90 sourcefile~nut_nitvol.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~nut_nitvol.f90->sourcefile~soil_module.f90 sourcefile~nut_nlch.f90 nut_nlch.f90 sourcefile~nut_nlch.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~nut_nlch.f90->sourcefile~soil_module.f90 sourcefile~nut_nminrl.f90 nut_nminrl.f90 sourcefile~nut_nminrl.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~nut_nminrl.f90->sourcefile~soil_module.f90 sourcefile~nut_nrain.f90 nut_nrain.f90 sourcefile~nut_nrain.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~nut_orgn.f90 nut_orgn.f90 sourcefile~nut_orgn.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~nut_orgn.f90->sourcefile~soil_module.f90 sourcefile~nut_orgnc.f90 nut_orgnc.f90 sourcefile~nut_orgnc.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~nut_orgnc.f90->sourcefile~soil_module.f90 sourcefile~nut_pminrl.f90 nut_pminrl.f90 sourcefile~nut_pminrl.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~nut_pminrl.f90->sourcefile~soil_module.f90 sourcefile~nut_pminrl2.f90 nut_pminrl2.f90 sourcefile~nut_pminrl2.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~nut_pminrl2.f90->sourcefile~soil_module.f90 sourcefile~nut_psed.f90 nut_psed.f90 sourcefile~nut_psed.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~nut_psed.f90->sourcefile~soil_module.f90 sourcefile~nut_solp.f90 nut_solp.f90 sourcefile~nut_solp.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~nut_solp.f90->sourcefile~soil_module.f90 sourcefile~obj_output.f90 obj_output.f90 sourcefile~obj_output.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~obj_output.f90->sourcefile~soil_module.f90 sourcefile~path_apply.f90 path_apply.f90 sourcefile~path_apply.f90->sourcefile~soil_module.f90 sourcefile~path_cha_res_read.f90 path_cha_res_read.f90 sourcefile~path_cha_res_read.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~path_ls_process.f90 path_ls_process.f90 sourcefile~path_ls_process.f90->sourcefile~soil_module.f90 sourcefile~path_ls_runoff.f90 path_ls_runoff.f90 sourcefile~path_ls_runoff.f90->sourcefile~soil_module.f90 sourcefile~path_ls_swrouting.f90 path_ls_swrouting.f90 sourcefile~path_ls_swrouting.f90->sourcefile~soil_module.f90 sourcefile~pathogen_init.f90 pathogen_init.f90 sourcefile~pathogen_init.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~pathogen_init.f90->sourcefile~soil_module.f90 sourcefile~pest_apply.f90 pest_apply.f90 sourcefile~pest_apply.f90->sourcefile~soil_module.f90 sourcefile~pest_cha_res_read.f90 pest_cha_res_read.f90 sourcefile~pest_cha_res_read.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~pest_decay.f90 pest_decay.f90 sourcefile~pest_decay.f90->sourcefile~soil_module.f90 sourcefile~pest_lch.f90 pest_lch.f90 sourcefile~pest_lch.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~pest_lch.f90->sourcefile~soil_module.f90 sourcefile~pest_pesty.f90 pest_pesty.f90 sourcefile~pest_pesty.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~pest_pesty.f90->sourcefile~soil_module.f90 sourcefile~pest_pl_up.f90 pest_pl_up.f90 sourcefile~pest_pl_up.f90->sourcefile~soil_module.f90 sourcefile~pest_soil_tot.f90 pest_soil_tot.f90 sourcefile~pest_soil_tot.f90->sourcefile~soil_module.f90 sourcefile~pest_washp.f90 pest_washp.f90 sourcefile~pest_washp.f90->sourcefile~soil_module.f90 sourcefile~pesticide_init.f90 pesticide_init.f90 sourcefile~pesticide_init.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~pesticide_init.f90->sourcefile~soil_module.f90 sourcefile~pl_community.f90 pl_community.f90 sourcefile~pl_community.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~pl_community.f90->sourcefile~soil_module.f90 sourcefile~pl_dormant.f90 pl_dormant.f90 sourcefile~pl_dormant.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~pl_fert.f90 pl_fert.f90 sourcefile~pl_fert.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~pl_fert_wet.f90 pl_fert_wet.f90 sourcefile~pl_fert_wet.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~pl_manure.f90 pl_manure.f90 sourcefile~pl_manure.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~pl_nfix.f90 pl_nfix.f90 sourcefile~pl_nfix.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~pl_nfix.f90->sourcefile~soil_module.f90 sourcefile~pl_nup.f90 pl_nup.f90 sourcefile~pl_nup.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~pl_nup.f90->sourcefile~soil_module.f90 sourcefile~pl_nupd.f90 pl_nupd.f90 sourcefile~pl_nupd.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~pl_nut_demand.f90 pl_nut_demand.f90 sourcefile~pl_nut_demand.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~pl_nut_demand.f90->sourcefile~soil_module.f90 sourcefile~pl_pup.f90 pl_pup.f90 sourcefile~pl_pup.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~pl_pup.f90->sourcefile~soil_module.f90 sourcefile~pl_pupd.f90 pl_pupd.f90 sourcefile~pl_pupd.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~pl_rootfr.f90 pl_rootfr.f90 sourcefile~pl_rootfr.f90->sourcefile~soil_module.f90 sourcefile~pl_waterup.f90 pl_waterup.f90 sourcefile~pl_waterup.f90->sourcefile~soil_module.f90 sourcefile~plant_init.f90 plant_init.f90 sourcefile~plant_init.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~plant_init.f90->sourcefile~soil_module.f90 sourcefile~proc_hru.f90 proc_hru.f90 sourcefile~proc_hru.f90->sourcefile~soil_module.f90 sourcefile~re_initialize.f90 re_initialize.f90 sourcefile~re_initialize.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~re_initialize.f90->sourcefile~soil_module.f90 sourcefile~recall_read.f90 recall_read.f90 sourcefile~recall_read.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~recall_read_cs.f90 recall_read_cs.f90 sourcefile~recall_read_cs.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~recall_read_salt.f90 recall_read_salt.f90 sourcefile~recall_read_salt.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~res_hydro.f90 res_hydro.f90 sourcefile~res_hydro.f90->sourcefile~soil_module.f90 sourcefile~res_weir_release.f90 res_weir_release.f90 sourcefile~res_weir_release.f90->sourcefile~soil_module.f90 sourcefile~rls_routeaqu.f90 rls_routeaqu.f90 sourcefile~rls_routeaqu.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~rls_routeaqu.f90->sourcefile~soil_module.f90 sourcefile~rls_routesoil.f90 rls_routesoil.f90 sourcefile~rls_routesoil.f90->sourcefile~soil_module.f90 sourcefile~rls_routetile.f90 rls_routetile.f90 sourcefile~rls_routetile.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~rls_routetile.f90->sourcefile~soil_module.f90 sourcefile~salt_balance.f90 salt_balance.f90 sourcefile~salt_balance.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~salt_balance.f90->sourcefile~soil_module.f90 sourcefile~salt_cha_read.f90 salt_cha_read.f90 sourcefile~salt_cha_read.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~salt_chem_aqu.f90 salt_chem_aqu.f90 sourcefile~salt_chem_aqu.f90->sourcefile~soil_module.f90 sourcefile~salt_chem_hru.f90 salt_chem_hru.f90 sourcefile~salt_chem_hru.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~salt_chem_hru.f90->sourcefile~soil_module.f90 sourcefile~salt_chem_soil_single.f90 salt_chem_soil_single.f90 sourcefile~salt_chem_soil_single.f90->sourcefile~soil_module.f90 sourcefile~salt_hru_init.f90 salt_hru_init.f90 sourcefile~salt_hru_init.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~salt_hru_init.f90->sourcefile~soil_module.f90 sourcefile~salt_lch.f90 salt_lch.f90 sourcefile~salt_lch.f90->sourcefile~soil_module.f90 sourcefile~salt_rain.f90 salt_rain.f90 sourcefile~salt_rain.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~salt_roadsalt.f90 salt_roadsalt.f90 sourcefile~salt_roadsalt.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~salt_uptake.f90 salt_uptake.f90 sourcefile~salt_uptake.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~salt_uptake.f90->sourcefile~soil_module.f90 sourcefile~sep_biozone.f90 sep_biozone.f90 sourcefile~sep_biozone.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~sep_biozone.f90->sourcefile~soil_module.f90 sourcefile~smp_filter.f90 smp_filter.f90 sourcefile~smp_filter.f90->sourcefile~soil_module.f90 sourcefile~soil_awc_init.f90 soil_awc_init.f90 sourcefile~soil_awc_init.f90->sourcefile~soil_module.f90 sourcefile~soil_nutcarb_init.f90 soil_nutcarb_init.f90 sourcefile~soil_nutcarb_init.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~soil_nutcarb_init.f90->sourcefile~soil_module.f90 sourcefile~soil_phys_init.f90 soil_phys_init.f90 sourcefile~soil_phys_init.f90->sourcefile~soil_module.f90 sourcefile~soil_text_init.f90 soil_text_init.f90 sourcefile~soil_text_init.f90->sourcefile~soil_module.f90 sourcefile~soils_init.f90 soils_init.f90 sourcefile~soils_init.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~soils_init.f90->sourcefile~soil_module.f90 sourcefile~sq_crackvol.f90 sq_crackvol.f90 sourcefile~sq_crackvol.f90->sourcefile~soil_module.f90 sourcefile~sq_dailycn.f90 sq_dailycn.f90 sourcefile~sq_dailycn.f90->sourcefile~soil_module.f90 sourcefile~sq_greenampt.f90 sq_greenampt.f90 sourcefile~sq_greenampt.f90->sourcefile~soil_module.f90 sourcefile~stmp_solt.f90 stmp_solt.f90 sourcefile~stmp_solt.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~stmp_solt.f90->sourcefile~soil_module.f90 sourcefile~structure_set_parms.f90 structure_set_parms.f90 sourcefile~structure_set_parms.f90->sourcefile~soil_module.f90 sourcefile~surface.f90 surface.f90 sourcefile~surface.f90->sourcefile~soil_module.f90 sourcefile~swift_output.f90 swift_output.f90 sourcefile~swift_output.f90->sourcefile~soil_module.f90 sourcefile~swr_depstor.f90 swr_depstor.f90 sourcefile~swr_depstor.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~swr_depstor.f90->sourcefile~soil_module.f90 sourcefile~swr_drains.f90 swr_drains.f90 sourcefile~swr_drains.f90->sourcefile~soil_module.f90 sourcefile~swr_latsed.f90 swr_latsed.f90 sourcefile~swr_latsed.f90->sourcefile~soil_module.f90 sourcefile~swr_origtile.f90 swr_origtile.f90 sourcefile~swr_origtile.f90->sourcefile~soil_module.f90 sourcefile~swr_percmacro.f90 swr_percmacro.f90 sourcefile~swr_percmacro.f90->sourcefile~soil_module.f90 sourcefile~swr_percmain.f90 swr_percmain.f90 sourcefile~swr_percmain.f90->sourcefile~soil_module.f90 sourcefile~swr_percmicro.f90 swr_percmicro.f90 sourcefile~swr_percmicro.f90->sourcefile~soil_module.f90 sourcefile~swr_satexcess.f90 swr_satexcess.f90 sourcefile~swr_satexcess.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~swr_satexcess.f90->sourcefile~soil_module.f90 sourcefile~treat_read_om.f90 treat_read_om.f90 sourcefile~treat_read_om.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~varinit.f90 varinit.f90 sourcefile~varinit.f90->sourcefile~soil_module.f90 sourcefile~wallo_control.f90 wallo_control.f90 sourcefile~wallo_control.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~wallo_control.f90->sourcefile~soil_module.f90 sourcefile~wet_initial.f90 wet_initial.f90 sourcefile~wet_initial.f90->sourcefile~soil_module.f90 sourcefile~wetland_control.f90 wetland_control.f90 sourcefile~wetland_control.f90->sourcefile~organic_mineral_mass_module.f90 sourcefile~wetland_control.f90->sourcefile~soil_module.f90 sourcefile~wind_ero_erod.f90 wind_ero_erod.f90 sourcefile~wind_ero_erod.f90->sourcefile~soil_module.f90 sourcefile~zeroini.f90 zeroini.f90 sourcefile~zeroini.f90->sourcefile~soil_module.f90

Source Code

      module carbon_module 
      
      implicit none
      
      type carbon_terrestrial_inputs
        real :: er_POC_para = 1.5       !           |POC enrichment ratio ! 0-10 ! 0.0-5.0  MOST SENSITIVE  
        real :: CFB_para = 0.42         !           |Carbon fraction of residue (0.42; from data of Pinck et al., 1950) 
        real :: Sf_para_sur = 0.05      !           |Fraction of mineral N sorbed to litter: 0.05 for surface litter, 0.1 for below ground litter
        real :: Sf_para_sub = 0.10      !           |Fraction of mineral N sorbed to litter: 0.05 for surface litter, 0.1 for belowg round litter
        !Dissovled carbon
        real :: ABL_para = 0.0          !           |Calculated - Carbon allocation from Microbial Biomass to Leaching          
        real :: peroc_DIC_para = 0.95   !0-1        |DIC percolation coefficient  
        real :: peroc_DOC_para  = 0.70  !0-1        |DOC percolation coefficient
        real :: part_DOC_para = 4000.   !           |organic carbon partition coefficient 1000 to 1200 ! 500-2000 !replacing KOC=Liquid-solid partition coefficient for Microbial Biomass (10^3 m3 Mg-1)
        real :: hlife_doc_para = 50. !days       |DOC half life in groundwater, calculating DOC decay in groundwater ! 0-100
        !Allocation of CO2 and Carbon transformation
        real :: ABCO2_para_sur = 0.6    !           |Allocation from Microbial Biomass C pool to CO2; 0.6 (surface Litter), 0.85 - 0.68 x (CLAY+SILT) (all other layers) (Parton et al., 1993, 1994)
        real :: ABCO2_para_sub = 0. !           |Calculated -Allocation from Microbial Biomass C pool to CO2; 0.6 (surface Litter), 0.85 - 0.68 x (CLAY+SILT) (all other layers) (Parton et al., 1993, 1994)
        real :: ABP_para_sur = 0.0      !           |Allocation from Biomass to passive Humus; 0 (surface Litter), 0.003 + 0.032 x SOL_CLAY (all other layers) (Parton et al., 1993, 1994)
        real :: ABP_para_sub = 0.0      !           |Calculated - Allocation from Biomass to passive Humus; 0 (surface Litter), 0.003 + 0.032 x SOL_CLAY (all other layers) (Parton et al., 1993, 1994)
        real :: ALMCO2_para_sur = 0.6 !           |Allocation from metabolic Litter to CO2; 0.6 (surface Litter), 0.55 (all other layers) (Parton et al., 1993, 1994)
        real :: ALMCO2_para_sub = 0.55 !           |Allocation from metabolic Litter to CO2; 0.6 (surface Litter), 0.55 (all other layers) (Parton et al., 1993, 1994)
        real :: ALSLNCO2_para_sur = 0.6 !           |Allocation from non-lignin of structural Litter to CO2; 0.6 (surface Litter), 0.55 (all other layers) (Parton et al., 1993, 1994)
        real :: ALSLNCO2_para_sub =0.55 !           |Allocation from non-lignin of structural Litter to CO2; 0.6 (surface Litter), 0.55 (all other layers) (Parton et al., 1993, 1994)
        real :: ASP_para_sur = 0.0     !           |Allocation from slow Humus to passive; 0 (surface Litter), 0.003 + 0.00009 x CLAF (all other layers) (Parton et al., 1993, 1994)
        real :: ASP_para_sub = 0.0     !           |Calculated - Allocation from slow Humus to passive; 0 (surface Litter), 0.003 + 0.00009 x CLAF (all other layers) (Parton et al., 1993, 1994)
        real :: ALSLCO2_para = 0.3     !           |Allocation from lignin of structural Litter to CO2; 0.3 (Parton et al., 1993, 1994)
        real :: APCO2_para = 0.55     !           |Allocation from passive Humus to CO2; 0.55 (Parton et al., 1993, 1994)
        real :: ASCO2_para = 0.55     !           |Allocation from slow Humus to CO2; 0.55 (Parton et al., 1993, 1994)
        !decomposition rates
        real :: PRMT_51_para = 1.0     !           |COEF ADJUSTS MICROBIAL ACTIVITY FUNCTION IN TOP SOIL LAYER (0.1_1.),
        real :: PRMT_45_para = 0.003 !           |COEF IN CENTURY EQ ALLOCATING SLOW TO PASSIVE HUMUS(0.001_0.05) ORIGINAL VALUE = 0.003, ASP=MAX(.001,PRMT_45-.00009*sol_clay(k,j)), ASP=MAX(.001,PRMT_45+.009*sol_clay(k,j)/100)
        real :: BMR_para_sur = 0.0164 !           |Rate of transformation of microbial Biomass and associated products under optimal conditions (surface = 0.0164 d-1; all other layers = 0.02 d-1) (Parton et al., 1993, 1994)
        real :: BMR_para_sub = 0.02     !           |Rate of transformation of microbial Biomass and associated products under optimal conditions (surface = 0.0164 d-1; all other layers = 0.02 d-1) (Parton et al., 1993, 1994)
        real :: HPR_para = 0.000012     !           |Rate of transformation of passive Humus under optimal conditions (subsurface layers = 0.000012 d-1) (Parton et al., 1993, 1994)
        real :: HSR_para = 0.000548     !           |Rate of transformation of slow Humus under optimal conditions (all layers = 0.0005 d-1) (Parton et al., 1993, 1994; Vitousek et al., 1993)
        real :: LMR_para_sur = 0.0405 !           |Rate of transformation of metabolic Litter under optimal conditions (surface = 0.0405 d-1; all other layers = 0.0507 d-1) (Parton et al., 1994)
        real :: LMR_para_sub = 0.0507 !           |Rate of transformation of metabolic Litter under optimal conditions (surface = 0.0405 d-1; all other layers = 0.0507 d-1) (Parton et al., 1994)
        real :: LSR_para_sur = 0.0107 !           |Rate of potential transformation of structural Litter under optimal conditions (surface = 0.0107 d-1; all other layers = 0.0132 d-1) (Parton et al., 1994)
        real :: LSR_para_sub = 0.0132 !           |Rate of potential transformation of structural Litter under optimal conditions (surface = 0.0107 d-1; all other layers = 0.0132 d-1) (Parton et al., 1994)
        !Soil texture controls of microbial activity
        real :: XBM_para_sur = 1.0     !           |Control on transformation of microbial Biomass by soil texture and structure. Its values: surface Litter layer = 1; all other layers = 1  0.75 x (SILT + CLAY) (Parton et al., 1993, 1994)
        real :: XBM_para_sub = 0.0     !           |Calculated - Control on transformation of microbial Biomass by soil texture and structure. Its values: surface Litter layer = 1; all other layers = 1  0.75 x (SILT + CLAY) (Parton et al., 1993, 1994)
        real :: XLSLF_para = 0.0     !           |Calculated - Control on potential transformation of structural Litter by lignin fraction of structural Litter [XLSLF = exp(-3 x LSLF) (Parton et al., 1993, 1994)]
        !Oxygen factor control parameters
        real :: OX_aa_para = 10.0     !           !Coefficient in calculating oxygen factor 
        real :: OX_bb_para = 0.035     !           |Coefficient in calculating oxygen factor 
      end type carbon_terrestrial_inputs
      type (carbon_terrestrial_inputs) :: cbn_tes

      type carbon_inputs
          real :: hp_rate = 0.          !               |rate of transformation of passive humus under optimal conditions
          real :: hs_rate = 0.          !               |rate of transformation of slow humus under optimal conditions
          real :: microb_rate = 0.      !               |rate of transformation of microbial biomass and associated products under optimal conditions
          real :: meta_rate = 0.        !               |rate of transformation of metabolic litter under optimal conditions
          real :: str_rate = 0.         !               |rate of potential transformation of structural litter under optimal conditions
          real :: microb_top_rate = 0.  !               |coef adjusts mocribial activity function in top soil layer
          real :: hs_hp = 0.            !               |coef in century eq allocating slow to passive humus
          real :: microb_koc = 0.       !10^3 m^3 Mg-1  |liquid-solid partition coefficient for microbial biomass
          real :: min_n_frac = 0.       !               |fraction of mineral n sorbed to litter
          real :: c_org_frac = 0.       !               |carbon fraction of organic materials      
      end type carbon_inputs
      type (carbon_inputs) :: carbdb 
      type (carbon_inputs) :: carbz  
      
      type organic_allocations
          real :: abco2 = 0.      !               |Fraction of decomposed microbial biomass allocated to CO2
          real :: abl = 0.        !               |Fraction of microbial biomass loss due to leaching
          real :: abp = 0.        !               |Fraction of decomposed microbial biomass allocated to passive humus
          real :: almco2 = 0.     !               |Fraction of decomposed metabolic litter allocated to CO2
          real :: alslco2 = 0.    !               |Fraction of decomposed lignin of structural litter allocated to CO2
          real :: alslnco2 = 0.   !               |Fraction of decomposed lignin of structural litter allocated to CO2
          real :: apco2 = 0.      !               |Fraction of decomposed  passive humus allocated to CO2
          real :: asco2 = 0.      !               |Fraction of decomposed slow humus allocated to CO2
          real :: asp = 0.        !               |Fraction of decomposed slow humus allocated to passive
      end type organic_allocations
      type (organic_allocations) :: org_allo 
      type (organic_allocations) :: org_alloz
        
      type organic_controls
          real :: cdg = 0.           !                 |soil temperature control on biological processes
          real :: cs = 0.            !                 |combined factor controlling biological processes
          real :: ox = 0.            !                 |oxygen control on biological processes 
          real :: sut = 0.           !                 |soil water control on biological processes
          real :: x1 = 0.            !                 |tillage control on residue decomposition
          real :: xbmt = 0.          !                 |control on transformation of microbial biomass by soil texture and structure
          real :: xlslf = 0.         !                 |control on potential transformation of structural litter by lignin fraction
      end type organic_controls
      type (organic_controls) :: org_con                     
        
      type organic_fractions
          real :: lmf = 0.      !frac               |fraction of the litter that is metabolic
          real :: lmnf = 0.     !kg kg-1            |fraction of metabolic litter that is N
          real :: lsf = 0.      !frac               |fraction of the litter that is structural
          real :: lslf = 0.     !kg kg-1            |fraction of structural litter that is lignin 
          real :: lsnf = 0.     !kg kg-1            |fraction of structural litter that is N      
      end type organic_fractions
      type (organic_fractions) :: org_frac                    
      
      type organic_ratio
          real :: cnr = 0.         !                  |c/n ratio of standing dead
          real :: ncbm = 0.        !                  |n/c ratio of biomass           
          real :: nchp = 0.        !                  |n/c ratio of passive humus
          real :: nchs = 0.        !                  |n/c ration of slow humus
      end type organic_ratio
      type (organic_ratio) :: org_ratio                   
      
      type organic_transformations
          real :: bmctp = 0.       !kg ha-1 day-1        |potential transformation of C in microbial biomass
          real :: bmntp = 0.       !kg ha-1 day-1        |potential transformation of N in microbial biomass
          real :: hsctp = 0.       !kg ha-1 day-1        |potential transformation of C in slow humus
          real :: hsntp = 0.       !kg ha-1 day-1        |potential transformation of N in slow humus
          real :: hpctp = 0.       !kg ha-1 day-1        |potential transformation of C in passive humus 
          real :: hpntp = 0.       !kg ha-1 day-1        |potential transformation of N in passive humus
          real :: lmctp = 0.       !kg ha-1 day-1        |potential transformation of C in metabolic litter
          real :: lmntp = 0.       !kg ha-1 day-1        |potential transformation of N in metabolic litter 
          real :: lsctp = 0.       !kg ha-1 day-1        |potential transformation of C in structural litter
          real :: lslctp = 0.      !kg ha-1 day-1        |potential transformation of C in lignin of structural litter
          real :: lslnctp = 0.     !kg ha-1 day-1        |potential transformation of C in nonlignin structural litter
          real :: lsntp = 0.       !kg ha-1 day-1        |potential transformation of N in structural litter              
      end type organic_transformations
      type (organic_transformations) :: org_tran
      
      type organic_flux
          real :: cfmets1 = 0.           !(kg C ha-1 day-1) |C transfromed from Metabolic Litter to S1 (Microbial Biomass) 
          real :: cfstrs1 = 0.           !(kg C ha-1 day-1) |C transfromed from Structural Litter to S1 (Microbial Biomass)  
          real :: cfstrs2 = 0.           !(kg C ha-1 day-1) |C transfromed from Structural Litter to S2 (Slow Humus) 
          real :: efmets1 = 0.           !(kg N ha-1 day-1) |N transformed from Metabolic Litter to S1 (Microbial Biomass) 
          real :: efstrs1 = 0.           !(kg N ha-1 day-1) |N transformed from Structural Litter to S1 (Microbial Biomass) 
          real :: efstrs2 = 0.           !(kg N ha-1 day-1) |N transformed from Structural Litter to S2 (Slow Humus)  
          real :: immmets1 = 0.          !(kg N ha-1 day-1) |N immibolization resulting from transforming Metabolic Litter to S1 (Microbial Biomass)   
          real :: immstrs1 = 0.          !(kg N ha-1 day-1) |N immibolization resulting from transforming Structural Litter to S1 (Microbial Biomass) 
          real :: immstrs2 = 0.          !(kg N ha-1 day-1) |N immibolization resulting from transforming Structural Litter to S2 (Slow Humus)  
          real :: mnrmets1 = 0.          !(kg N ha-1 day-1) |N mineralization resulting from transforming Metabolic Litter to S1 (Microbial Biomass)   
          real :: mnrstrs1 = 0.          !(kg N ha-1 day-1) |N mineralization resulting from transforming Structural Litter to S1 (Microbial Biomass) 
          real :: mnrstrs2 = 0.          !(kg N ha-1 day-1) |N mineralization resulting from transforming Structural Litter to S2 (Slow Humus)  
          real :: co2fmet = 0.           !(kg C ha-1 day-1) |CO2 production resulting from metabolic litter transformaitons               
          real :: co2fstr = 0.           !(kg C ha-1 day-1) |CO2 production resulting from lignin structural litter transformaitons  
          real :: cfs1s2 = 0.            !(kg C ha-1 day-1) |C transformed from S1 (Microbial Biomass) to S2 (Slow Humus)    
          real :: cfs1s3 = 0.            !(kg C ha-1 day-1) |C transformed from S1 (Microbial Biomass) to S3 (Passive Humus)  
          real :: cfs2s1 = 0.            !(kg C ha-1 day-1) |C transformed from S2 (Slow Humus) to S1 (Microbial Biomass)  
          real :: cfs2s3 = 0.            !(kg C ha-1 day-1) |C transformed from S2 (Slow Humus) to S3 (Passive Humus)  
          real :: cfs3s1 = 0.            !(kg C ha-1 day-1) |C transformed from  S3 (Passive Humus) to S1 (Microbial Biomass) 
          real :: efs1s2 = 0.            !(kg N ha-1 day-1) |N transformed from from S1 (Microbial Biomass) to S2 (Slow Humus)  
          real :: efs1s3 = 0.            !(kg N ha-1 day-1) |N transformed from from S1 (Microbial Biomass) to S3 (Passive Humus) 
          real :: efs2s1 = 0.            !(kg N ha-1 day-1) |N transformed from from S2 (Slow Humus) to S1 (Microbial Biomass) 
          real :: efs2s3 = 0.            !(kg N ha-1 day-1) |N transformed from from S2 (Slow Humus) to S3 (Passive Humus) 
          real :: efs3s1 = 0.            !(kg N ha-1 day-1) |N transfromed from from  S3 (Passive Humus) to S1 (Microbial Biomass) 
          real :: imms1s2 = 0.           !(kg N ha-1 day-1) |N immibolization resulting from transforming S1 (Microbial Biomass) to S2 (Slow Humus)   
          real :: imms1s3 = 0.           !(kg N ha-1 day-1) |N immibolization resulting from transforming S1 (Microbial Biomass) to S3 (Passive Humus)  
          real :: imms2s1 = 0.           !(kg N ha-1 day-1) |N immibolization resulting from transforming S2 (Slow Humus) to S1 (Microbial Biomass) 
          real :: imms2s3 = 0.           !(kg N ha-1 day-1) |N immibolization resulting from transforming S2 (Slow Humus) to S3 (Passive Humus)  
          real :: imms3s1 = 0.           !(kg N ha-1 day-1) |N immibolization resulting from transforming  S3 (Passive Humus) to S1 (Microbial Biomass)  
          real :: mnrs1s2 = 0.           !(kg N ha-1 day-1) |N mineralization resulting from transforming S1 (Microbial Biomass) to S2 (Slow Humus)  
          real :: mnrs1s3 = 0.           !(kg N ha-1 day-1) |N mineralization resulting from transforming S1 (Microbial Biomass) to S3 (Passive Humus) 
          real :: mnrs2s1 = 0.           !(kg N ha-1 day-1) |N mineralization resulting from transforming S2 (Slow Humus) to S1 (Microbial Biomass)  
          real :: mnrs2s3 = 0.           !(kg N ha-1 day-1) |N mineralization resulting from transforming S2 (Slow Humus) to S3 (Passive Humus)  
          real :: mnrs3s1 = 0.           !(kg N ha-1 day-1) |N mineralization resulting from transforming  S3 (Passive Humus) to S1 (Microbial Biomass)  
          real :: co2fs1 = 0.            !(kg C ha-1 day-1) |CO2 production resulting from S1 (Microbial Biomass) transformations  
          real :: co2fs2 = 0.            !(kg C ha-1 day-1) |CO2 production resulting from S2 (Slow Humus)  transformations  
          real :: co2fs3 = 0.            !(kg C ha-1 day-1) |CO2 production resulting from S3 (Passive Humus) transformations  
      end type organic_flux
      type (organic_flux) :: org_flux
	  type (organic_flux) :: org_flux_zero
      
      type carbon_soil_transformations
          real :: meta_micr = 0.        !(kg C ha-1 day-1) |C transformed from Metabolic Litter to S1 (Microbial Biomass) 
          real :: str_micr = 0.         !(kg C ha-1 day-1) |C transformed from Structural Litter to S1 (Microbial Biomass)  
          real :: str_hs = 0.           !(kg C ha-1 day-1) |C transformed from Structural Litter to S2 (Slow Humus)
          real :: co2_meta = 0.         !(kg C ha-1 day-1) |CO2 production resulting from metabolic litter transformations               
          real :: co2_str = 0.          !(kg C ha-1 day-1) |CO2 production resulting from lignin structural litter transformations  
          real :: micr_hs = 0.          !(kg C ha-1 day-1) |C transformed from S1 (Microbial Biomass) to S2 (Slow Humus)    
          real :: micr_hp = 0.          !(kg C ha-1 day-1) |C transformed from S1 (Microbial Biomass) to S3 (Passive Humus)  
          real :: hs_micr = 0.          !(kg C ha-1 day-1) |C transformed from S2 (Slow Humus) to S1 (Microbial Biomass)  
          real :: hs_hp = 0.            !(kg C ha-1 day-1) |C transformed from S2 (Slow Humus) to S3 (Passive Humus)  
          real :: hp_micr = 0.          !(kg C ha-1 day-1) |C transformed from  S3 (Passive Humus) to S1 (Microbial Biomass) 
          real :: co2_micr = 0.         !(kg C ha-1 day-1) |CO2 production resulting from S1 (Microbial Biomass) transformations  
          real :: co2_hs = 0.           !(kg C ha-1 day-1) |CO2 production resulting from S2 (Slow Humus)  transformations  
          real :: co2_hp = 0.           !(kg C ha-1 day-1) |CO2 production resulting from S3 (Passive Humus) transformations  
      end type carbon_soil_transformations
      type (carbon_soil_transformations) :: hscfz
      
      !! hru soil carbon transformations
      type (carbon_soil_transformations), dimension (:), allocatable :: hscf_d
      type (carbon_soil_transformations), dimension (:), allocatable :: hscf_m
      type (carbon_soil_transformations), dimension (:), allocatable :: hscf_y
      type (carbon_soil_transformations), dimension (:), allocatable :: hscf_a
      !! lsu soil carbon transformations
      type (carbon_soil_transformations), dimension (:), allocatable :: lscf_d
      type (carbon_soil_transformations), dimension (:), allocatable :: lscf_m
      type (carbon_soil_transformations), dimension (:), allocatable :: lscf_y
      type (carbon_soil_transformations), dimension (:), allocatable :: lcsf_a
      !! basin soil carbon transformations
      type (carbon_soil_transformations) :: bscf_d
      type (carbon_soil_transformations) :: bscf_m
      type (carbon_soil_transformations) :: bscf_y
      type (carbon_soil_transformations) :: bscf_a
      
      type carbon_soil_gain_losses
        real :: sed_c = 0.              !kg C/ha            |C transported with sediment yield
        real :: surq_c = 0.             !kg C/ha            |total dissolved C transported with surface runoff
        real :: surq_doc = 0.           !kg C/ha            |dissolved organic C transported with surface runoff
        real :: surq_dic = 0.           !kg C/ha            |dissolved inorganic C transported with surface runoff
        real :: latq_c = 0.             !kg C/ha            |dissolved organic C transported with lateral flow (all layers)
        real :: latq_doc= 0.            !kg C/ha            |total dissolved C transported with lateral flow (all layers)
        real :: latq_dic = 0.           !kg C/ha            |dissolved inorganic C transported with lateral flow (all layers)
        real :: perc_c = 0.             !kg C/ha            |total dissolved C transported with percolate
        real :: perc_doc = 0.           !kg C/ha            |dissolved organic C transported with percolate
        real :: perc_dic = 0.           !kg C/ha            |dissolved inorganic C transported with percolate
        real :: rsd_decay_c = 0.        !kg C/ha            |carbon added to soil from residue decay
        real :: man_app_c = 0.          !kg C/ha            |amount of carbon applied to soil from manure
        real :: man_graz_c = 0.         !kg C/ha            |amount of carbon manure from grazing animals
        real :: rsp_c = 0.              !kg C/ha            |CO2 production from soil respiration summarized for the profile  
        real :: emit_c = 0.             !kg C/ha            |CO2 production from burning soil carbon
      end type carbon_soil_gain_losses
      type (carbon_soil_gain_losses) :: hscz 
      
      !! hru soil carbon gains and losses
      type (carbon_soil_gain_losses), dimension (:), allocatable :: hsc_d
      type (carbon_soil_gain_losses), dimension (:), allocatable :: hsc_m
      type (carbon_soil_gain_losses), dimension (:), allocatable :: hsc_y
      type (carbon_soil_gain_losses), dimension (:), allocatable :: hsc_a
      !! lsu soil carbon gains and losses
      type (carbon_soil_gain_losses), dimension (:), allocatable :: lsc_d
      type (carbon_soil_gain_losses), dimension (:), allocatable :: lsc_m
      type (carbon_soil_gain_losses), dimension (:), allocatable :: lsc_y
      type (carbon_soil_gain_losses), dimension (:), allocatable :: lcs_a
      !! basin soil carbon gains and losses
      type (carbon_soil_gain_losses) :: bsc_d
      type (carbon_soil_gain_losses) :: bsc_m
      type (carbon_soil_gain_losses) :: bsc_y
      type (carbon_soil_gain_losses) :: bsc_a
      
      type carbon_residue_gain_losses
        real :: plant_surf_c = 0.       !kg C/ha            |carbon added to surface residue from leaf drop and kill
        real :: plant_root_c = 0.       !kg C/ha            |carbon added to soil residue from root kill
        real :: rsd_surfdecay_c = 0.    !kg C/ha            |carbon lost to soil from surface residue decay
        real :: rsd_rootdecay_c = 0.    !kg C/ha            |carbon lost to soil from soil/root and incorporated residue decay
        real :: harv_stov_c = 0.        !kg C/ha            |carbon removed during surface residue harvest  
        real :: emit_c = 0.             !kg C/ha            |CO2 production from burning surface residue carbon
      end type carbon_residue_gain_losses
      type (carbon_residue_gain_losses) :: hrcz
      
      !! hru residue carbon gains and losses
      type (carbon_residue_gain_losses), dimension (:), allocatable :: hrc_d
      type (carbon_residue_gain_losses), dimension (:), allocatable :: hrc_m
      type (carbon_residue_gain_losses), dimension (:), allocatable :: hrc_y
      type (carbon_residue_gain_losses), dimension (:), allocatable :: hrc_a
      !! lsu residue carbon gains and losses
      type (carbon_residue_gain_losses), dimension (:), allocatable :: lrc_d
      type (carbon_residue_gain_losses), dimension (:), allocatable :: lrc_m
      type (carbon_residue_gain_losses), dimension (:), allocatable :: lrc_y
      type (carbon_residue_gain_losses), dimension (:), allocatable :: lrs_a
      !! basin residue carbon gains and losses
      type (carbon_residue_gain_losses) :: brc_d
      type (carbon_residue_gain_losses) :: brc_m
      type (carbon_residue_gain_losses) :: brc_y
      type (carbon_residue_gain_losses) :: brc_a
      
      type carbon_plant_gain_losses
        real :: npp_c = 0.              !kg C/ha            |plant carbon growth from photosynthesis
        real :: harv_abgr_c = 0.        !kg C/ha            |carbon removed during grain/biomass harvest
        real :: harv_root_c = 0.        !kg C/ha            |carbon removed during tuber (root) harvest
        real :: drop_c = 0.             !kg C/ha            |carbon added to residue from leaf drop and kill
        real :: grazeat_c = 0.          !kg C/ha            |amount of carbon ate by animals in grazing
        real :: emit_c = 0.             !kg C/ha            |CO2 production from burning residue carbon
      end type carbon_plant_gain_losses
      type (carbon_plant_gain_losses) :: hpcz
      
      !! hru plant carbon gains and losses
      type (carbon_plant_gain_losses), dimension (:), allocatable :: hpc_d
      type (carbon_plant_gain_losses), dimension (:), allocatable :: hpc_m
      type (carbon_plant_gain_losses), dimension (:), allocatable :: hpc_y
      type (carbon_plant_gain_losses), dimension (:), allocatable :: hpc_a
      !! lsu plant carbon gains and losses
      type (carbon_plant_gain_losses), dimension (:), allocatable :: lpc_d
      type (carbon_plant_gain_losses), dimension (:), allocatable :: lpc_m
      type (carbon_plant_gain_losses), dimension (:), allocatable :: lpc_y
      type (carbon_plant_gain_losses), dimension (:), allocatable :: lps_a
      !! basin plant carbon gains and losses
      type (carbon_plant_gain_losses) :: bpc_d
      type (carbon_plant_gain_losses) :: bpc_m
      type (carbon_plant_gain_losses) :: bpc_y
      type (carbon_plant_gain_losses) :: bpc_a

      interface operator (+)
        module procedure carbon_soil_flux__add
      end interface
      
      interface operator (*)
        module procedure carbon_soil_flux_mult
      end interface
        
      interface operator (/)
        module procedure carbon_soil_flux_div
      end interface
        
      interface operator (+)
        module procedure carbon_soil_gl__add
      end interface
      
      interface operator (*)
        module procedure carbon_soil_gl_mult
      end interface
        
      interface operator (/)
        module procedure carbon_soil_gl_div
      end interface
        
      interface operator (+)
        module procedure carbon_residue_gl__add
      end interface
      
      interface operator (*)
        module procedure carbon_residue_gl_mult
      end interface
        
      interface operator (/)
        module procedure carbon_residue_gl_div
      end interface
        
      interface operator (+)
        module procedure carbon_plant_gl__add
      end interface
      
      interface operator (*)
        module procedure carbon_plant_gl_mult
      end interface 
        
      interface operator (/)
        module procedure carbon_plant_gl_div
      end interface 
        
      contains

      function carbon_soil_flux__add (hru1, hru2) result (hru3)
        type (carbon_soil_transformations), intent (in) :: hru1
        type (carbon_soil_transformations), intent (in) :: hru2
        type (carbon_soil_transformations) :: hru3
        hru3%meta_micr = hru1%meta_micr + hru2%meta_micr
        hru3%str_micr = hru1%str_micr + hru2%str_micr
        hru3%str_hs = hru1%str_hs + hru2%str_hs
        hru3%co2_meta = hru1%co2_meta + hru2%co2_meta
        hru3%co2_str = hru1%co2_str + hru2%co2_str
        hru3%micr_hs = hru1%micr_hs + hru2%micr_hs
        hru3%micr_hp = hru1%micr_hp + hru2%micr_hp
        hru3%hs_micr = hru1%hs_micr + hru2%hs_micr
        hru3%hs_hp = hru1%hs_hp + hru2%hs_hp
        hru3%hp_micr = hru1%hp_micr + hru2%hp_micr
        hru3%co2_micr = hru1%co2_micr + hru2%co2_micr
        hru3%co2_hs = hru1%co2_hs + hru2%co2_hs
        hru3%co2_hp = hru1%co2_hp + hru2%co2_hp
       end function carbon_soil_flux__add
       
      function carbon_soil_flux_mult (hru1,const) result (hru2)
        type (carbon_soil_transformations), intent (in) :: hru1
        real, intent (in) :: const
        type (carbon_soil_transformations) :: hru2
        hru2%meta_micr = hru1%meta_micr * const
        hru2%str_micr = hru1%str_micr * const
        hru2%str_hs = hru1%str_hs * const
        hru2%co2_meta = hru1%co2_meta * const
        hru2%co2_str = hru1%co2_str * const
        hru2%micr_hs = hru1%micr_hs * const
        hru2%micr_hp = hru1%micr_hp * const
        hru2%hs_micr = hru1%hs_micr * const
        hru2%hs_hp = hru1%hs_hp * const
        hru2%hp_micr = hru1%hp_micr * const
        hru2%co2_micr = hru1%co2_micr * const
        hru2%co2_hs = hru1%co2_hs * const
        hru2%co2_hp = hru1%co2_hp * const
      end function carbon_soil_flux_mult
      
      function carbon_soil_flux_div (hru1,const) result (hru2)
        type (carbon_soil_transformations), intent (in) :: hru1
        real, intent (in) :: const
        type (carbon_soil_transformations) :: hru2
        hru2%meta_micr = hru1%meta_micr / const
        hru2%str_micr = hru1%str_micr / const
        hru2%str_hs = hru1%str_hs / const
        hru2%co2_meta = hru1%co2_meta / const
        hru2%co2_str = hru1%co2_str / const
        hru2%micr_hs = hru1%micr_hs / const
        hru2%micr_hp = hru1%micr_hp / const
        hru2%hs_micr = hru1%hs_micr / const
        hru2%hs_hp = hru1%hs_hp / const
        hru2%hp_micr = hru1%hp_micr / const
        hru2%co2_micr = hru1%co2_micr / const
        hru2%co2_hs = hru1%co2_hs / const
        hru2%co2_hp = hru1%co2_hp / const
      end function carbon_soil_flux_div
      
      function carbon_soil_gl__add (hru1, hru2) result (hru3)
        type (carbon_soil_gain_losses), intent (in) :: hru1
        type (carbon_soil_gain_losses), intent (in) :: hru2
        type (carbon_soil_gain_losses) :: hru3
        hru3%sed_c = hru1%sed_c + hru2%sed_c
        hru3%surq_c = hru1%surq_c + hru2%surq_c
        hru3%surq_doc = hru1%surq_doc + hru2%surq_doc
        hru3%surq_dic = hru1%surq_dic + hru2%surq_dic
        hru3%latq_c = hru1%latq_c + hru2%latq_c
        hru3%latq_doc = hru1%latq_doc + hru2%latq_doc
        hru3%latq_dic = hru1%latq_dic + hru2%latq_dic
        hru3%perc_c = hru1%perc_c + hru2%perc_c
        hru3%perc_doc = hru1%perc_doc + hru2%perc_doc
        hru3%perc_dic = hru1%perc_dic + hru2%perc_dic
        hru3%rsd_decay_c = hru1%rsd_decay_c + hru2%rsd_decay_c
        hru3%man_app_c = hru1%man_app_c + hru2%man_app_c
        hru3%man_graz_c = hru1%man_graz_c + hru2%man_graz_c
        hru3%rsp_c = hru1%rsp_c + hru2%rsp_c
        hru3%emit_c = hru1%emit_c + hru2%emit_c
       end function carbon_soil_gl__add
       
      function carbon_soil_gl_mult (hru1,const) result (hru2)
        type (carbon_soil_gain_losses), intent (in) :: hru1
        real, intent (in) :: const
        type (carbon_soil_gain_losses) :: hru2
        hru2%sed_c = hru1%sed_c * const
        hru2%surq_c = hru1%surq_c * const
        hru2%surq_doc = hru1%surq_doc * const
        hru2%surq_dic = hru1%surq_dic * const
        hru2%latq_c = hru1%latq_c * const
        hru2%latq_doc = hru1%latq_doc * const
        hru2%latq_dic = hru1%latq_dic * const
        hru2%perc_c = hru1%perc_c * const
        hru2%perc_doc = hru1%perc_doc * const
        hru2%perc_dic = hru1%perc_dic * const
        hru2%rsd_decay_c = hru1%rsd_decay_c * const
        hru2%man_app_c = hru1%man_app_c * const
        hru2%man_graz_c = hru1%man_graz_c * const
        hru2%rsp_c = hru1%rsp_c * const
        hru2%emit_c = hru1%emit_c * const
      end function carbon_soil_gl_mult
      
      function carbon_soil_gl_div (hru1,const) result (hru2)
        type (carbon_soil_gain_losses), intent (in) :: hru1
        real, intent (in) :: const
        type (carbon_soil_gain_losses) :: hru2
        hru2%sed_c = hru1%sed_c / const
        hru2%surq_c = hru1%surq_c / const
        hru2%surq_doc = hru1%surq_doc / const
        hru2%surq_dic = hru1%surq_dic / const
        hru2%latq_c = hru1%latq_c / const
        hru2%latq_doc = hru1%latq_doc / const
        hru2%latq_dic = hru1%latq_dic / const
        hru2%perc_c = hru1%perc_c / const
        hru2%perc_doc = hru1%perc_doc / const
        hru2%perc_dic = hru1%perc_dic / const
        hru2%rsd_decay_c = hru1%rsd_decay_c / const
        hru2%man_app_c = hru1%man_app_c / const
        hru2%man_graz_c = hru1%man_graz_c / const
        hru2%rsp_c = hru1%rsp_c / const
        hru2%emit_c = hru1%emit_c / const
      end function carbon_soil_gl_div
      
      function carbon_residue_gl__add (hru1, hru2) result (hru3)
        type (carbon_residue_gain_losses), intent (in) :: hru1
        type (carbon_residue_gain_losses), intent (in) :: hru2
        type (carbon_residue_gain_losses) :: hru3
        hru3%plant_surf_c = hru1%plant_surf_c + hru2%plant_surf_c
        hru3%plant_root_c = hru1%plant_root_c + hru2%plant_root_c
        hru3%rsd_surfdecay_c = hru1%rsd_surfdecay_c + hru2%rsd_surfdecay_c
        hru3%rsd_rootdecay_c = hru1%rsd_rootdecay_c + hru2%rsd_rootdecay_c
        hru3%harv_stov_c = hru1%harv_stov_c + hru2%harv_stov_c
        hru3%emit_c = hru1%emit_c + hru2%emit_c
       end function carbon_residue_gl__add
       
      function carbon_residue_gl_mult (hru1,const) result (hru2)
        type (carbon_residue_gain_losses), intent (in) :: hru1
        real, intent (in) :: const
        type (carbon_residue_gain_losses) :: hru2
        hru2%plant_surf_c = hru1%plant_surf_c * const
        hru2%plant_root_c = hru1%plant_root_c * const
        hru2%rsd_surfdecay_c = hru1%rsd_surfdecay_c * const
        hru2%rsd_rootdecay_c = hru1%rsd_rootdecay_c * const
        hru2%harv_stov_c = hru1%harv_stov_c * const
        hru2%emit_c = hru1%emit_c * const
      end function carbon_residue_gl_mult
      
      function carbon_residue_gl_div (hru1,const) result (hru2)
        real, intent (in) :: const
        type (carbon_residue_gain_losses), intent (in) :: hru1
        type (carbon_residue_gain_losses) :: hru2
        hru2%plant_surf_c = hru1%plant_surf_c / const
        hru2%plant_surf_c = hru1%plant_surf_c / const
        hru2%rsd_surfdecay_c = hru1%rsd_surfdecay_c / const
        hru2%rsd_rootdecay_c = hru1%rsd_rootdecay_c / const
        hru2%harv_stov_c = hru1%harv_stov_c / const
        hru2%emit_c = hru1%emit_c * const
      end function carbon_residue_gl_div
      
      function carbon_plant_gl__add (hru1, hru2) result (hru3)
        type (carbon_plant_gain_losses), intent (in) :: hru1
        type (carbon_plant_gain_losses), intent (in) :: hru2
        type (carbon_plant_gain_losses) :: hru3
        hru3%npp_c = hru1%npp_c + hru2%npp_c
        hru3%harv_abgr_c = hru1%harv_abgr_c + hru2%harv_abgr_c
        hru3%harv_root_c = hru1%harv_root_c + hru2%harv_root_c
        hru3%drop_c = hru1%drop_c + hru2%drop_c
        hru3%grazeat_c = hru1%grazeat_c + hru2%grazeat_c
        hru3%emit_c = hru1%emit_c + hru2%emit_c
       end function carbon_plant_gl__add
       
      function carbon_plant_gl_mult (hru1,const) result (hru2)
        type (carbon_plant_gain_losses), intent (in) :: hru1
        real, intent (in) :: const
        type (carbon_plant_gain_losses) :: hru2
        hru2%npp_c = hru1%npp_c * const
        hru2%harv_abgr_c = hru1%harv_abgr_c * const
        hru2%harv_root_c = hru1%harv_root_c * const
        hru2%drop_c = hru1%drop_c * const
        hru2%grazeat_c = hru1%grazeat_c * const
        hru2%emit_c = hru1%emit_c * const
      end function carbon_plant_gl_mult
      
      function carbon_plant_gl_div (hru1,const) result (hru2)
        type (carbon_plant_gain_losses), intent (in) :: hru1
        real, intent (in) :: const
        type (carbon_plant_gain_losses) :: hru2
        hru2%npp_c = hru1%npp_c / const
        hru2%harv_abgr_c = hru1%harv_abgr_c / const
        hru2%harv_root_c = hru1%harv_root_c / const
        hru2%drop_c = hru1%drop_c / const
        hru2%grazeat_c = hru1%grazeat_c / const
        hru2%emit_c = hru1%emit_c / const
      end function carbon_plant_gl_div
      
     end module carbon_module