| 177 | {{{ |
| 178 | !DSG mass conservation ======================================== |
| 179 | mass_before(:,:,:) = SUM(biomass(:,:,:,:),DIM=3) |
| 180 | |
| 181 | CALL phenology_prognostic (npts, dt_days, PFTpresent, veget_max, & |
| 182 | tlong_ref, t2m_month, t2m_week, gpp_daily, & |
| 183 | maxmoiavail_lastyear, minmoiavail_lastyear, moiavail_month, moiavail_week, & |
| 184 | gdd_m5_dormance, gdd_midwinter, ncd_dormance, ngd_minus5, & |
| 185 | senescence, time_hum_min, biomass, leaf_frac, & |
| 186 | leaf_age, when_growthinit, co2_to_bm, circ_class_n, & |
| 187 | circ_class_biomass, ind, c0_alloc, KF) |
| 188 | |
| 189 | !DSG mass conservation ============================================ |
| 190 | mass_change(:,:,icarbon) = zero |
| 191 | mass_change(:,:,initrogen) = zero |
| 192 | mass_change(:,:,iphosphorus) = zero |