File |
Line number |
Procedure |
Code |
./pkg/down_slope/dwnslp_calc_flow.F |
150 |
DWNSLP_CALC_FLOW |
ishelf = 1-OLx + mod(ijs-1,xSize) |
./pkg/down_slope/dwnslp_calc_flow.F |
155 |
DWNSLP_CALC_FLOW |
& DWNSLP_shVsD(n,bi,bj), ishelf,jshelf, |
./pkg/down_slope/dwnslp_calc_flow.F |
57 |
DWNSLP_CALC_FLOW |
INTEGER kdeep, ishelf, jshelf, kshelf |
./pkg/down_slope/dwnslp_init_fixed.F |
216 |
DWNSLP_INIT_FIXED |
ishelf = ideep + MOD(ijr,xSize) |
./pkg/down_slope/dwnslp_init_fixed.F |
220 |
DWNSLP_INIT_FIXED |
kshelf = kSurfC(ishelf,jshelf,bi,bj) |
./pkg/down_slope/dwnslp_init_fixed.F |
224 |
DWNSLP_INIT_FIXED |
kshelf = kLowC (ishelf,jshelf,bi,bj) |
./pkg/down_slope/dwnslp_init_fixed.F |
228 |
DWNSLP_INIT_FIXED |
i= MAX(ideep,ishelf) |
./pkg/down_slope/dwnslp_init_fixed.F |
253 |
DWNSLP_INIT_FIXED |
& - Ro_surf(ishelf,jshelf,bi,bj) |
./pkg/down_slope/dwnslp_init_fixed.F |
257 |
DWNSLP_INIT_FIXED |
dz_bottom = R_low(ishelf,jshelf,bi,bj) |
./pkg/down_slope/dwnslp_init_fixed.F |
313 |
DWNSLP_INIT_FIXED |
ishelf = ideep + MOD(ijr,xSize) |
./pkg/down_slope/dwnslp_init_fixed.F |
316 |
DWNSLP_INIT_FIXED |
kshelf = kSurfC(ishelf,jshelf,bi,bj) |
./pkg/down_slope/dwnslp_init_fixed.F |
319 |
DWNSLP_INIT_FIXED |
kshelf = kLowC (ishelf,jshelf,bi,bj) |
./pkg/down_slope/dwnslp_init_fixed.F |
47 |
DWNSLP_INIT_FIXED |
INTEGER ishelf,jshelf,kshelf |