CAM
bgccentcnpcompettype Module Reference

Data Types

type  compet_eca_type
 

Functions/Subroutines

subroutine init (this)
 
subroutine initallocate (this)
 
subroutine run_compet_nitrogen (this, smin_nh4, smin_no3, mic_pot_nn_flx, pot_f_nit, pot_f_denit, plant_ntypes, msurf_nh4, ECA_factor_nit, ECA_factor_den, ECA_factor_nh4_mic, ECA_factor_no3_mic, ECA_flx_nh4_plants, ECA_flx_no3_plants, ECA_factor_msurf_nh4)
 
subroutine run_compet_phosphorus (this, sminp_soluble, mic_pot_np_flx, plant_ntypes, msurf_minp, ECA_factor_phosphorus_mic, ECA_factor_minp_msurf, ECA_flx_phosphorus_plants)
 

Variables

character(len= *), parameter, private mod_filename = __FILE__
 

Function/Subroutine Documentation

◆ init()

subroutine bgccentcnpcompettype::init ( class(compet_eca_type), intent(inout)  this)

◆ initallocate()

subroutine bgccentcnpcompettype::initallocate ( class(compet_eca_type), intent(inout)  this)
private

◆ run_compet_nitrogen()

subroutine bgccentcnpcompettype::run_compet_nitrogen ( class(compet_eca_type), intent(inout)  this,
real(r8), intent(in)  smin_nh4,
real(r8), intent(in)  smin_no3,
real(r8), intent(in)  mic_pot_nn_flx,
real(r8), intent(in)  pot_f_nit,
real(r8), intent(in)  pot_f_denit,
integer, intent(in)  plant_ntypes,
real(r8), intent(in)  msurf_nh4,
real(r8), intent(out)  ECA_factor_nit,
real(r8), intent(out)  ECA_factor_den,
real(r8), intent(out)  ECA_factor_nh4_mic,
real(r8), intent(out)  ECA_factor_no3_mic,
real(r8), dimension(plant_ntypes), intent(out)  ECA_flx_nh4_plants,
real(r8), dimension(plant_ntypes), intent(out)  ECA_flx_no3_plants,
real(r8), intent(out)  ECA_factor_msurf_nh4 
)

◆ run_compet_phosphorus()

subroutine bgccentcnpcompettype::run_compet_phosphorus ( class(compet_eca_type), intent(inout)  this,
real(r8), intent(in)  sminp_soluble,
real(r8), intent(in)  mic_pot_np_flx,
integer, intent(in)  plant_ntypes,
real(r8), intent(in)  msurf_minp,
real(r8), intent(out)  ECA_factor_phosphorus_mic,
real(r8), intent(out)  ECA_factor_minp_msurf,
real(r8), dimension(plant_ntypes), intent(out)  ECA_flx_phosphorus_plants 
)

Variable Documentation

◆ mod_filename

character(len=*), parameter, private bgccentcnpcompettype::mod_filename = __FILE__
private