| File |
Line number |
Procedure |
Code |
|
./model/inc/GRID.h |
419 |
NO PROCEDURE |
& recip_dyC,recip_dyF,recip_dyG,recip_dyU, |
|
./model/inc/GRID.h |
453 |
NO PROCEDURE |
_RS recip_dyC (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/generic_advdiff/gad_dst2u1_adv_y.F |
70 |
GAD_DST2U1_ADV_Y |
& *recip_dyC(i,j,bi,bj)*recip_deepFacC(k) ) |
|
./pkg/generic_advdiff/gad_dst3_adv_y.F |
86 |
GAD_DST3_ADV_Y |
& *recip_dyC(i,j,bi,bj)*recip_deepFacC(k) ) |
|
./pkg/generic_advdiff/gad_dst3fl_adv_y.F |
59 |
GAD_DST3FL_ADV_Y |
& *recip_dyC(i,j,bi,bj)*recip_deepFacC(k) ) |
|
./pkg/generic_advdiff/gad_fluxlimit_adv_y.F |
78 |
GAD_FLUXLIMIT_ADV_Y |
& *recip_dyC(i,j,bi,bj)*recip_deepFacC(k) ) |
|
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
67 |
GAD_OS7MP_ADV_Y |
IF ( calcCFL ) cfl = abs(vLoc*deltaTloc*recip_dyC(i,j,bi,bj)) |
|
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
76 |
GAD_PQM_P5E_Y |
& ) * recip_dyC(ix,iy,bi,bj) |
|
./pkg/gmredi/gmredi_init_varia.F |
150 |
GMREDI_INIT_VARIA |
& (fCori(i,j+1,bi,bj)-fCori(i,j ,bi,bj))*recip_dyC(i,j+1,bi,bj) |
|
./pkg/gmredi/gmredi_init_varia.F |
151 |
GMREDI_INIT_VARIA |
& +(fCori(i,j ,bi,bj)-fCori(i,j-1,bi,bj))*recip_dyC(i,j,bi,bj) ) |
|
./pkg/gmredi/gmredi_k3d.F |
255 |
GMREDI_K3D |
& *recip_dyC(i,j,bi,bj) |
|
./model/src/apply_forcing.F |
324 |
APPLY_FORCING_V |
& - recip_dyC(i,j,bi,bj)*recip_deepFacC(k) |
|
./model/src/calc_grad_phi_hyd.F |
187 |
CALC_GRAD_PHI_HYD |
& *recip_dyC(i,j,bi,bj)*recip_deepFacC(k) |
|
./model/src/calc_grad_phi_hyd.F |
206 |
CALC_GRAD_PHI_HYD |
& *rC(k)*recip_dyC(i,j,bi,bj)*recip_deepFacC(k) |
|
./model/src/calc_grad_phi_hyd.F |
242 |
CALC_GRAD_PHI_HYD |
& *rC(k)*recip_dyC(i,j,bi,bj)*recip_deepFacC(k) |
|
./model/src/calc_grad_phi_hyd.F |
245 |
CALC_GRAD_PHI_HYD |
& *recip_dyC(i,j,bi,bj)*recip_deepFacC(k) |
|
./pkg/mom_common/mom_calc_3d_strain.F |
144 |
MOM_CALC_3D_STRAIN |
& +recip_dyC(i,j,bi,bj) |
|
./pkg/mom_common/mom_calc_3d_strain.F |
167 |
MOM_CALC_3D_STRAIN |
& +recip_dyC(i,j,bi,bj) |
|
./pkg/mom_common/mom_calc_visc.F |
282 |
MOM_CALC_VISC |
& *recip_dyC(i,j,bi,bj)*recip_deepFacC(k) |
|
./pkg/mom_common/mom_hdissip.F |
67 |
MOM_HDISSIP |
& recip_dyC(i,j,bi,bj)*recip_dyC(i,j,bi,bj) |
|
./pkg/mom_common/mom_hdissip.F |
76 |
MOM_HDISSIP |
& *recip_dyC(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_coriolis.F |
100 |
MOM_VI_CORIOLIS |
& )*uBarXY*recip_dyC(i,j,bi,bj)*_maskS(I,J,K,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_coriolis.F |
85 |
MOM_VI_CORIOLIS |
& )*uBarXY*recip_dyC(i,j,bi,bj)*_maskS(I,J,K,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_del2uv.F |
118 |
MOM_VI_DEL2UV |
& ( ( hDiv(i,j) - hDiv(i,j-1) )*recip_dyC(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
108 |
MOM_VI_V_CORIOLIS |
vCoriolisTerm(i,j)= -vort3v*uBarXY*recip_dyC(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
135 |
MOM_VI_V_CORIOLIS |
vCoriolisTerm(i,j)= -vort3v*recip_dyC(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
175 |
MOM_VI_V_CORIOLIS |
& *0.25 _d 0 *recip_dyC(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
83 |
MOM_VI_V_CORIOLIS |
vCoriolisTerm(i,j)= -vort3v*uBarXY*recip_dyC(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
158 |
MOM_VI_V_CORIOLIS_C4 |
vCoriolisTerm(i,j) = -vort3v*uBarXY*recip_dyC(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
202 |
MOM_VI_V_CORIOLIS_C4 |
vCoriolisTerm(i,j) = -vort3v*recip_dyC(i,j,bi,bj) |
|
./pkg/monitor/monitor.F |
163 |
MONITOR |
CALL MON_ADVCFL( '_vvel', vVel, recip_dyC, dT, myThid ) |
|
./pkg/monitor/monitor_g.F |
157 |
G_MONITOR |
CALL MON_ADVCFL( '_g_vvel', g_vVel,recip_dyC,dT,myThid ) |
|
./pkg/obcs/orlanski_north.F |
158 |
ORLANSKI_NORTH |
& CVEL_TN(I,K,bi,bj)*deltaT*recip_dyC(I,J_obc,bi,bj)* |
|
./pkg/obcs/orlanski_north.F |
178 |
ORLANSKI_NORTH |
& CVEL_SN(I,K,bi,bj)*deltaT*recip_dyC(I,J_obc,bi,bj)* |
|
./pkg/obcs/orlanski_north.F |
200 |
ORLANSKI_NORTH |
& CVEL_WN(I,K,bi,bj)*deltaT*recip_dyC(I,J_obc,bi,bj)* |
|
./pkg/obcs/orlanski_south.F |
158 |
ORLANSKI_SOUTH |
& CVEL_TS(I,K,bi,bj)*deltaT*recip_dyC(I,J_obc+1,bi,bj)* |
|
./pkg/obcs/orlanski_south.F |
178 |
ORLANSKI_SOUTH |
& CVEL_SS(I,K,bi,bj)*deltaT*recip_dyC(I,J_obc+1,bi,bj)* |
|
./pkg/obcs/orlanski_south.F |
200 |
ORLANSKI_SOUTH |
& CVEL_WS(I,K,bi,bj)*deltaT*recip_dyC(I,J_obc+1,bi,bj)* |
|
./model/src/ini_cg2d.F |
112 |
INI_CG2D |
& *faceArea*recip_dyC(i,j,bi,bj) |
|
./model/src/ini_cg3d.F |
129 |
INI_CG3D |
aS3d(i,j,k,bi,bj) = faceArea*recip_dyC(i,j,bi,bj) |
|
./pkg/shap_filt/shap_filt_tracer_s2.F |
168 |
SHAP_FILT_TRACER_S2 |
& *dxG(i,j,bi,bj)*recip_dyC(i,j,bi,bj) |
|
./pkg/smooth/smooth_diff2d.F |
149 |
SMOOTH_DIFF2D |
& (fld_in(i,j,bi,bj)-fld_in(i,j-1,bi,bj))*recip_dyC(i,j,bi,bj) |
|
./pkg/smooth/smooth_diff2d.F |
154 |
SMOOTH_DIFF2D |
& (fld_in(i,j,bi,bj)-fld_in(i,j+1,bi,bj))*recip_dyC(i,j+1,bi,bj) |
|
./pkg/smooth/smooth_rhs.F |
145 |
SMOOTH_RHS |
& *recip_dyC(i,j,bi,bj)* |
|
./pkg/smooth/smooth_rhs.F |
148 |
SMOOTH_RHS |
& *recip_dyC(i,j+1,bi,bj)* |
|
./pkg/smooth/smooth_rhs.F |
151 |
SMOOTH_RHS |
& *recip_dyC(i,j,bi,bj)* |
|
./pkg/smooth/smooth_rhs.F |
154 |
SMOOTH_RHS |
& *recip_dyC(i,j+1,bi,bj)* |
|
./pkg/smooth/smooth_rhs.F |
184 |
SMOOTH_RHS |
& *recip_dyC(i,j,bi,bj) |
|
./pkg/smooth/smooth_rhs.F |
284 |
SMOOTH_RHS |
& *recip_dyC(i,j,bi,bj)* |
|
./pkg/smooth/smooth_rhs.F |
287 |
SMOOTH_RHS |
& *recip_dyC(i,j+1,bi,bj)* |
|
./pkg/smooth/smooth_rhs.F |
290 |
SMOOTH_RHS |
& *recip_dyC(i,j,bi,bj)* |
|
./pkg/smooth/smooth_rhs.F |
293 |
SMOOTH_RHS |
& *recip_dyC(i,j+1,bi,bj)* |
|
./pkg/streamice/streamice_adv_flux_fl_y.F |
80 |
STREAMICE_ADV_FLUX_FL_Y |
cfl = ABS(vface) * time_step * recip_dyC(i,j,bi,bj) |
|
./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 |
92 |
INI_GRID |
recip_dyC(i,j,bi,bj) = 0. |
|
./pkg/streamice/streamice_driving_stress_fd.F |
104 |
STREAMICE_DRIVING_STRESS_FD |
dsdy(i,j,bi,bj) = recip_dyC(i,j+1,bi,bj) * |
|
./pkg/streamice/streamice_driving_stress_fd.F |
139 |
STREAMICE_DRIVING_STRESS_FD |
dsdy(i,j,bi,bj) = recip_dyC(i,j-1,bi,bj) * |
|
./pkg/streamice/streamice_driving_stress_fd.F |
96 |
STREAMICE_DRIVING_STRESS_FD |
dsdy(i,j,bi,bj) = recip_dyC(i,j,bi,bj) * |
|
./pkg/thsice/thsice_diffusion.F |
101 |
THSICE_DIFFUSION |
& *recip_dyC(i,j,bi,bj)/tmpFld |
|
./pkg/timeave/timeave_cumul_dif_1t.F |
62 |
TIMEAVE_CUMUL_DIF_1T |
& * recip_dyC(i,j,bi,bj) |
|
./verification/rotating_tank/code/apply_forcing.F |
732 |
APPLY_FORCING_T |
& *recip_dyC(i,j,bi,bj) |
|
./verification/rotating_tank/code/apply_forcing.F |
739 |
APPLY_FORCING_T |
& *recip_dyC(i,j,bi,bj) |
|
./model/src/update_cg2d.F |
112 |
UPDATE_CG2D |
& + faceArea*recip_dyC(i,j,bi,bj) |
|
./model/src/update_cg2d.F |
95 |
UPDATE_CG2D |
& *recip_dyC(i,j,bi,bj) |
|
./pkg/cheapaml/gad_2d_calc_rhs.F |
127 |
GAD_2D_CALC_RHS |
& + (vVel(i,j+1,bi,bj)-vVel(i,j,bi,bj))*recip_dyC(i,j,bi,bj) |
|
./pkg/cheapaml/gad_2d_calc_rhs.F |
343 |
GAD_2D_CALC_RHS |
& +recip_dyC(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 |
275 |
DIAGNOSTICS_CALC_PHIVEL |
& *recip_dyC(i,j,bi,bj)*dxG(i,j,bi,bj) |
|
./pkg/down_slope/dwnslp_init_fixed.F |
267 |
DWNSLP_INIT_FIXED |
DWNSLP_Gamma(n,bi,bj) = dz_bottom*recip_dyC(i,j,bi,bj) |