| File |
Line number |
Procedure |
Code |
|
./model/src/calc_r_star.F |
234 |
CALC_R_STAR |
IF (kSurfW(1-i,1-j,bi,bj).GT.Nr) rStarFacW(1-i,1-j,bi,bj)= 1. |
|
./model/src/calc_r_star.F |
235 |
CALC_R_STAR |
IF (kSurfW(ii, 1-j,bi,bj).GT.Nr) rStarFacW(ii, 1-j,bi,bj)= 1. |
|
./model/src/calc_r_star.F |
236 |
CALC_R_STAR |
IF (kSurfW(1-i,jj, bi,bj).GT.Nr) rStarFacW(1-i,jj, bi,bj)= 1. |
|
./model/src/calc_r_star.F |
237 |
CALC_R_STAR |
IF (kSurfW(ii, jj, bi,bj).GT.Nr) rStarFacW(ii, jj, bi,bj)= 1. |
|
./model/src/calc_r_star.F |
96 |
CALC_R_STAR |
IF ( kSurfW(i,j,bi,bj).LE.Nr ) THEN |
|
./model/src/ini_masks_etc.F |
303 |
INI_MASKS_ETC |
kSurfW(i,j,bi,bj) = Nr+1 |
|
./model/src/ini_masks_etc.F |
306 |
INI_MASKS_ETC |
IF (hFacW(i,j,k,bi,bj).NE.0.) kSurfW(i,j,bi,bj) = k |
|
./model/src/ini_masks_etc.F |
310 |
INI_MASKS_ETC |
IF ( kSurfW(i,j,bi,bj).LE.Nr ) maskInW(i,j,bi,bj)= 1. |
|
./pkg/down_slope/dwnslp_init_fixed.F |
138 |
DWNSLP_INIT_FIXED |
IF ( kSurfW(i,j,bi,bj).LE.Nr ) THEN |
|
./pkg/down_slope/dwnslp_init_fixed.F |
79 |
DWNSLP_INIT_FIXED |
IF ( kSurfW(i,j,bi,bj).LE.Nr ) THEN |
|
./model/inc/GRID.h |
498 |
NO PROCEDURE |
& kSurfC, kSurfW, kSurfS, |
|
./model/inc/GRID.h |
501 |
NO PROCEDURE |
INTEGER kSurfW(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |