| File |
Line number |
Procedure |
Code |
|
./model/src/calc_surf_dr.F |
218 |
CALC_SURF_DR |
hFac_surfS(i,j,bi,bj) = |
|
./model/src/calc_surf_dr.F |
244 |
CALC_SURF_DR |
CALL EXCH_UV_XY_RS(hFac_surfW,hFac_surfS,.FALSE.,myThid) |
|
./model/src/calc_surf_dr.F |
79 |
CALC_SURF_DR |
hFac_surfS(i,j,bi,bj) = 0. |
|
./model/src/timestep.F |
246 |
TIMESTEP |
& *hFacS(i,j,k,bi,bj)/hFac_surfS(i,j,bi,bj) |
|
./model/inc/SURFACE.h |
58 |
NO PROCEDURE |
& hFac_surfC, hFac_surfW, hFac_surfS |
|
./model/inc/SURFACE.h |
61 |
NO PROCEDURE |
_RS hFac_surfS(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./model/src/update_surf_dr.F |
55 |
UPDATE_SURF_DR |
U hFac_surfC, hFac_surfW, hFac_surfS, |
|
./model/src/update_surf_dr.F |
86 |
UPDATE_SURF_DR |
hFacS(i,j,ks,bi,bj) = hFac_surfS(i,j,bi,bj) |
|
./model/src/update_surf_dr.F |
87 |
UPDATE_SURF_DR |
recip_hFacS(i,j,ks,bi,bj)= 1. _d 0 / hFac_surfS(i,j,bi,bj) |