
4: 30 Then Do
14: Z=F (P30)
1: 100 F
2: 00 Exponent of 10
3: 2 Z Loc [ RH ]
15: End (P95)
;IF RH>100, SET RH=100
16: Saturation Vapor Pressure (P56)
1: 1 Temperature Loc [ AIR_TEMP ]
2: 7 Loc [ SVP ]
;CALCULATING SATURATED VAPOR PRESSURE AS FUNCTION OF AIR TEMPERATURE
;IN KILO PASCAL [KPA]
17: Z=X*F (P37)
1: 2 X Loc [ RH ]
2: 0.01 F
3: 8 Z Loc [ VP ]
;THIS EQUATION CALCULATED THE FIRST STEP IN “VP=RH/100*SVP”
18: Z=X (P31)
1: 8 X Loc [ VP ]
2: 9 Z Loc [ AUX_SVP ]
;AUXILIARY STEP
19: Z=X*Y (P36)
1: 9 X Loc [ AUX_SVP ]
2: 7 Y Loc [ SVP ]
3: 8 Z Loc [ VP ]
;THIS IS THE RESULTING STEP IN “VP=RH/100*SVP”, IN [KPA]
20: Z=X-Y (P35)
1: 7 X Loc [ SVP ]
2: 8 Y Loc [ VP ]
3: 10 Z Loc [ VPD ]
;CALCULATING “VPD=SVP-VP”, VPD = VAPOR PRESSURE DEFICIT, IN [KPA]
21: If (X<=>F) (P89)
1: 3 X Loc [ SOLAR_RAD ]
2: 4 <
3: 0.0 F
4: 30 Then Do
22: Z=F (P30)
1: 0.0 F
2: 00 Exponent of 10
Annexes
Commenti su questo manuale