File |
Line number |
Procedure |
Code |
./pkg/ecco/ecco_phys.F |
199 |
ECCO_PHYS |
& *dxG(i,j,bi,bj)*drF(k)*msktrVolS(i,j,bi,bj) |
./pkg/ecco/ecco_phys.F |
317 |
ECCO_PHYS |
tmpmskS=tmpmskS*hFacS(i,j,k,bi,bj)*dxG(i,j,bi,bj)*drF(k) |
./model/inc/GRID.h |
414 |
NO PROCEDURE |
& dxC,dxF,dxG,dxV,dyC,dyF,dyG,dyU, |
./model/inc/GRID.h |
434 |
NO PROCEDURE |
_RS dxG (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/gmredi/gmredi_calc_tensor.F |
1055 |
GMREDI_CALC_TENSOR |
tmp1k(i,j) = dxG(i,j,bi,bj)*drF(k) |
./pkg/gmredi/gmredi_residual_flow.F |
85 |
GMREDI_RESIDUAL_FLOW |
& +dxG(i,j+1,bi,bj)*GM_PsiY(i,j+1,k,bi,bj) |
./pkg/gmredi/gmredi_residual_flow.F |
86 |
GMREDI_RESIDUAL_FLOW |
& -dxG(i, j ,bi,bj)*GM_PsiY(i, j ,k,bi,bj) |
./pkg/gmredi/gmredi_rtransport.F |
174 |
GMREDI_RTRANSPORT |
& +dxG(i,j+1,bi,bj)*GM_PsiY(i,j+1,k,bi,bj) |
./pkg/gmredi/gmredi_rtransport.F |
175 |
GMREDI_RTRANSPORT |
& -dxG(i, j ,bi,bj)*GM_PsiY(i, j ,k,bi,bj) |
./pkg/gmredi/gmredi_ytransport.F |
192 |
GMREDI_YTRANSPORT |
vTrans(i,j) = dxG(i,j,bi,bj)*( GM_PsiY(i,j,kp1,bi,bj)*maskp1 |
./pkg/gmredi/gmredi_ytransport.F |
219 |
GMREDI_YTRANSPORT |
tmp1k(i,j) = dxG(i,j,bi,bj)*( GM_PsiY(i,j,kp1,bi,bj)*maskp1 |
./model/src/add_walls2masks.F |
92 |
ADD_WALLS2MASKS |
IF ( dxG(i,j,bi,bj).EQ.zeroRS ) THEN |
./pkg/mnc/mnc_cw_write_grid_info.F |
150 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RS_W('D',bfname(nf:nl),0,0,'dxG',dxG,myThid) |
./pkg/mom_common/mom_calc_hdiv.F |
41 |
MOM_CALC_HDIV |
& +vFld( i ,j+1)*dxG( i ,j+1,bi,bj) |
./pkg/mom_common/mom_calc_hdiv.F |
42 |
MOM_CALC_HDIV |
& -vFld( i , j )*dxG( i , j ,bi,bj) |
./pkg/mom_common/mom_calc_hdiv.F |
58 |
MOM_CALC_HDIV |
& +( vFld( i ,j+1)*dxG( i ,j+1,bi,bj)*hFacS( i ,j+1,k,bi,bj) |
./pkg/mom_common/mom_calc_hdiv.F |
59 |
MOM_CALC_HDIV |
& -vFld( i , j )*dxG( i , j ,bi,bj)*hFacS( i , j ,k,bi,bj) ) |
./pkg/mom_common/mom_calc_tension.F |
57 |
MOM_CALC_TENSION |
& -dxG( i ,j+1,bi,bj)*vFld( i ,j+1) |
./pkg/mom_common/mom_calc_tension.F |
58 |
MOM_CALC_TENSION |
& +dxG( i , j ,bi,bj)*vFld( i , j ) |
./pkg/mom_common/mom_w_smag_3d.F |
86 |
MOM_W_SMAG_3D |
& *dxG( i ,j+1,bi,bj) |
./pkg/mom_common/mom_w_smag_3d.F |
89 |
MOM_W_SMAG_3D |
& *dxG( i , j ,bi,bj) |
./pkg/mom_fluxform/mom_uv_boundary.F |
99 |
MOM_UV_BOUNDARY |
& * dxG(i,j,bi,bj)*deepFacC(k) |
./pkg/mom_vecinv/mom_vi_coriolis.F |
44 |
MOM_VI_CORIOLIS |
& (vFld( i , j )*dxG( i , j ,bi,bj)*_hFacS( i , j ,k,bi,bj) |
./pkg/mom_vecinv/mom_vi_coriolis.F |
45 |
MOM_VI_CORIOLIS |
& +vFld(i-1, j )*dxG(i-1, j ,bi,bj)*_hFacS(i-1, j ,k,bi,bj)) |
./pkg/mom_vecinv/mom_vi_coriolis.F |
46 |
MOM_VI_CORIOLIS |
& +(vFld( i ,j+1)*dxG( i ,j+1,bi,bj)*_hFacS( i ,j+1,k,bi,bj) |
./pkg/mom_vecinv/mom_vi_coriolis.F |
47 |
MOM_VI_CORIOLIS |
& +vFld(i-1,j+1)*dxG(i-1,j+1,bi,bj)*_hFacS(i-1,j+1,k,bi,bj))) |
./pkg/mom_vecinv/mom_vi_coriolis.F |
60 |
MOM_VI_CORIOLIS |
& (vFld( i , j )*dxG( i , j ,bi,bj) |
./pkg/mom_vecinv/mom_vi_coriolis.F |
61 |
MOM_VI_CORIOLIS |
& +vFld(i-1, j )*dxG(i-1, j ,bi,bj)) |
./pkg/mom_vecinv/mom_vi_coriolis.F |
62 |
MOM_VI_CORIOLIS |
& +(vFld( i ,j+1)*dxG( i ,j+1,bi,bj) |
./pkg/mom_vecinv/mom_vi_coriolis.F |
63 |
MOM_VI_CORIOLIS |
& +vFld(i-1,j+1)*dxG(i-1,j+1,bi,bj)) |
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
119 |
MOM_VI_U_CORIOLIS |
& vFld( i , j )*dxG( i , j ,bi,bj)*_hFacS( i , j ,k,bi,bj) |
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
120 |
MOM_VI_U_CORIOLIS |
& +vFld(i-1, j )*dxG(i-1, j ,bi,bj)*_hFacS(i-1, j ,k,bi,bj) ) |
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
122 |
MOM_VI_U_CORIOLIS |
& vFld( i ,j+1)*dxG( i ,j+1,bi,bj)*_hFacS( i ,j+1,k,bi,bj) |
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
123 |
MOM_VI_U_CORIOLIS |
& +vFld(i-1,j+1)*dxG(i-1,j+1,bi,bj)*_hFacS(i-1,j+1,k,bi,bj) ) |
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
154 |
MOM_VI_U_CORIOLIS |
& *vFld(i-1, j )*dxG(i-1, j ,bi,bj)*_hFacS(i-1, j ,k,bi,bj) |
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
160 |
MOM_VI_U_CORIOLIS |
& *vFld( i , j )*dxG( i , j ,bi,bj)*_hFacS( i , j ,k,bi,bj) |
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
166 |
MOM_VI_U_CORIOLIS |
& *vFld(i-1,j+1)*dxG(i-1,j+1,bi,bj)*_hFacS(i-1,j+1,k,bi,bj) |
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
172 |
MOM_VI_U_CORIOLIS |
& *vFld( i ,j+1)*dxG( i ,j+1,bi,bj)*_hFacS( i ,j+1,k,bi,bj) |
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
68 |
MOM_VI_U_CORIOLIS |
& (vFld( i , j )*dxG( i , j ,bi,bj)*_hFacS( i , j ,k,bi,bj) |
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
69 |
MOM_VI_U_CORIOLIS |
& +vFld(i-1, j )*dxG(i-1, j ,bi,bj)*_hFacS(i-1, j ,k,bi,bj)) |
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
70 |
MOM_VI_U_CORIOLIS |
& +(vFld( i ,j+1)*dxG( i ,j+1,bi,bj)*_hFacS( i ,j+1,k,bi,bj) |
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
71 |
MOM_VI_U_CORIOLIS |
& +vFld(i-1,j+1)*dxG(i-1,j+1,bi,bj)*_hFacS(i-1,j+1,k,bi,bj)) |
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
94 |
MOM_VI_U_CORIOLIS |
& (vFld( i , j )*dxG( i , j ,bi,bj)*hFacZ(i, j ) |
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
95 |
MOM_VI_U_CORIOLIS |
& +vFld(i-1, j )*dxG(i-1, j ,bi,bj)*hFacZ(i, j )) |
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
96 |
MOM_VI_U_CORIOLIS |
& +(vFld( i ,j+1)*dxG( i ,j+1,bi,bj)*hFacZ(i,j+1) |
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
97 |
MOM_VI_U_CORIOLIS |
& +vFld(i-1,j+1)*dxG(i-1,j+1,bi,bj)*hFacZ(i,j+1)) |
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
132 |
MOM_VI_U_CORIOLIS_C4 |
& (vFld( i , j )*dxG( i , j ,bi,bj)*_hFacS( i , j ,k,bi,bj) |
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
133 |
MOM_VI_U_CORIOLIS_C4 |
& +vFld(i-1, j )*dxG(i-1, j ,bi,bj)*_hFacS(i-1, j ,k,bi,bj)) |
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
134 |
MOM_VI_U_CORIOLIS_C4 |
& +(vFld( i ,j+1)*dxG( i ,j+1,bi,bj)*_hFacS( i ,j+1,k,bi,bj) |
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
135 |
MOM_VI_U_CORIOLIS_C4 |
& +vFld(i-1,j+1)*dxG(i-1,j+1,bi,bj)*_hFacS(i-1,j+1,k,bi,bj)) |
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
173 |
MOM_VI_U_CORIOLIS_C4 |
& vFld( i , j )*dxG( i , j ,bi,bj)*_hFacS( i , j ,k,bi,bj) |
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
174 |
MOM_VI_U_CORIOLIS_C4 |
& +vFld(i-1, j )*dxG(i-1, j ,bi,bj)*_hFacS(i-1, j ,k,bi,bj) ) |
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
176 |
MOM_VI_U_CORIOLIS_C4 |
& vFld( i ,j+1)*dxG( i ,j+1,bi,bj)*_hFacS( i ,j+1,k,bi,bj) |
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
177 |
MOM_VI_U_CORIOLIS_C4 |
& +vFld(i-1,j+1)*dxG(i-1,j+1,bi,bj)*_hFacS(i-1,j+1,k,bi,bj) ) |
./pkg/monitor/mon_calc_advcfl.F |
80 |
MON_CALC_ADVCFL_TILE |
vTrans(i,j) = vFld(i,j,k)*dxG(i,j,bi,bj)*deepFacC(k) |
./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) |
./model/src/config_summary.F |
926 |
CONFIG_SUMMARY |
CALL WRITE_XY_XLINE_RS( dxG, coordLine, tileLine, 'dxG', |
./model/src/config_summary.F |
928 |
CONFIG_SUMMARY |
CALL WRITE_XY_YLINE_RS( dxG, coordLine, tileLine, 'dxG', |
./pkg/obcs/obcs_balance_flow.F |
199 |
OBCS_BALANCE_FLOW |
tmpA = drF(k)*hFacS(i,jB,k,bi,bj)*dxG(i,jB,bi,bj) |
./pkg/obcs/obcs_balance_flow.F |
248 |
OBCS_BALANCE_FLOW |
tmpA = drF(k)*hFacS(i,1+jB,k,bi,bj)*dxG(i,1+jB,bi,bj) |
./pkg/obcs/obcs_diag_balance.F |
142 |
OBCS_DIAG_BALANCE |
tmpA = drF(k)*hFacS(i,jB,k,bi,bj)*dxG(i,jB,bi,bj) |
./pkg/obcs/obcs_diag_balance.F |
165 |
OBCS_DIAG_BALANCE |
tmpA = drF(k)*hFacS(i,jB,k,bi,bj)*dxG(i,jB,bi,bj) |
./pkg/obcs/obcs_diag_balance.F |
256 |
OBCS_DIAG_BALANCE |
& *dxG(i,jB,bi,bj)*maskInS(i,jB,bi,bj) |
./pkg/obcs/obcs_diag_balance.F |
277 |
OBCS_DIAG_BALANCE |
& *dxG(i,jB,bi,bj)*maskInS(i,jB,bi,bj) |
./pkg/obcs/obcs_monitor.F |
116 |
OBCS_MONITOR |
I Nr, Nr, 2, vVel, hFacS, dxG, drF, maskInC, |
./pkg/obcs/obcs_monitor.F |
138 |
OBCS_MONITOR |
I Nr, Nr, 0, theta, hFacS, dxG, drF, maskInC, |
./pkg/obcs/obcs_monitor.F |
160 |
OBCS_MONITOR |
I Nr, Nr, 0, salt, hFacS, dxG, drF, maskInC, |
./model/src/ini_cartesian_grid.F |
102 |
INI_CARTESIAN_GRID |
dxG(i,j,bi,bj) = delXloc(i) |
./model/src/ini_cartesian_grid.F |
129 |
INI_CARTESIAN_GRID |
dxV(i,j,bi,bj) = 0.5 _d 0*(dxG(i,j,bi,bj)+dxG(i-1,j,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) |
./model/src/ini_curvilinear_grid.F |
175 |
INI_CURVILINEAR_GRID |
CALL READ_REC_3D_RS( 'DXG.bin', fp, 1, dxG, 1, 0, myThid ) |
./model/src/ini_curvilinear_grid.F |
177 |
INI_CURVILINEAR_GRID |
CALL EXCH_UV_XY_RS(dyG,dxG,.FALSE.,myThid) |
./model/src/ini_curvilinear_grid.F |
233 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('D',mncFn,0,0,'dxG',dxG, myThid) |
./model/src/ini_curvilinear_grid.F |
333 |
INI_CURVILINEAR_GRID |
CALL MDS_FACEF_READ_RS( fName, fp,15, dxG, bi, bj, myThid ) |
./model/src/ini_curvilinear_grid.F |
381 |
INI_CURVILINEAR_GRID |
CALL EXCH_UV_XY_RS(dyG,dxG,.FALSE.,myThid) |
./model/src/ini_curvilinear_grid.F |
396 |
INI_CURVILINEAR_GRID |
dxG(i,j,bi,bj) = dxG(i,j,bi,bj)*tmpFac |
./model/src/ini_curvilinear_grid.F |
441 |
INI_CURVILINEAR_GRID |
CALL PLOT_FIELD_XYRS( dxG , 'Current dxG ', 0, myThid ) |
./pkg/shap_filt/shap_filt_tracer_s2.F |
168 |
SHAP_FILT_TRACER_S2 |
& *dxG(i,j,bi,bj)*recip_dyC(i,j,bi,bj) |
./model/src/ini_cylinder_grid.F |
111 |
INI_CYLINDER_GRID |
dxG(i,j,bi,bj) = thisRad*dtheta*deg2rad |
./model/src/ini_cylinder_grid.F |
140 |
INI_CYLINDER_GRID |
dxV(i,j,bi,bj) = 0.5 _d 0*(dxG(i,j,bi,bj)+dxG(i-1,j,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) |
./pkg/smooth/smooth_diff2d.F |
147 |
SMOOTH_DIFF2D |
& smooth2D_Kvy(i,j,bi,bj)*dxG(i,j,bi,bj)* |
./pkg/smooth/smooth_diff2d.F |
152 |
SMOOTH_DIFF2D |
& smooth2D_Kvy(i,j+1,bi,bj)*dxG(i,j+1,bi,bj)* |
./pkg/streamice/streamice_adv_front.F |
168 |
STREAMICE_ADV_FRONT |
& dxG(i,j,bi,bj) * time_step |
./pkg/streamice/streamice_adv_front.F |
180 |
STREAMICE_ADV_FRONT |
& dxG(i+1,j,bi,bj) * time_step |
./pkg/streamice/streamice_adv_front.F |
275 |
STREAMICE_ADV_FRONT |
& dxG(i-1+k,j,bi,bj) |
./pkg/streamice/streamice_adv_front.F |
283 |
STREAMICE_ADV_FRONT |
& dxG(i,j-1+k,bi,bj) |
./pkg/streamice/streamice_advect_2dtracer.F |
186 |
STREAMICE_ADVECT_2DTRACER |
& ((ytracflux(i,j+1,bi,bj)*dxG(i,j+1,bi,bj) - |
./pkg/streamice/streamice_advect_2dtracer.F |
187 |
STREAMICE_ADVECT_2DTRACER |
& ytracflux(i,j,bi,bj)*dxG(i,j,bi,bj)) * |
./pkg/streamice/streamice_advect_2dtracer.F |
189 |
STREAMICE_ADVECT_2DTRACER |
& (vtrans(i,j+1,bi,bj)*dxG(i,j+1,bi,bj) - |
./pkg/streamice/streamice_advect_2dtracer.F |
190 |
STREAMICE_ADVECT_2DTRACER |
& vtrans(i,j,bi,bj)*dxG(i,j,bi,bj)) * |
./pkg/streamice/streamice_advect_thickness.F |
278 |
STREAMICE_ADVECT_THICKNESS |
& (hflux_y_SI(i,j+1,bi,bj)*dxG(i,j+1,bi,bj) - |
./pkg/streamice/streamice_advect_thickness.F |
279 |
STREAMICE_ADVECT_THICKNESS |
& hflux_y_SI(i,j,bi,bj)*dxG(i,j,bi,bj)) * |
./model/src/ini_grid.F |
156 |
INI_GRID |
IF ( dxG(i,j,bi,bj) .NE. 0. ) |
./model/src/ini_grid.F |
157 |
INI_GRID |
& recip_dxG(i,j,bi,bj) = 1. _d 0/dxG(i,j,bi,bj) |
./model/src/ini_grid.F |
216 |
INI_GRID |
CALL MON_PRINTSTATS_RS(1,dxG,'DXG',myThid) |
./model/src/ini_grid.F |
79 |
INI_GRID |
dxG(i,j,bi,bj) = 0. |
./pkg/streamice/streamice_driving_stress.F |
418 |
STREAMICE_DRIVING_STRESS |
& 0.25 * dxG(i,j,bi,bj) * |
./pkg/streamice/streamice_driving_stress.F |
445 |
STREAMICE_DRIVING_STRESS |
& 0.25 * dxG(i,j,bi,bj) * |
./pkg/streamice/streamice_driving_stress.F |
462 |
STREAMICE_DRIVING_STRESS |
& 0.25 * dxG(i,j,bi,bj) * |
./pkg/streamice/streamice_driving_stress.F |
468 |
STREAMICE_DRIVING_STRESS |
& 0.25 * dxG(i,j,bi,bj) * gravity * ( |
./pkg/streamice/streamice_driving_stress.F |
481 |
STREAMICE_DRIVING_STRESS |
& 0.25 * dxG(i,j,bi,bj) * |
./pkg/streamice/streamice_driving_stress.F |
507 |
STREAMICE_DRIVING_STRESS |
& 0.25 * dxG(i,j,bi,bj) * |
./pkg/streamice/streamice_driving_stress.F |
525 |
STREAMICE_DRIVING_STRESS |
& 0.25 * dxG(i,j,bi,bj) * |
./pkg/streamice/streamice_driving_stress.F |
531 |
STREAMICE_DRIVING_STRESS |
& 0.25 * dxG(i,j,bi,bj) * gravity * ( |
./pkg/streamice/streamice_driving_stress.F |
544 |
STREAMICE_DRIVING_STRESS |
& 0.25 * dxG(i,j,bi,bj) * |
./pkg/streamice/streamice_driving_stress.F |
565 |
STREAMICE_DRIVING_STRESS |
& 0.25 * dxG(i-1,j,bi,bj) * |
./pkg/streamice/streamice_driving_stress.F |
593 |
STREAMICE_DRIVING_STRESS |
& 0.25 * dxG(i-1,j,bi,bj) * |
./pkg/streamice/streamice_driving_stress.F |
610 |
STREAMICE_DRIVING_STRESS |
& 0.25 * dxG(i-1,j,bi,bj) * |
./pkg/streamice/streamice_driving_stress.F |
616 |
STREAMICE_DRIVING_STRESS |
& 0.25 * dxG(i-1,j,bi,bj) * gravity * ( |
./pkg/streamice/streamice_driving_stress.F |
628 |
STREAMICE_DRIVING_STRESS |
& 0.25 * dxG(i-1,j,bi,bj) * |
./pkg/streamice/streamice_driving_stress.F |
655 |
STREAMICE_DRIVING_STRESS |
& 0.25 * dxG(i-1,j,bi,bj) * |
./pkg/streamice/streamice_driving_stress.F |
672 |
STREAMICE_DRIVING_STRESS |
& 0.25 * dxG(i-1,j,bi,bj) * |
./pkg/streamice/streamice_driving_stress.F |
678 |
STREAMICE_DRIVING_STRESS |
& 0.25 * dxG(i-1,j,bi,bj) * gravity * ( |
./pkg/streamice/streamice_driving_stress.F |
690 |
STREAMICE_DRIVING_STRESS |
& 0.25 * dxG(i-1,j,bi,bj) * |
./pkg/streamice/streamice_driving_stress_fd.F |
176 |
STREAMICE_DRIVING_STRESS_FD |
& 0.5 * dxG(i,j,bi,bj) |
./pkg/streamice/streamice_driving_stress_fd.F |
182 |
STREAMICE_DRIVING_STRESS_FD |
& 0.5 * dxG(i,j,bi,bj) |
./pkg/streamice/streamice_driving_stress_fd.F |
192 |
STREAMICE_DRIVING_STRESS_FD |
& 0.5 * dxG(i,j,bi,bj) |
./pkg/streamice/streamice_driving_stress_fd.F |
198 |
STREAMICE_DRIVING_STRESS_FD |
& 0.5 * dxG(i,j,bi,bj) |
./pkg/streamice/streamice_driving_stress_fd.F |
208 |
STREAMICE_DRIVING_STRESS_FD |
& 0.5 * dxG(i,j+1,bi,bj) |
./pkg/streamice/streamice_driving_stress_fd.F |
214 |
STREAMICE_DRIVING_STRESS_FD |
& 0.5 * dxG(i,j+1,bi,bj) |
./pkg/streamice/streamice_driving_stress_fd.F |
224 |
STREAMICE_DRIVING_STRESS_FD |
& 0.5 * dxG(i,j+1,bi,bj) |
./pkg/streamice/streamice_driving_stress_fd.F |
230 |
STREAMICE_DRIVING_STRESS_FD |
& 0.5 * dxG(i,j+1,bi,bj) |
./pkg/streamice/streamice_driving_stress_fd.F |
326 |
STREAMICE_DRIVING_STRESS_FD |
& (0.5 * dxG(i,j,bi,bj) + 0.25 * dxF(i,j,bi,bj)) * |
./pkg/streamice/streamice_driving_stress_fd.F |
342 |
STREAMICE_DRIVING_STRESS_FD |
& (0.5 * dxG(i,j+1,bi,bj) + 0.25 * dxF(i,j,bi,bj)) * |
./pkg/streamice/streamice_driving_stress_fd.F |
358 |
STREAMICE_DRIVING_STRESS_FD |
& (0.5 * dxG(i,j,bi,bj) + 0.25 * dxF(i,j,bi,bj)) * |
./pkg/streamice/streamice_driving_stress_fd.F |
374 |
STREAMICE_DRIVING_STRESS_FD |
& (0.5 * dxG(i,j+1,bi,bj) + 0.25 * dxF(i,j,bi,bj)) * |
./pkg/streamice/streamice_driving_stress_fd.F |
404 |
STREAMICE_DRIVING_STRESS_FD |
& 0.25 * dxG(i,j+1,bi,bj) * |
./pkg/streamice/streamice_driving_stress_fd.F |
418 |
STREAMICE_DRIVING_STRESS_FD |
& 0.25 * dxG(i,j+1,bi,bj) * |
./pkg/streamice/streamice_driving_stress_fd.F |
441 |
STREAMICE_DRIVING_STRESS_FD |
& 0.25 * dxG(i,j,bi,bj) * |
./pkg/streamice/streamice_driving_stress_fd.F |
455 |
STREAMICE_DRIVING_STRESS_FD |
& 0.25 * dxG(i,j,bi,bj) * |
./pkg/streamice/streamice_driving_stress_ppm.F |
391 |
STREAMICE_DRIVING_STRESS_PPM |
& .5 * dxG(i,j,bi,bj)*(neu_val+streamice_addl_backstress) |
./pkg/streamice/streamice_driving_stress_ppm.F |
393 |
STREAMICE_DRIVING_STRESS_PPM |
& .5 * dxG(i,j,bi,bj)*(neu_val+streamice_addl_backstress) |
./pkg/streamice/streamice_driving_stress_ppm.F |
401 |
STREAMICE_DRIVING_STRESS_PPM |
& .5 * dxG(i,j+1,bi,bj)*(neu_val+streamice_addl_backstress) |
./pkg/streamice/streamice_driving_stress_ppm.F |
403 |
STREAMICE_DRIVING_STRESS_PPM |
& .5 * dxG(i,j+1,bi,bj)*(neu_val+streamice_addl_backstress) |
./pkg/streamice/streamice_forced_buttress.F |
198 |
STREAMICE_FORCED_BUTTRESS |
& .5 * dxG(i,j+1,bi,bj) * unconf_stress |
./pkg/streamice/streamice_forced_buttress.F |
203 |
STREAMICE_FORCED_BUTTRESS |
& .5 * unconf_stress * dxG(i,j+1,bi,bj) |
./pkg/streamice/streamice_forced_buttress.F |
217 |
STREAMICE_FORCED_BUTTRESS |
& .5 * dxG(i,j,bi,bj) * unconf_stress |
./pkg/streamice/streamice_forced_buttress.F |
222 |
STREAMICE_FORCED_BUTTRESS |
& .5 * unconf_stress * dxG(i,j,bi,bj) |
./pkg/streamice/streamice_init_fixed.F |
303 |
STREAMICE_INIT_FIXED |
& (dxG(i+1,j,bi,bj)-dxG(i,j,bi,bj)) |
./pkg/streamice/streamice_init_phi.F |
90 |
STREAMICE_INIT_PHI |
& (Xquad(3-yq)*dxG(i,j,bi,bj) + Xquad(yq)*dxG(i,j+1,bi,bj)) |
./pkg/streamice/streamice_taub.F |
67 |
STREAMICE_TAUB |
& dxG(i,j+l,bi,bj)*dyG(i+k,j,bi,bj) * |
./pkg/streamice/streamice_taub.F |
75 |
STREAMICE_TAUB |
& dxG(i,j+l,bi,bj)*dyG(i+k,j,bi,bj) * |
./pkg/streamice/streamice_visc_beta.F |
52 |
STREAMICE_VISC_BETA |
& dxG(i,j+l,bi,bj)*dyG(i+k,j,bi,bj) * |
./pkg/streamice/streamice_visc_beta.F |
56 |
STREAMICE_VISC_BETA |
& dxG(i,j+l,bi,bj)*dyG(i+k,j,bi,bj) * |
./pkg/streamice/streamice_visc_beta_hybrid.F |
72 |
STREAMICE_VISC_BETA_HYBRID |
& dxG(i,j+l,bi,bj)*dyG(i+k,j,bi,bj) * |
./pkg/streamice/streamice_visc_beta_hybrid.F |
76 |
STREAMICE_VISC_BETA_HYBRID |
& dxG(i,j+l,bi,bj)*dyG(i+k,j,bi,bj) * |
./model/src/ini_sigma_hfac.F |
206 |
INI_SIGMA_HFAC |
IF (dxG(i,j,bi,bj).EQ.0.) maskInS(i,j,bi,bj) = 0. |
./model/src/ini_spherical_polar_grid.F |
121 |
INI_SPHERICAL_POLAR_GRID |
dxG(i,j,bi,bj) = rSphere*COS(deg2rad*lat)*dlon*deg2rad |
./model/src/ini_spherical_polar_grid.F |
122 |
INI_SPHERICAL_POLAR_GRID |
IF (dxG(i,j,bi,bj).LT.1.) dxG(i,j,bi,bj)=0. |
./model/src/ini_spherical_polar_grid.F |
176 |
INI_SPHERICAL_POLAR_GRID |
dxV(i,j,bi,bj) = 0.5 _d 0*(dxG(i,j,bi,bj)+dxG(i-1,j,bi,bj)) |
./model/src/pre_cg3d.F |
200 |
PRE_CG3D |
& +drF(k)*dxG(i,j+1,bi,bj)*_hFacS(i,j+1,k,bi,bj)*vf(i,j+1) |
./model/src/pre_cg3d.F |
201 |
PRE_CG3D |
& -drF(k)*dxG(i, j ,bi,bj)*_hFacS(i, j ,k,bi,bj)*vf(i, j ) |
./model/src/pre_cg3d.F |
219 |
PRE_CG3D |
& +drF(k)*dxG(i,j+1,bi,bj)*_hFacS(i,j+1,k,bi,bj)*vf(i,j+1) |
./model/src/pre_cg3d.F |
220 |
PRE_CG3D |
& -drF(k)*dxG(i, j ,bi,bj)*_hFacS(i, j ,k,bi,bj)*vf(i, j ) |
./verification/rotating_tank/code/apply_forcing.F |
729 |
APPLY_FORCING_T |
faceArea = drF(k)*dxG(i,j+1,bi,bj) |
./verification/rotating_tank/code/apply_forcing.F |
736 |
APPLY_FORCING_T |
faceArea = drF(k)*dxG(i,j,bi,bj) |
./model/src/write_grid.F |
188 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'dxG',dxG,myThid) |
./model/src/write_grid.F |
92 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'DXG',' ',dxG,-1,myThid) |
./pkg/bbl/bbl_calc_rhs.F |
195 |
BBL_CALC_RHS |
& dxG(i,j+1,bi,bj) * bblEta_d * bbl_hvel * deltaT ) |
./pkg/bbl/bbl_calc_rhs.F |
297 |
BBL_CALC_RHS |
& dxG(i,j+1,bi,bj) * bblEta_d * bbl_hvel * deltaT ) |
./pkg/bbl/bbl_calc_rhs.F |
400 |
BBL_CALC_RHS |
& dxG(i+1,j,bi,bj) * bblEta_d * bbl_hvel * deltaT ) |
./pkg/bbl/bbl_calc_rhs.F |
502 |
BBL_CALC_RHS |
& dxG(i+1,j,bi,bj) * bblEta_d * bbl_hvel * deltaT ) |
./pkg/cost/cost_atlantic_heat.F |
102 |
COST_ATLANTIC_HEAT |
& + cMeanVVel(i,j,k,bi,bj)*dxG(i,j,bi,bj) |
./pkg/cost/cost_atlantic_heat.F |
106 |
COST_ATLANTIC_HEAT |
& + cMeanThetaVVel(i,j,k,bi,bj)*dxG(i,j,bi,bj) |
./pkg/cost/cost_atlantic_heat.F |
82 |
COST_ATLANTIC_HEAT |
locfc = locfc + sum*dxG(i,j,bi,bj) |
./pkg/cost/cost_vector.F |
74 |
COST_VECTOR |
objf_vector(i,bi,bj) = sum*dxG(i,j,bi,bj) |
./pkg/diagnostics/diagnostics_calc_phivel.F |
116 |
DIAGNOSTICS_CALC_PHIVEL |
aS2d(i,j,bi,bj) = dxG(i,j,bi,bj)*recip_dyC(i,j,bi,bj) |
./pkg/diagnostics/diagnostics_calc_phivel.F |
129 |
DIAGNOSTICS_CALC_PHIVEL |
vTrans(i,j,bi,bj) = dxG(i,j,bi,bj)*drF(k) |
./pkg/diagnostics/diagnostics_calc_phivel.F |
275 |
DIAGNOSTICS_CALC_PHIVEL |
& *recip_dyC(i,j,bi,bj)*dxG(i,j,bi,bj) |
./pkg/down_slope/dwnslp_init_fixed.F |
246 |
DWNSLP_INIT_FIXED |
DWNSLP_Gamma(n,bi,bj) = DWNSLP_slope*dxG(i,j,bi,bj) |
./pkg/down_slope/dwnslp_init_fixed.F |
268 |
DWNSLP_INIT_FIXED |
& *dxG(i,j,bi,bj) |