| File |
Line number |
Procedure |
Code |
|
./model/inc/GRID.h |
425 |
NO PROCEDURE |
& recip_rA,recip_rAw,recip_rAs,recip_rAz, |
|
./model/inc/GRID.h |
470 |
NO PROCEDURE |
_RS recip_rAw (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/layers/layers_fluxcalc.F |
233 |
LAYERS_FLUXCALC |
& ) * recip_rAw(i,j,bi,bj) |
|
./model/src/calc_r_star.F |
123 |
CALC_R_STAR |
& )*recip_rAw(i,j,bi,bj) |
|
./pkg/mom_common/mom_u_implicit_r.F |
167 |
MOM_U_IMPLICIT_R |
& *recip_rAw(i,j,bi,bj)*rkSign |
|
./pkg/mom_common/mom_u_implicit_r.F |
192 |
MOM_U_IMPLICIT_R |
& *recip_rAw(i,j,bi,bj)*rkSign |
|
./pkg/mom_common/mom_u_sidedrag.F |
118 |
MOM_U_SIDEDRAG |
& *recip_drF(k)*recip_rAw(i,j,bi,bj) |
|
./pkg/mom_common/mom_u_sidedrag.F |
82 |
MOM_U_SIDEDRAG |
& *recip_drF(k)*recip_rAw(i,j,bi,bj) |
|
./pkg/mom_common/mom_uv_smag_3d.F |
75 |
MOM_UV_SMAG_3D |
uDissip(i,j) = recip_rAw(i,j,bi,bj)*( |
|
./pkg/mom_fluxform/mom_fluxform.F |
445 |
MOM_FLUXFORM |
& *recip_rAw(i,j,bi,bj)*recip_deepFac2C(k)*recip_rhoFacC(k) |
|
./pkg/mom_fluxform/mom_fluxform.F |
493 |
MOM_FLUXFORM |
& * recip_rAw(i,j,bi,bj)*recip_deepFac2C(k) |
|
./pkg/mom_fluxform/mom_fluxform.F |
542 |
MOM_FLUXFORM |
& *recip_rAw(i,j,bi,bj)*recip_deepFac2C(k) |
|
./pkg/mom_fluxform/mom_u_del2u.F |
113 |
MOM_U_DEL2U |
& *recip_rAw(i,j,bi,bj)*recip_deepFac2C(k) |
|
./pkg/mom_fluxform/mom_u_del2u.F |
90 |
MOM_U_DEL2U |
& *recip_rAw(i,j,bi,bj)*recip_deepFac2C(k) |
|
./pkg/mom_vecinv/mom_vecinv.F |
467 |
MOM_VECINV |
& *recip_rAw(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
156 |
MOM_VI_HDISSIP |
uD4 = recip_rAw(i,j,bi,bj)*( |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
217 |
MOM_VI_HDISSIP |
uD4 = recip_rAw(i,j,bi,bj)*( |
|
./pkg/mom_vecinv/mom_vi_u_vertshear.F |
72 |
MOM_VI_U_VERTSHEAR |
& *recip_rAw(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_u_vertshear.F |
79 |
MOM_VI_U_VERTSHEAR |
& *recip_rAw(i,j,bi,bj) |
|
./pkg/monitor/mon_vort3.F |
114 |
MON_VORT3 |
& )*recip_rAw(i,j-1,bi,bj) |
|
./pkg/monitor/mon_vort3.F |
117 |
MON_VORT3 |
& )*recip_rAw(i, j ,bi,bj) |
|
./pkg/seaice/seaice_calc_stressdiv.F |
89 |
SEAICE_CALC_STRESSDIV |
& ) * recip_rAw(i,j,bi,bj) |
|
./pkg/seaice/seaice_evp.F |
667 |
SEAICE_EVP |
& ) * recip_rAw(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
1354 |
SEAICE_LSR_CALC_COEFFS |
AU(I,J,bi,bj) = AU(I,J,bi,bj) * recip_rAw(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
1355 |
SEAICE_LSR_CALC_COEFFS |
CU(I,J,bi,bj) = CU(I,J,bi,bj) * recip_rAw(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
1359 |
SEAICE_LSR_CALC_COEFFS |
BU(I,J,bi,bj) = BU(I,J,bi,bj) * recip_rAw(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
1365 |
SEAICE_LSR_CALC_COEFFS |
uRt1(I,J,bi,bj) = uRt1(I,J,bi,bj) * recip_rAw(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
1366 |
SEAICE_LSR_CALC_COEFFS |
uRt2(I,J,bi,bj) = uRt2(I,J,bi,bj) * recip_rAw(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
1576 |
SEAICE_LSR_RHSU |
& + recip_rAw(I,J,bi,bj) * seaiceMaskU(I,J,bi,bj) * |
|
./model/src/ini_grid.F |
177 |
INI_GRID |
& recip_rAw(i,j,bi,bj) = 1. _d 0/rAw(i,j,bi,bj) |
|
./model/src/ini_grid.F |
99 |
INI_GRID |
recip_rAw(i,j,bi,bj) = 0. |
|
./pkg/timeave/timeave_cumul_2v.F |
131 |
TIMEAVE_CUMUL_2V |
& )*recip_rAw(i,j,bi,bj) |
|
./pkg/timeave/timeave_cumul_2v.F |
165 |
TIMEAVE_CUMUL_2V |
& )*recip_rAw(i,j,bi,bj) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
163 |
DIAGNOSTICS_FILL_STATE |
& )*recip_rAw(i,j,bi,bj) |