subroutine __module_sf_noahmplsm_f90__::carbon |
( |
type (noahmp_parameters), intent(in) | parameters, |
|
|
integer, intent(in) | nsnow, |
|
|
integer, intent(in) | nsoil, |
|
|
integer, intent(in) | vegtyp, |
|
|
real (kind=kind_phys), intent(in) | dt, |
|
|
real (kind=kind_phys), dimension( 1:nsoil), intent(in) | zsoil, |
|
|
real (kind=kind_phys), dimension(-nsnow+1:nsoil), intent(in) | dzsnso, |
|
|
real (kind=kind_phys), dimension(-nsnow+1:nsoil), intent(in) | stc, |
|
|
real (kind=kind_phys), dimension( 1:nsoil), intent(in) | smc, |
|
|
real (kind=kind_phys), intent(in) | tv, |
|
|
real (kind=kind_phys), intent(in) | tg, |
|
|
real (kind=kind_phys), intent(in) | psn, |
|
|
real (kind=kind_phys), intent(in) | foln, |
|
|
real (kind=kind_phys), intent(in) | btran, |
|
|
real (kind=kind_phys), intent(in) | apar, |
|
|
real (kind=kind_phys), intent(in) | fveg, |
|
|
real (kind=kind_phys), intent(in) | igs, |
|
|
real (kind=kind_phys), intent(in) | troot, |
|
|
integer, intent(in) | ist, |
|
|
real (kind=kind_phys), intent(in) | lat, |
|
|
integer, intent(in) | iloc, |
|
|
integer, intent(in) | jloc, |
|
|
real (kind=kind_phys), intent(inout) | lfmass, |
|
|
real (kind=kind_phys), intent(inout) | rtmass, |
|
|
real (kind=kind_phys), intent(inout) | stmass, |
|
|
real (kind=kind_phys), intent(inout) | wood, |
|
|
real (kind=kind_phys), intent(inout) | stblcp, |
|
|
real (kind=kind_phys), intent(inout) | fastcp, |
|
|
real (kind=kind_phys), intent(out) | gpp, |
|
|
real (kind=kind_phys), intent(out) | npp, |
|
|
real (kind=kind_phys), intent(out) | nee, |
|
|
real (kind=kind_phys), intent(out) | autors, |
|
|
real (kind=kind_phys), intent(out) | heters, |
|
|
real (kind=kind_phys), intent(out) | totsc, |
|
|
real (kind=kind_phys), intent(out) | totlb, |
|
|
real (kind=kind_phys), intent(out) | xlai, |
|
|
real (kind=kind_phys), intent(out) | xsai ) |
|
private |