File |
Line number |
Procedure |
Code |
./model/inc/GRID.h |
418 |
NO PROCEDURE |
& recip_dxC,recip_dxF,recip_dxG,recip_dxV, |
./model/inc/GRID.h |
449 |
NO PROCEDURE |
_RS recip_dxC (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/generic_advdiff/gad_dst2u1_adv_x.F |
71 |
GAD_DST2U1_ADV_X |
& *recip_dxC(i,j,bi,bj)*recip_deepFacC(k) ) |
./pkg/generic_advdiff/gad_dst3_adv_x.F |
87 |
GAD_DST3_ADV_X |
& *recip_dxC(i,j,bi,bj)*recip_deepFacC(k) ) |
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
63 |
GAD_DST3FL_ADV_X |
& *recip_dxC(i,j,bi,bj)*recip_deepFacC(k) ) |
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F |
78 |
GAD_FLUXLIMIT_ADV_X |
& *recip_dxC(i,j,bi,bj)*recip_deepFacC(k) ) |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
67 |
GAD_OS7MP_ADV_X |
IF ( calcCFL ) cfl = abs(uLoc*deltaTloc*recip_dxC(i,j,bi,bj)) |
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
75 |
GAD_PQM_P5E_X |
& ) * recip_dxC(ix,iy,bi,bj) |
./pkg/gmredi/gmredi_init_varia.F |
147 |
GMREDI_INIT_VARIA |
& (fCori(i+1,j,bi,bj)-fCori(i ,j,bi,bj))*recip_dxC(i+1,j,bi,bj) |
./pkg/gmredi/gmredi_init_varia.F |
148 |
GMREDI_INIT_VARIA |
& +(fCori(i ,j,bi,bj)-fCori(i-1,j,bi,bj))*recip_dxC(i,j,bi,bj) ) |
./pkg/gmredi/gmredi_k3d.F |
253 |
GMREDI_K3D |
& *recip_dxC(i,j,bi,bj) |
./model/src/apply_forcing.F |
134 |
APPLY_FORCING_U |
& - recip_dxC(i,j,bi,bj)*recip_deepFacC(k) |
./model/src/calc_grad_phi_hyd.F |
179 |
CALC_GRAD_PHI_HYD |
& *recip_dxC(i,j,bi,bj)*recip_deepFacC(k) |
./model/src/calc_grad_phi_hyd.F |
198 |
CALC_GRAD_PHI_HYD |
& *rC(k)*recip_dxC(i,j,bi,bj)*recip_deepFacC(k) |
./model/src/calc_grad_phi_hyd.F |
229 |
CALC_GRAD_PHI_HYD |
& *rC(k)*recip_dxC(i,j,bi,bj)*recip_deepFacC(k) |
./model/src/calc_grad_phi_hyd.F |
232 |
CALC_GRAD_PHI_HYD |
& *recip_dxC(i,j,bi,bj)*recip_deepFacC(k) |
./pkg/mom_common/mom_calc_3d_strain.F |
134 |
MOM_CALC_3D_STRAIN |
& +recip_dxC(i,j,bi,bj) |
./pkg/mom_common/mom_calc_3d_strain.F |
156 |
MOM_CALC_3D_STRAIN |
& +recip_dxC(i,j,bi,bj) |
./pkg/mom_common/mom_calc_visc.F |
269 |
MOM_CALC_VISC |
& *recip_dxC(i,j,bi,bj)*recip_deepFacC(k) |
./pkg/mom_common/mom_hdissip.F |
50 |
MOM_HDISSIP |
& *recip_dxC(i,j,bi,bj) |
./pkg/mom_common/mom_hdissip.F |
57 |
MOM_HDISSIP |
& +recip_dxC(i,j,bi,bj)*recip_dxC(i,j,bi,bj) |
./pkg/mom_vecinv/mom_vi_coriolis.F |
52 |
MOM_VI_CORIOLIS |
& )*vBarXY*recip_dxC(i,j,bi,bj)*_maskW(I,J,K,bi,bj) |
./pkg/mom_vecinv/mom_vi_coriolis.F |
67 |
MOM_VI_CORIOLIS |
& )*vBarXY*recip_dxC(i,j,bi,bj)*_maskW(I,J,K,bi,bj) |
./pkg/mom_vecinv/mom_vi_del2uv.F |
93 |
MOM_VI_DEL2UV |
& ( ( hDiv(i,j) - hDiv(i-1,j) )*recip_dxC(i,j,bi,bj) |
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
108 |
MOM_VI_U_CORIOLIS |
uCoriolisTerm(i,j)= +vort3u*vBarXY*recip_dxC(i,j,bi,bj) |
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
135 |
MOM_VI_U_CORIOLIS |
uCoriolisTerm(i,j)= +vort3u*recip_dxC(i,j,bi,bj) |
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
175 |
MOM_VI_U_CORIOLIS |
& *0.25 _d 0 *recip_dxC(i,j,bi,bj) |
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
83 |
MOM_VI_U_CORIOLIS |
uCoriolisTerm(i,j)= +vort3u*vBarXY*recip_dxC(i,j,bi,bj) |
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
158 |
MOM_VI_U_CORIOLIS_C4 |
uCoriolisTerm(i,j) = vort3u*vBarXY*recip_dxC(i,j,bi,bj) |
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
202 |
MOM_VI_U_CORIOLIS_C4 |
uCoriolisTerm(i,j) = vort3u*recip_dxC(i,j,bi,bj) |
./pkg/monitor/monitor.F |
162 |
MONITOR |
CALL MON_ADVCFL( '_uvel', uVel, recip_dxC, dT, myThid ) |
./pkg/monitor/monitor_g.F |
156 |
G_MONITOR |
CALL MON_ADVCFL( '_g_uvel', g_uVel,recip_dxC,dT,myThid ) |
./pkg/obcs/orlanski_east.F |
185 |
ORLANSKI_EAST |
& CVEL_TE(J,K,bi,bj)*(deltaT*recip_dxC(I_obc,J,bi,bj))* |
./pkg/obcs/orlanski_east.F |
211 |
ORLANSKI_EAST |
& CVEL_SE(J,K,bi,bj)*(deltaT*recip_dxC(I_obc,J,bi,bj))* |
./pkg/obcs/orlanski_east.F |
239 |
ORLANSKI_EAST |
& CVEL_WE(J,K,bi,bj)*(deltaT*recip_dxC(I_obc,J,bi,bj))* |
./pkg/obcs/orlanski_west.F |
187 |
ORLANSKI_WEST |
& CVEL_TW(J,K,bi,bj)*(deltaT*recip_dxC(I_obc+1,J,bi,bj))* |
./pkg/obcs/orlanski_west.F |
213 |
ORLANSKI_WEST |
& CVEL_SW(J,K,bi,bj)*(deltaT*recip_dxC(I_obc+1,J,bi,bj))* |
./pkg/obcs/orlanski_west.F |
241 |
ORLANSKI_WEST |
& CVEL_WW(J,K,bi,bj)*(deltaT*recip_dxC(I_obc+1,J,bi,bj))* |
./model/src/ini_cg2d.F |
107 |
INI_CG2D |
& *faceArea*recip_dxC(i,j,bi,bj) |
./model/src/ini_cg3d.F |
116 |
INI_CG3D |
aW3d(i,j,k,bi,bj) = faceArea*recip_dxC(i,j,bi,bj) |
./pkg/shap_filt/shap_filt_tracer_s2.F |
137 |
SHAP_FILT_TRACER_S2 |
& *dyG(i,j,bi,bj)*recip_dxC(i,j,bi,bj) |
./pkg/smooth/smooth_diff2d.F |
139 |
SMOOTH_DIFF2D |
& (fld_in(i,j,bi,bj)-fld_in(i-1,j,bi,bj))*recip_dxC(i,j,bi,bj) |
./pkg/smooth/smooth_diff2d.F |
144 |
SMOOTH_DIFF2D |
& (fld_in(i,j,bi,bj)-fld_in(i+1,j,bi,bj))*recip_dxC(i+1,j,bi,bj) |
./pkg/smooth/smooth_rhs.F |
116 |
SMOOTH_RHS |
& *recip_dxC(i,j,bi,bj) |
./pkg/smooth/smooth_rhs.F |
213 |
SMOOTH_RHS |
& *recip_dxC(i+1,j,bi,bj)* |
./pkg/smooth/smooth_rhs.F |
216 |
SMOOTH_RHS |
& *recip_dxC(i,j,bi,bj)* |
./pkg/smooth/smooth_rhs.F |
219 |
SMOOTH_RHS |
& *recip_dxC(i+1,j,bi,bj)* |
./pkg/smooth/smooth_rhs.F |
222 |
SMOOTH_RHS |
& *recip_dxC(i,j,bi,bj)* |
./pkg/smooth/smooth_rhs.F |
269 |
SMOOTH_RHS |
& *recip_dxC(i+1,j,bi,bj)* |
./pkg/smooth/smooth_rhs.F |
272 |
SMOOTH_RHS |
& *recip_dxC(i,j,bi,bj)* |
./pkg/smooth/smooth_rhs.F |
275 |
SMOOTH_RHS |
& *recip_dxC(i+1,j,bi,bj)* |
./pkg/smooth/smooth_rhs.F |
278 |
SMOOTH_RHS |
& *recip_dxC(i,j,bi,bj)* |
./pkg/streamice/streamice_adv_flux_fl_x.F |
81 |
STREAMICE_ADV_FLUX_FL_X |
cfl = ABS(uface) * time_step * recip_dxC(i,j,bi,bj) |
./model/src/ini_grid.F |
161 |
INI_GRID |
& recip_dxC(i,j,bi,bj) = 1. _d 0/dxC(i,j,bi,bj) |
./model/src/ini_grid.F |
91 |
INI_GRID |
recip_dxC(i,j,bi,bj) = 0. |
./pkg/streamice/streamice_driving_stress_fd.F |
125 |
STREAMICE_DRIVING_STRESS_FD |
dsdx(i,j,bi,bj) = recip_dxC(i-1,j,bi,bj) * |
./pkg/streamice/streamice_driving_stress_fd.F |
73 |
STREAMICE_DRIVING_STRESS_FD |
dsdx(i,j,bi,bj) = recip_dxC(i,j,bi,bj) * |
./pkg/streamice/streamice_driving_stress_fd.F |
81 |
STREAMICE_DRIVING_STRESS_FD |
dsdx(i,j,bi,bj) = recip_dxC(i+1,j,bi,bj) * |
./pkg/thsice/thsice_diffusion.F |
90 |
THSICE_DIFFUSION |
& *recip_dxC(i,j,bi,bj)/tmpFld |
./pkg/timeave/timeave_cumul_dif_1t.F |
49 |
TIMEAVE_CUMUL_DIF_1T |
& * recip_dxC(i,j,bi,bj) |
./verification/rotating_tank/code/apply_forcing.F |
718 |
APPLY_FORCING_T |
& *recip_dxC(i,j,bi,bj) |
./verification/rotating_tank/code/apply_forcing.F |
725 |
APPLY_FORCING_T |
& *recip_dxC(i,j,bi,bj) |
./model/src/update_cg2d.F |
108 |
UPDATE_CG2D |
& + faceArea*recip_dxC(i,j,bi,bj) |
./model/src/update_cg2d.F |
90 |
UPDATE_CG2D |
& *recip_dxC(i,j,bi,bj) |
./pkg/cheapaml/gad_2d_calc_rhs.F |
125 |
GAD_2D_CALC_RHS |
localW(i,j)=-(recip_dxC(i,j,bi,bj) |
./pkg/cheapaml/gad_2d_calc_rhs.F |
341 |
GAD_2D_CALC_RHS |
& -(recip_dxC(i,j,bi,bj) |
./pkg/diagnostics/diagnostics_calc_phivel.F |
113 |
DIAGNOSTICS_CALC_PHIVEL |
aW2d(i,j,bi,bj) = dyG(i,j,bi,bj)*recip_dxC(i,j,bi,bj) |
./pkg/diagnostics/diagnostics_calc_phivel.F |
270 |
DIAGNOSTICS_CALC_PHIVEL |
& *recip_dxC(i,j,bi,bj)*dyG(i,j,bi,bj) |
./pkg/down_slope/dwnslp_init_fixed.F |
262 |
DWNSLP_INIT_FIXED |
DWNSLP_Gamma(n,bi,bj) = dz_bottom*recip_dxC(i,j,bi,bj) |