File |
Line number |
Procedure |
Code |
./model/inc/GRID.h |
414 |
NO PROCEDURE |
& dxC,dxF,dxG,dxV,dyC,dyF,dyG,dyU, |
./model/inc/GRID.h |
436 |
NO PROCEDURE |
_RS dyC (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/gmredi/submeso_calc_psi.F |
200 |
SUBMESO_CALC_PSI |
& *MIN( dyC(i,j,bi,bj), subMeso_Lmax ) |
./pkg/mnc/mnc_cw_write_grid_info.F |
147 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RS_W('D',bfname(nf:nl),0,0,'dyC',dyC,myThid) |
./pkg/mom_common/mom_calc_relvort3.F |
119 |
MOM_CALC_RELVORT3 |
& ( vFld(I,J)*dyC(I,J,bi,bj) |
./pkg/mom_common/mom_calc_relvort3.F |
133 |
MOM_CALC_RELVORT3 |
& vFld(I-1,J)*dyC(I-1,J,bi,bj) |
./pkg/mom_common/mom_calc_relvort3.F |
134 |
MOM_CALC_RELVORT3 |
& -vFld(I-2,J)*dyC(I-2,J,bi,bj) |
./pkg/mom_common/mom_calc_relvort3.F |
136 |
MOM_CALC_RELVORT3 |
& +vFld(I+0,J-1)*dyC(I+0,J-1,bi,bj) |
./pkg/mom_common/mom_calc_relvort3.F |
162 |
MOM_CALC_RELVORT3 |
& -vFld(I-1,J)*dyC(I-1,J,bi,bj) ) |
./pkg/mom_common/mom_calc_relvort3.F |
168 |
MOM_CALC_RELVORT3 |
& (-vFld(I-1,J)*dyC(I-1,J,bi,bj) |
./pkg/mom_common/mom_calc_relvort3.F |
177 |
MOM_CALC_RELVORT3 |
& - vFld(I-1,J)*dyC(I-1,J,bi,bj) |
./pkg/mom_common/mom_calc_relvort3.F |
190 |
MOM_CALC_RELVORT3 |
& vFld(I+1,J)*dyC(I+1,J,bi,bj) |
./pkg/mom_common/mom_calc_relvort3.F |
191 |
MOM_CALC_RELVORT3 |
& -vFld(I-0,J)*dyC(I-0,J,bi,bj) |
./pkg/mom_common/mom_calc_relvort3.F |
193 |
MOM_CALC_RELVORT3 |
& -vFld(I-1,J-1)*dyC(I-1,J-1,bi,bj) |
./pkg/mom_common/mom_calc_relvort3.F |
219 |
MOM_CALC_RELVORT3 |
& +vFld(I,J)*dyC(I,J,bi,bj) ) |
./pkg/mom_common/mom_calc_relvort3.F |
227 |
MOM_CALC_RELVORT3 |
& + vFld(I,J)*dyC(I,J,bi,bj) |
./pkg/mom_common/mom_calc_relvort3.F |
232 |
MOM_CALC_RELVORT3 |
& (+vFld(I,J)*dyC(I,J,bi,bj) |
./pkg/mom_common/mom_calc_relvort3.F |
247 |
MOM_CALC_RELVORT3 |
& vFld(I-1,J)*dyC(I-1,J,bi,bj) |
./pkg/mom_common/mom_calc_relvort3.F |
248 |
MOM_CALC_RELVORT3 |
& -vFld(I-2,J)*dyC(I-2,J,bi,bj) |
./pkg/mom_common/mom_calc_relvort3.F |
249 |
MOM_CALC_RELVORT3 |
& +vFld(I-0,J+1)*dyC(I-0,J+1,bi,bj) |
./pkg/mom_common/mom_calc_relvort3.F |
276 |
MOM_CALC_RELVORT3 |
& -vFld(I-1,J)*dyC(I-1,J,bi,bj) ) |
./pkg/mom_common/mom_calc_relvort3.F |
284 |
MOM_CALC_RELVORT3 |
& - vFld(I-1,J)*dyC(I-1,J,bi,bj) |
./pkg/mom_common/mom_calc_relvort3.F |
297 |
MOM_CALC_RELVORT3 |
& vFld(I+1,J)*dyC(I+1,J,bi,bj) |
./pkg/mom_common/mom_calc_relvort3.F |
298 |
MOM_CALC_RELVORT3 |
& -vFld(I-0,J)*dyC(I-0,J,bi,bj) |
./pkg/mom_common/mom_calc_relvort3.F |
299 |
MOM_CALC_RELVORT3 |
& -vFld(I-1,J+1)*dyC(I-1,J+1,bi,bj) |
./pkg/mom_common/mom_calc_relvort3.F |
59 |
MOM_CALC_RELVORT3 |
& ( vFld(I,J)*dyC(I,J,bi,bj) |
./pkg/mom_common/mom_calc_relvort3.F |
60 |
MOM_CALC_RELVORT3 |
& -vFld(I-1,J)*dyC(I-1,J,bi,bj) ) |
./pkg/mom_common/mom_calc_strain.F |
58 |
MOM_CALC_STRAIN |
& ( dyC( i , j ,bi,bj)*vFld( i , j ) |
./pkg/mom_common/mom_calc_strain.F |
59 |
MOM_CALC_STRAIN |
& -dyC(i-1, j ,bi,bj)*vFld(i-1, j ) |
./pkg/monitor/mon_ke.F |
102 |
MON_KE |
& *dxG(i, j ,bi,bj)*dyC(i, j ,bi,bj)*_hFacS(i, j ,k,bi,bj) |
./pkg/monitor/mon_ke.F |
104 |
MON_KE |
& *dxG(i,j+1,bi,bj)*dyC(i,j+1,bi,bj)*_hFacS(i,j+1,k,bi,bj) |
./pkg/monitor/mon_vort3.F |
136 |
MON_VORT3 |
& vVel( i ,j,k,bi,bj)*dyC( i ,j,bi,bj) |
./pkg/monitor/mon_vort3.F |
137 |
MON_VORT3 |
& -vVel(i-1,j,k,bi,bj)*dyC(i-1,j,bi,bj) |
./pkg/monitor/mon_vort3.F |
188 |
MON_VORT3 |
& vVel(i,j,k,bi,bj)*dyC(i,j,bi,bj) |
./pkg/monitor/mon_vort3.F |
203 |
MON_VORT3 |
& -vVel(i-1,j,k,bi,bj)*dyC(i-1,j,bi,bj) |
./pkg/monitor/mon_vort3.F |
218 |
MON_VORT3 |
& vVel(i,j,k,bi,bj)*dyC(i,j,bi,bj) |
./pkg/monitor/mon_vort3.F |
233 |
MON_VORT3 |
& -vVel(i-1,j,k,bi,bj)*dyC(i-1,j,bi,bj) |
./model/src/config_summary.F |
938 |
CONFIG_SUMMARY |
CALL WRITE_XY_XLINE_RS( dyC, coordLine, tileLine, 'dyC', |
./model/src/config_summary.F |
940 |
CONFIG_SUMMARY |
CALL WRITE_XY_YLINE_RS( dyC, coordLine, tileLine, 'dyC', |
./pkg/obcs/orlanski_north.F |
154 |
ORLANSKI_NORTH |
CVEL_TN(I,K,bi,bj) = f1*(CL*dyC(I,J_obc-1,bi,bj)/deltaT)+ |
./pkg/obcs/orlanski_north.F |
174 |
ORLANSKI_NORTH |
CVEL_SN(I,K,bi,bj) = f1*(CL*dyC(I,J_obc-1,bi,bj)/deltaT)+ |
./pkg/obcs/orlanski_north.F |
196 |
ORLANSKI_NORTH |
CVEL_WN(I,K,bi,bj)=f1*(CL*dyC(I,J_obc-1,bi,bj)/deltaT) |
./pkg/obcs/orlanski_south.F |
154 |
ORLANSKI_SOUTH |
CVEL_TS(I,K,bi,bj) = f1*(CL*dyC(I,J_obc+2,bi,bj)/deltaT)+ |
./pkg/obcs/orlanski_south.F |
174 |
ORLANSKI_SOUTH |
CVEL_SS(I,K,bi,bj) = f1*(CL*dyC(I,J_obc+2,bi,bj)/deltaT)+ |
./pkg/obcs/orlanski_south.F |
196 |
ORLANSKI_SOUTH |
CVEL_WS(I,K,bi,bj)=f1*(CL*dyC(I,J_obc+2,bi,bj)/deltaT) |
./model/src/ini_cartesian_grid.F |
121 |
INI_CARTESIAN_GRID |
dyC(i,j,bi,bj) = 0.5 _d 0*(dyF(i,j,bi,bj)+dyF(i,j-1,bi,bj)) |
./model/src/ini_cartesian_grid.F |
142 |
INI_CARTESIAN_GRID |
rAs(i,j,bi,bj) = dxG(i,j,bi,bj)*dyC(i,j,bi,bj) |
./pkg/seaice/seaice_growth.F |
1189 |
SEAICE_GROWTH |
tmpscal3 = 0.5 _d 0 * (dxC(I,J,bi,bj)+dyC(I,J,bi,bj)) |
./model/src/ini_curvilinear_grid.F |
168 |
INI_CURVILINEAR_GRID |
CALL READ_REC_3D_RS( 'DYC.bin', fp, 1, dyC, 1, 0, myThid ) |
./model/src/ini_curvilinear_grid.F |
169 |
INI_CURVILINEAR_GRID |
CALL EXCH_UV_XY_RS(dxC,dyC,.FALSE.,myThid) |
./model/src/ini_curvilinear_grid.F |
230 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('D',mncFn,0,0,'dyC',dyC, myThid) |
./model/src/ini_curvilinear_grid.F |
324 |
INI_CURVILINEAR_GRID |
CALL MDS_FACEF_READ_RS( fName, fp,12, dyC, bi, bj, myThid ) |
./model/src/ini_curvilinear_grid.F |
379 |
INI_CURVILINEAR_GRID |
CALL EXCH_UV_XY_RS(dxC,dyC,.FALSE.,myThid) |
./model/src/ini_curvilinear_grid.F |
395 |
INI_CURVILINEAR_GRID |
dyC(i,j,bi,bj) = dyC(i,j,bi,bj)*tmpFac |
./model/src/ini_curvilinear_grid.F |
438 |
INI_CURVILINEAR_GRID |
CALL PLOT_FIELD_XYRS( dyC , 'Current dyC ', 0, myThid ) |
./pkg/shap_filt/shap_filt_relvort3.F |
126 |
SHAP_FILT_RELVORT3 |
& ( vFld(I,J)*dyC(I,J,bi,bj) |
./pkg/shap_filt/shap_filt_relvort3.F |
141 |
SHAP_FILT_RELVORT3 |
& vFld(I-1,J)*dyC(I-1,J,bi,bj) |
./pkg/shap_filt/shap_filt_relvort3.F |
142 |
SHAP_FILT_RELVORT3 |
& -vFld(I-2,J)*dyC(I-2,J,bi,bj) |
./pkg/shap_filt/shap_filt_relvort3.F |
144 |
SHAP_FILT_RELVORT3 |
& +vFld(I+0,J-1)*dyC(I+0,J-1,bi,bj) |
./pkg/shap_filt/shap_filt_relvort3.F |
170 |
SHAP_FILT_RELVORT3 |
& -vFld(I-1,J)*dyC(I-1,J,bi,bj) ) |
./pkg/shap_filt/shap_filt_relvort3.F |
176 |
SHAP_FILT_RELVORT3 |
& (-vFld(I-1,J)*dyC(I-1,J,bi,bj) |
./pkg/shap_filt/shap_filt_relvort3.F |
185 |
SHAP_FILT_RELVORT3 |
& - vFld(I-1,J)*dyC(I-1,J,bi,bj) |
./pkg/shap_filt/shap_filt_relvort3.F |
199 |
SHAP_FILT_RELVORT3 |
& vFld(I+1,J)*dyC(I+1,J,bi,bj) |
./pkg/shap_filt/shap_filt_relvort3.F |
200 |
SHAP_FILT_RELVORT3 |
& -vFld(I-0,J)*dyC(I-0,J,bi,bj) |
./pkg/shap_filt/shap_filt_relvort3.F |
202 |
SHAP_FILT_RELVORT3 |
& -vFld(I-1,J-1)*dyC(I-1,J-1,bi,bj) |
./pkg/shap_filt/shap_filt_relvort3.F |
228 |
SHAP_FILT_RELVORT3 |
& +vFld(I,J)*dyC(I,J,bi,bj) ) |
./pkg/shap_filt/shap_filt_relvort3.F |
236 |
SHAP_FILT_RELVORT3 |
& + vFld(I,J)*dyC(I,J,bi,bj) |
./pkg/shap_filt/shap_filt_relvort3.F |
241 |
SHAP_FILT_RELVORT3 |
& (+vFld(I,J)*dyC(I,J,bi,bj) |
./pkg/shap_filt/shap_filt_relvort3.F |
257 |
SHAP_FILT_RELVORT3 |
& vFld(I-1,J)*dyC(I-1,J,bi,bj) |
./pkg/shap_filt/shap_filt_relvort3.F |
258 |
SHAP_FILT_RELVORT3 |
& -vFld(I-2,J)*dyC(I-2,J,bi,bj) |
./pkg/shap_filt/shap_filt_relvort3.F |
259 |
SHAP_FILT_RELVORT3 |
& +vFld(I-0,J+1)*dyC(I-0,J+1,bi,bj) |
./pkg/shap_filt/shap_filt_relvort3.F |
286 |
SHAP_FILT_RELVORT3 |
& -vFld(I-1,J)*dyC(I-1,J,bi,bj) ) |
./pkg/shap_filt/shap_filt_relvort3.F |
294 |
SHAP_FILT_RELVORT3 |
& - vFld(I-1,J)*dyC(I-1,J,bi,bj) |
./pkg/shap_filt/shap_filt_relvort3.F |
308 |
SHAP_FILT_RELVORT3 |
& vFld(I+1,J)*dyC(I+1,J,bi,bj) |
./pkg/shap_filt/shap_filt_relvort3.F |
309 |
SHAP_FILT_RELVORT3 |
& -vFld(I-0,J)*dyC(I-0,J,bi,bj) |
./pkg/shap_filt/shap_filt_relvort3.F |
310 |
SHAP_FILT_RELVORT3 |
& -vFld(I-1,J+1)*dyC(I-1,J+1,bi,bj) |
./pkg/shap_filt/shap_filt_relvort3.F |
63 |
SHAP_FILT_RELVORT3 |
& ( vFld(I,J)*dyC(I,J,bi,bj) |
./pkg/shap_filt/shap_filt_relvort3.F |
64 |
SHAP_FILT_RELVORT3 |
& -vFld(I-1,J)*dyC(I-1,J,bi,bj) ) |
./model/src/ini_cylinder_grid.F |
132 |
INI_CYLINDER_GRID |
dyC(i,j,bi,bj) = 0.5 _d 0*(dyF(i,j,bi,bj)+dyF(i,j-1,bi,bj)) |
./model/src/ini_cylinder_grid.F |
151 |
INI_CYLINDER_GRID |
rAs(i,j,bi,bj) = dxG(i,j,bi,bj)*dyC(i,j,bi,bj) |
./model/src/ini_grid.F |
162 |
INI_GRID |
IF ( dyC(i,j,bi,bj) .NE. 0. ) |
./model/src/ini_grid.F |
163 |
INI_GRID |
& recip_dyC(i,j,bi,bj) = 1. _d 0/dyC(i,j,bi,bj) |
./model/src/ini_grid.F |
220 |
INI_GRID |
CALL MON_PRINTSTATS_RS(1,dyC,'DYC',myThid) |
./model/src/ini_grid.F |
78 |
INI_GRID |
dyC(i,j,bi,bj) = 0. |
./pkg/streamice/streamice_driving_stress_ppm.F |
214 |
STREAMICE_DRIVING_STRESS_PPM |
& surf_el_streamice(i,j,bi,bj))/dyC(i,j+1,bi,bj) |
./pkg/streamice/streamice_driving_stress_ppm.F |
242 |
STREAMICE_DRIVING_STRESS_PPM |
& surf_el_streamice(i,j-1,bi,bj))/dyC(i,j,bi,bj) |
./model/src/ini_spherical_polar_grid.F |
162 |
INI_SPHERICAL_POLAR_GRID |
dyC(i,j,bi,bj) = 0.5 _d 0*(dyF(i,j,bi,bj)+dyF(i,j-1,bi,bj)) |
./model/src/write_grid.F |
185 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'dyC',dyC,myThid) |
./model/src/write_grid.F |
95 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'DYC',' ',dyC,-1,myThid) |