File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_lsm.F |
1257 |
SMFAC |
_RL RCUNTD, RHOAIR, CONST, DEF, D12, DR2, |
./pkg/fizhi/fizhi_lsm.F |
1268 |
SMFAC |
CONST = RHOAIR * EPSILON / PSUR(ChNo) |
./pkg/fizhi/fizhi_lsm.F |
1269 |
SMFAC |
DEF = ( ESATTC(ChNo) - EA(ChNo) ) * CONST |
./pkg/fizhi/fizhi_lsm.F |
858 |
FLUXES |
_RL HLWTC, CDEEPS, Q0, RHOAIR, CONST, DHLWTC, |
./pkg/fizhi/fizhi_lsm.F |
874 |
FLUXES |
CONST = RHOAIR * EPSILON / PSUR(ChNo) |
./pkg/fizhi/fizhi_lsm.F |
910 |
FLUXES |
EPLANT = CONST * (ESATTC(ChNo) - EA(ChNo)) / RC(ChNo) |
./pkg/fizhi/fizhi_lsm.F |
924 |
FLUXES |
& max(0. _d 0, CONST*DESDTC(ChNo) - EHARMN*DRCDTC(ChNo) ) |
./pkg/fizhi/fizhi_lsm.F |
926 |
FLUXES |
& max( 0. _d 0, CONST + EHARMN*DRCDEA(ChNo) ) ) |