| File |
Line number |
Procedure |
Code |
|
./model/src/calc_gw.F |
191 |
CALC_GW |
& MIN( rSurfW(i,j,bi,bj), rC(k-1) ) |
|
./model/src/calc_r_star.F |
108 |
CALC_R_STAR |
tmpfldW = rSurfW(i,j,bi,bj) - rLowW(i,j,bi,bj) |
|
./model/src/calc_r_star.F |
138 |
CALC_R_STAR |
tmpfldW = rSurfW(i,j,bi,bj) - rLowW(i,j,bi,bj) |
|
./model/src/calc_r_star.F |
194 |
CALC_R_STAR |
tmpfldW = rSurfW(iiw,jjw,bi,bj) - rLowW(iiw,jjw,bi,bj) |
|
./model/src/ini_masks_etc.F |
257 |
INI_MASKS_ETC |
rSurfW(i,j,bi,bj) = 0. |
|
./model/src/ini_masks_etc.F |
266 |
INI_MASKS_ETC |
rSurfW(i,j,bi,bj) = |
|
./model/src/ini_masks_etc.F |
284 |
INI_MASKS_ETC |
CALL EXCH_UV_XY_RS( rSurfW, rSurfS, .FALSE., myThid ) |
|
./model/src/ini_sigma_hfac.F |
136 |
INI_SIGMA_HFAC |
rSurfW(i,j,bi,bj) = rEmpty |
|
./model/src/ini_sigma_hfac.F |
149 |
INI_SIGMA_HFAC |
rSurfW(i,j,bi,bj) = |
|
./model/src/ini_sigma_hfac.F |
164 |
INI_SIGMA_HFAC |
rSurfW(i,j,bi,bj) = rEmpty |
|
./model/src/ini_sigma_hfac.F |
194 |
INI_SIGMA_HFAC |
CALL EXCH_UV_XY_RS( rSurfW, rSurfS, .FALSE., myThid ) |
|
./model/src/ini_sigma_hfac.F |
220 |
INI_SIGMA_HFAC |
& + dBHybSigF(k)*( rSurfW(i,j,bi,bj)-rLowW(i,j,bi,bj) ) |
|
./verification/hs94.cs-32x32x5/code/external_forcing.F |
76 |
EXTERNAL_FORCING_U |
& /(etaHw(i,j,bi,bj)+rSurfW(i,j,bi,bj)-rLowW(i,j,bi,bj)) |
|
./model/src/update_sigma.F |
131 |
UPDATE_SIGMA |
& + ( rSurfW(i,j,bi,bj)-rLowW(i,j,bi,bj) ) |
|
./model/inc/GRID.h |
415 |
NO PROCEDURE |
& Ro_surf, rSurfW, rSurfS, |
|
./model/inc/GRID.h |
443 |
NO PROCEDURE |
_RS rSurfW (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |