File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_lsm.F |
10 |
TILE |
I SQSCAT, RSOIL1, RSOIL2, RDC, U2FAC, |
./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 |
1312 |
RSURFP |
RSURF = RDC(ChNo) / U2 + 26. + 6. / (1.E-20 + WET(ChNo))**2 |
./pkg/fizhi/fizhi_lsm.F |
278 |
TILE |
I NCH, UM, U2FAC, Z2, RDC, SWET(1,SFCLY), |
./pkg/fizhi/fizhi_lsm.F |
311 |
TILE |
CALL RSURFP (NCH, UM, U2FAC, Z2, RDC, SWET(1,SFCLY), |
./pkg/fizhi/fizhi_lsm.F |
331 |
TILE |
CALL RSURFP (NCH, UM, U2FAC, Z2, RDC, SWET(1,SFCLY), |
./pkg/fizhi/fizhi_lsm.F |
40 |
TILE |
_RL RSOIL1(NCH), RSOIL2(NCH), RDC(NCH), U2FAC(NCH), |