File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_lsm.F |
1561 |
GWATER |
I NCH, ITYP, WSMAX, PHLAY, AKLAY, TC, |
./pkg/fizhi/fizhi_lsm.F |
1579 |
GWATER |
_RL WSMAX(NLAY,NTYPS), PHLAY(nch,NLAY), |
./pkg/fizhi/fizhi_lsm.F |
1607 |
GWATER |
& * WSMAX(SFCLY,ITYP(CHNO)) |
./pkg/fizhi/fizhi_lsm.F |
1610 |
GWATER |
& SWET(ChNo,SFCLY) * WSMAX(SFCLY,ITYP(ChNo)) ) |
./pkg/fizhi/fizhi_lsm.F |
1611 |
GWATER |
GWFLUX = MIN( GWFLUX, WSMAX(ROOTLY,ITYP(ChNo)) - |
./pkg/fizhi/fizhi_lsm.F |
1612 |
GWATER |
& SWET(ChNo,ROOTLY) * WSMAX(ROOTLY,ITYP(ChNo)) ) |
./pkg/fizhi/fizhi_lsm.F |
1616 |
GWATER |
& SWET(ChNo,ROOTLY) * WSMAX(ROOTLY,ITYP(ChNo)) ) |
./pkg/fizhi/fizhi_lsm.F |
1617 |
GWATER |
GWFLUX = -MIN( ABS(GWFLUX), WSMAX(SFCLY,ITYP(ChNo)) - |
./pkg/fizhi/fizhi_lsm.F |
1618 |
GWATER |
& SWET(ChNo,SFCLY) * WSMAX(SFCLY,ITYP(ChNo)) ) |
./pkg/fizhi/fizhi_lsm.F |
1630 |
GWATER |
& GWFLUX / WSMAX(SFCLY,ITYP(ChNo)) |
./pkg/fizhi/fizhi_lsm.F |
1632 |
GWATER |
& GWFLUX / WSMAX(ROOTLY,ITYP(ChNo)) |
./pkg/fizhi/fizhi_lsm.F |
1647 |
GWATER |
& * WSMAX(ROOTLY,ITYP(CHNO)) |
./pkg/fizhi/fizhi_lsm.F |
1650 |
GWATER |
& SWET(ChNo,ROOTLY) * WSMAX(ROOTLY,ITYP(ChNo)) ) |
./pkg/fizhi/fizhi_lsm.F |
1651 |
GWATER |
GWFLUX = MIN( GWFLUX, WSMAX(RECHLY,ITYP(ChNo)) - |
./pkg/fizhi/fizhi_lsm.F |
1652 |
GWATER |
& SWET(ChNo,RECHLY) * WSMAX(RECHLY,ITYP(ChNo)) ) |
./pkg/fizhi/fizhi_lsm.F |
1656 |
GWATER |
& SWET(ChNo,RECHLY) * WSMAX(RECHLY,ITYP(ChNo)) ) |
./pkg/fizhi/fizhi_lsm.F |
1657 |
GWATER |
GWFLUX = -MIN( ABS(GWFLUX), WSMAX(ROOTLY,ITYP(ChNo)) - |
./pkg/fizhi/fizhi_lsm.F |
1658 |
GWATER |
& SWET(ChNo,ROOTLY) * WSMAX(ROOTLY,ITYP(ChNo)) ) |
./pkg/fizhi/fizhi_lsm.F |
1669 |
GWATER |
& GWFLUX / WSMAX(ROOTLY,ITYP(ChNo)) |
./pkg/fizhi/fizhi_lsm.F |
1671 |
GWATER |
& GWFLUX / WSMAX(RECHLY,ITYP(ChNo)) |
./pkg/fizhi/fizhi_lsm.F |
1686 |
GWATER |
& SWET(ChNo,RECHLY) * WSMAX(RECHLY,ITYP(ChNo)) ) |
./pkg/fizhi/fizhi_lsm.F |
1688 |
GWATER |
& GWFLUX / WSMAX(RECHLY,ITYP(ChNo)) |