File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_wrapper.F |
238 |
FIZHI_WRAPPER |
tempdiag(i,j) = topoZ(i,j,bi,bj)*grav |
./pkg/fizhi/fizhi_wrapper.F |
265 |
FIZHI_WRAPPER |
& uphy,vphy,thphy,sphy,pephy4fiz,xC,yC,topoZ, |
./model/inc/SURFACE.h |
25 |
NO PROCEDURE |
COMMON /SURF_FIXED/ Bo_surf, recip_Bo, topoZ, phi0surf |
./model/inc/SURFACE.h |
28 |
NO PROCEDURE |
_RS topoZ (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./model/src/diags_phi_hyd.F |
84 |
DIAGS_PHI_HYD |
dPhiRef = phiRef(2*k) - gravity*topoZ(i,j,bi,bj) |
./model/src/diags_phi_rlow.F |
146 |
DIAGS_PHI_RLOW |
dPhiRef = phiRef(2*k+1) - gravity*topoZ(i,j,bi,bj) |
./model/src/ini_depths.F |
176 |
INI_DEPTHS |
CALL READ_REC_XY_RS( topoFile, topoZ, 1, 0, myThid ) |
./model/src/ini_depths.F |
177 |
INI_DEPTHS |
_EXCH_XY_RS( topoZ, myThid ) |
./model/src/ini_depths.F |
186 |
INI_DEPTHS |
CALL INI_P_GROUND( 2, topoZ, |
./model/src/ini_depths.F |
208 |
INI_DEPTHS |
Ro_surf(i,j,bi,bj) = topoZ(i,j,bi,bj) |
./model/src/ini_depths.F |
81 |
INI_DEPTHS |
topoZ(i,j,bi,bj) = 0. _d 0 |
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
177 |
INI_DEPTHS |
CALL READ_REC_XY_RS( topoFile, topoZ, 1, 0, myThid ) |
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
186 |
INI_DEPTHS |
CALL INI_P_GROUND( 2, topoZ, |
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
208 |
INI_DEPTHS |
Ro_surf(i,j,bi,bj) = topoZ(i,j,bi,bj) |
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
81 |
INI_DEPTHS |
topoZ(i,j,bi,bj) = 0. _d 0 |
./pkg/aim_v23/aim_do_physics.F |
135 |
AIM_DO_PHYSICS |
PHI0(I2) = gravity*topoZ(i,j,bi,bj) |
./pkg/aim_v23/aim_initialise.F |
83 |
AIM_INITIALISE |
CALL INI_P_GROUND(1, topoZ, truncSurfP, myThid ) |