| File |
Line number |
Procedure |
Code |
|
./model/src/calc_r_star.F |
110 |
CALC_R_STAR |
IF ( kSurfS(i,j,bi,bj).LE.Nr ) THEN |
|
./model/src/calc_r_star.F |
239 |
CALC_R_STAR |
IF (kSurfS(1-i,1-j,bi,bj).GT.Nr) rStarFacS(1-i,1-j,bi,bj)= 1. |
|
./model/src/calc_r_star.F |
240 |
CALC_R_STAR |
IF (kSurfS(ii, 1-j,bi,bj).GT.Nr) rStarFacS(ii, 1-j,bi,bj)= 1. |
|
./model/src/calc_r_star.F |
241 |
CALC_R_STAR |
IF (kSurfS(1-i,jj, bi,bj).GT.Nr) rStarFacS(1-i,jj, bi,bj)= 1. |
|
./model/src/calc_r_star.F |
242 |
CALC_R_STAR |
IF (kSurfS(ii, jj, bi,bj).GT.Nr) rStarFacS(ii, jj, bi,bj)= 1. |
|
./model/src/ini_masks_etc.F |
304 |
INI_MASKS_ETC |
kSurfS(i,j,bi,bj) = Nr+1 |
|
./model/src/ini_masks_etc.F |
307 |
INI_MASKS_ETC |
IF (hFacS(i,j,k,bi,bj).NE.0.) kSurfS(i,j,bi,bj) = k |
|
./model/src/ini_masks_etc.F |
312 |
INI_MASKS_ETC |
IF ( kSurfS(i,j,bi,bj).LE.Nr ) maskInS(i,j,bi,bj)= 1. |
|
./pkg/down_slope/dwnslp_init_fixed.F |
107 |
DWNSLP_INIT_FIXED |
IF ( kSurfS(i,j,bi,bj).LE.Nr ) THEN |
|
./pkg/down_slope/dwnslp_init_fixed.F |
166 |
DWNSLP_INIT_FIXED |
IF ( kSurfS(i,j,bi,bj).LE.Nr ) THEN |
|
./model/inc/GRID.h |
498 |
NO PROCEDURE |
& kSurfC, kSurfW, kSurfS, |
|
./model/inc/GRID.h |
502 |
NO PROCEDURE |
INTEGER kSurfS(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |