| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_lsm.F |
1293 |
RSURFP |
I NCH, UM, U2FAC, Z2, RDC, WET, ESATTC, EA, |
|
./pkg/fizhi/fizhi_lsm.F |
1302 |
RSURFP |
& WET(NCH), ESATTC(NCH), EA(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 |
1316 |
RSURFP |
HESAT = ESATTC(CHNO) * MIN( 1. _d 0, WET(CHNO)*2. _d 0) |
|
./pkg/fizhi/fizhi_lsm.F |
780 |
SOIL |
I NCH, ITYP, WET, VGBEEX, VGPSAX, VGCSAX, DELZ, |
|
./pkg/fizhi/fizhi_lsm.F |
793 |
SOIL |
_RL WET(NCH), PHR(NCH), SOILCO(NCH), VGPSAX(NCH), |
|
./pkg/fizhi/fizhi_lsm.F |
799 |
SOIL |
WET0 = MAX(WET(CHNO),0.01 _d 0) |