search

lpmorenoc / dssat-csm-os

DSSAT Cropping System Model
BSD 3-Clause "New" or "Revised" License
0 stars 0 forks source link

Remove reserves stress factor on photosynthesis #51

Open lpmorenoc opened 2 years ago

lpmorenoc commented 2 years ago

The reserves stress factor (RSFP) is currently in the photosynthesis equation but it is not used: CARBOTMPRHR(hour) = AMAX1(0.0,(PARMJFAC*RADHR(hour)*3.6/1000.)*PARU*CO2FP*TFP* RSFP * VPD%get_YCA_VPDFPHR(hour) * SLPF *WFP) RSFPU and RSFPL are not defined so RSFP is always 1:

      IF (RSFPU > 0.0.AND.RSFPU > 0.0) THEN
              RSFP = 1.-AMIN1(1.,AMAX1(0.,(RSCD-RSFPL)/(RSFPU-RSFPL)))                                                 !EQN 260
            ELSE
              RSFP = 1.0
            ENDIF