| File |
Line number |
Procedure |
Code |
|
./model/src/calc_gw.F |
100 |
CALC_GW |
PARAMETER( halfRS = 0.5 , zeroRS = 0. ) |
|
./model/src/calc_gw.F |
182 |
CALC_GW |
rThickC_C(i,j) = MAX( zeroRS, |
|
./model/src/calc_gw.F |
190 |
CALC_GW |
rThickC_W(i,j) = MAX( zeroRS, |
|
./model/src/calc_gw.F |
201 |
CALC_GW |
rThickC_S(i,j) = MAX( zeroRS, |
|
./model/src/calc_gw.F |
228 |
CALC_GW |
& drF(k-1)*MAX( h0FacC(i,j,k-1,bi,bj)-halfRS, zeroRS ) |
|
./model/src/calc_gw.F |
232 |
CALC_GW |
& drF(k-1)*MAX( _hFacC(i,j,k-1,bi,bj)-halfRS, zeroRS ) |
|
./model/src/calc_gw.F |
236 |
CALC_GW |
& drF(k-1)*MAX( _hFacW(i,j,k-1,bi,bj)-halfRS, zeroRS ) |
|
./model/src/calc_gw.F |
239 |
CALC_GW |
& drF(k-1)*MAX( _hFacS(i,j,k-1,bi,bj)-halfRS, zeroRS ) |
|
./model/src/calc_gw.F |
98 |
CALC_GW |
_RS halfRS, zeroRS |