| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_lsm.F |
1239 |
SMFAC |
I RCUN, VPDSTR, FTEMP, TC, PSUR, Z2, |
|
./pkg/fizhi/fizhi_lsm.F |
1255 |
SMFAC |
& PSUR(NCH), Z2(NCH), RSOIL1(NCH), RSOIL2(NCH), |
|
./pkg/fizhi/fizhi_lsm.F |
1271 |
SMFAC |
DR2 = PHR(ChNo) - Z2(ChNo) - VGPH2X(ChNo) |
|
./pkg/fizhi/fizhi_lsm.F |
1293 |
RSURFP |
I NCH, UM, U2FAC, Z2, RDC, WET, ESATTC, EA, |
|
./pkg/fizhi/fizhi_lsm.F |
1301 |
RSURFP |
_RL UM(NCH), U2FAC(NCH), Z2(NCH), RDC(NCH), |
|
./pkg/fizhi/fizhi_lsm.F |
272 |
TILE |
I VPDSTR, FTEMP, TC, PSUR, Z2, RSOIL1, RSOIL2, |
|
./pkg/fizhi/fizhi_lsm.F |
278 |
TILE |
I NCH, UM, U2FAC, Z2, RDC, SWET(1,SFCLY), |
|
./pkg/fizhi/fizhi_lsm.F |
307 |
TILE |
I VPDSTX, FTEMPX, TX, PSUR, Z2, RSOIL1, RSOIL2, |
|
./pkg/fizhi/fizhi_lsm.F |
311 |
TILE |
CALL RSURFP (NCH, UM, U2FAC, Z2, RDC, SWET(1,SFCLY), |
|
./pkg/fizhi/fizhi_lsm.F |
327 |
TILE |
I VPDSTX, FTEMP, TC, PSUR, Z2, RSOIL1, RSOIL2, |
|
./pkg/fizhi/fizhi_lsm.F |
331 |
TILE |
CALL RSURFP (NCH, UM, U2FAC, Z2, RDC, SWET(1,SFCLY), |
|
./pkg/fizhi/fizhi_lsm.F |
39 |
TILE |
& Z2(NCH), SQSCAT(NCH), DEDTC(NCH) |
|
./pkg/fizhi/fizhi_lsm.F |
9 |
TILE |
I SWNET, HLWDWN, PSUR, ZLAI, GREEN, Z2, |
|
./pkg/fizhi/fizhi_turb.F |
3076 |
PSI |
_RL ZZ0(irun),Z(irun),Z2(irun),Z1(irun),Z0(irun) |
|
./pkg/fizhi/fizhi_turb.F |
3242 |
PSI |
Z2(I) = ZWM |
|
./pkg/fizhi/fizhi_turb.F |
3246 |
PSI |
Z2(I) = Z(I) |
|
./pkg/fizhi/fizhi_turb.F |
3274 |
PSI |
Z2ZWM(I) = Z2(I) * RZWM |
|
./pkg/fizhi/fizhi_turb.F |
3309 |
PSI |
ARG1(I) = CM7 * Z2ZWM(I) / ( CM2 + Z2(I) ) |
|
./pkg/fizhi/fizhi_turb.F |
3311 |
PSI |
IF ( Z2(I) .GT. ZCM ) THEN |
|
./pkg/fizhi/fizhi_turb.F |
3313 |
PSI |
ARG1(I) = Z2(I) * RZCM |