| Symbol | Description | Uses |
| HESAT | 5 |
| File | Line number | Procedure | Code |
| ./pkg/fizhi/fizhi_lsm.F | 1304 | RSURFP |
_RL U2, RSURF, HESAT |
| ./pkg/fizhi/fizhi_lsm.F | 1316 | RSURFP |
HESAT = ESATTC(CHNO) * MIN( 1. _d 0, WET(CHNO)*2. _d 0) |
| ./pkg/fizhi/fizhi_lsm.F | 1317 | RSURFP |
IF( EA(CHNO) .LT. HESAT ) THEN |
| ./pkg/fizhi/fizhi_lsm.F | 1318 | RSURFP |
RSURF=RSURF*( 1. + (ESATTC(CHNO)-HESAT)/(HESAT-EA(CHNO)) ) |