File |
Line number |
Procedure |
Code |
./model/inc/GRID.h |
414 |
NO PROCEDURE |
& dxC,dxF,dxG,dxV,dyC,dyF,dyG,dyU, |
./model/inc/GRID.h |
439 |
NO PROCEDURE |
_RS dyU (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/mnc/mnc_cw_write_grid_info.F |
153 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RS_W('D',bfname(nf:nl),0,0,'dyU',dyU,myThid) |
./pkg/mom_common/mom_hdissip.F |
70 |
MOM_HDISSIP |
& dyU(i+1, j ,bi,bj)*dyU(i+1, j ,bi,bj) |
./pkg/mom_common/mom_hdissip.F |
72 |
MOM_HDISSIP |
& -dyU( i , j ,bi,bj)*dyU( i , j ,bi,bj) |
./pkg/mom_common/mom_uv_smag_3d.F |
101 |
MOM_UV_SMAG_3D |
& *dyU( i , j ,bi,bj) |
./pkg/mom_common/mom_uv_smag_3d.F |
99 |
MOM_UV_SMAG_3D |
& *dyU(i+1, j ,bi,bj) |
./pkg/mom_fluxform/mom_v_del2v.F |
113 |
MOM_V_DEL2V |
& *( hFacZClosedW*dyU( i ,j,bi,bj) |
./pkg/mom_fluxform/mom_v_del2v.F |
115 |
MOM_V_DEL2V |
& +hFacZClosedE*dyU(i+1,j,bi,bj) |
./model/src/config_summary.F |
946 |
CONFIG_SUMMARY |
CALL WRITE_XY_XLINE_RS( dyU, coordLine, tileLine, 'dyU', |
./model/src/config_summary.F |
948 |
CONFIG_SUMMARY |
CALL WRITE_XY_YLINE_RS( dyU, coordLine, tileLine, 'dyU', |
./pkg/obcs/orlanski_north.F |
114 |
ORLANSKI_NORTH |
CVEL_UN(I,K,bi,bj) = f1*(CL*dyU(I,J_obc-1,bi,bj)/deltaT)+ |
./pkg/obcs/orlanski_south.F |
114 |
ORLANSKI_SOUTH |
CVEL_US(I,K,bi,bj) = f1*(CL*dyU(I,J_obc+2,bi,bj)/deltaT)+ |
./model/src/ini_cartesian_grid.F |
130 |
INI_CARTESIAN_GRID |
dyU(i,j,bi,bj) = 0.5 _d 0*(dyG(i,j,bi,bj)+dyG(i,j-1,bi,bj)) |
./model/src/ini_cartesian_grid.F |
143 |
INI_CARTESIAN_GRID |
rAz(i,j,bi,bj) = dxV(i,j,bi,bj)*dyU(i,j,bi,bj) |
./model/src/ini_curvilinear_grid.F |
131 |
INI_CURVILINEAR_GRID |
CALL READ_REC_3D_RS( 'DYU.bin', fp, 1, dyU, 1, 0, myThid ) |
./model/src/ini_curvilinear_grid.F |
139 |
INI_CURVILINEAR_GRID |
dyU(sNx+1,1,bi,bj)=dyU(1,1,bi,bj) |
./model/src/ini_curvilinear_grid.F |
140 |
INI_CURVILINEAR_GRID |
dyU(1,sNy+1,bi,bj)=dyU(1,1,bi,bj) |
./model/src/ini_curvilinear_grid.F |
151 |
INI_CURVILINEAR_GRID |
CALL EXCH_UV_BGRID_3D_RS( dxV, dyU, .FALSE., 1, myThid ) |
./model/src/ini_curvilinear_grid.F |
236 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('D',mncFn,0,0,'dyU',dyU, myThid) |
./model/src/ini_curvilinear_grid.F |
315 |
INI_CURVILINEAR_GRID |
CALL MDS_FACEF_READ_RS( fName, fp, 9, dyU, bi, bj, myThid ) |
./model/src/ini_curvilinear_grid.F |
377 |
INI_CURVILINEAR_GRID |
CALL EXCH_UV_BGRID_3D_RS( dxV, dyU, .FALSE., 1, myThid) |
./model/src/ini_curvilinear_grid.F |
401 |
INI_CURVILINEAR_GRID |
dyU(i,j,bi,bj) = dyU(i,j,bi,bj)*tmpFac |
./model/src/ini_curvilinear_grid.F |
435 |
INI_CURVILINEAR_GRID |
CALL PLOT_FIELD_XYRS( dyU , 'Current dyU ', 0, myThid ) |
./model/src/ini_cylinder_grid.F |
141 |
INI_CYLINDER_GRID |
dyU(i,j,bi,bj) = 0.5 _d 0*(dyG(i,j,bi,bj)+dyG(i,j-1,bi,bj)) |
./model/src/ini_cylinder_grid.F |
152 |
INI_CYLINDER_GRID |
rAz(i,j,bi,bj) = dxV(i,j,bi,bj)*dyU(i,j,bi,bj) |
./model/src/ini_grid.F |
170 |
INI_GRID |
IF ( dyU(i,j,bi,bj) .NE. 0. ) |
./model/src/ini_grid.F |
171 |
INI_GRID |
& recip_dyU(i,j,bi,bj) = 1. _d 0/dyU(i,j,bi,bj) |
./model/src/ini_grid.F |
223 |
INI_GRID |
CALL MON_PRINTSTATS_RS(1,dyU,'DYU',myThid) |
./model/src/ini_grid.F |
84 |
INI_GRID |
dyU(i,j,bi,bj) = 0. |
./model/src/ini_spherical_polar_grid.F |
177 |
INI_SPHERICAL_POLAR_GRID |
dyU(i,j,bi,bj) = 0.5 _d 0*(dyG(i,j,bi,bj)+dyG(i,j-1,bi,bj)) |
./model/src/write_grid.F |
191 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'dyU',dyU,myThid) |