File |
Line number |
Procedure |
Code |
./model/src/calc_gw.F |
108 |
CALC_GW |
_RL recip_rThickC(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./model/src/calc_gw.F |
196 |
CALC_GW |
recip_rThickC(i,j) = 0. |
./model/src/calc_gw.F |
199 |
CALC_GW |
recip_rThickC(i,j) = 1. _d 0 / |
./model/src/calc_gw.F |
245 |
CALC_GW |
recip_rThickC(i,j) = 0. |
./model/src/calc_gw.F |
247 |
CALC_GW |
recip_rThickC(i,j) = 1. _d 0 / |
./model/src/calc_gw.F |
283 |
CALC_GW |
recip_rThickC(i,j) = recip_drC(k) |
./model/src/calc_gw.F |
356 |
CALC_GW |
& )*recip_rA(i,j,bi,bj)*recip_rThickC(i,j) |
./model/src/calc_gw.F |
450 |
CALC_GW |
& )*recip_rA(i,j,bi,bj)*recip_rThickC(i,j) |
./model/src/calc_gw.F |
463 |
CALC_GW |
I rThickC_C, recip_rThickC, |
./model/src/calc_gw.F |
479 |
CALC_GW |
I rThickC_W, rThickC_S, rThickC_C, recip_rThickC, |
./model/src/calc_gw.F |
568 |
CALC_GW |
& )*recip_rA(i,j,bi,bj)*recip_rThickC(i,j) |
./model/src/calc_gw.F |
580 |
CALC_GW |
& *recip_rA(i,j,bi,bj)*recip_rThickC(i,j) |
./pkg/mom_common/mom_w_sidedrag.F |
130 |
MOM_W_SIDEDRAG |
& )*recip_rThickC(i,j)*recip_rA(i,j,bi,bj) |
./pkg/mom_common/mom_w_sidedrag.F |
13 |
MOM_W_SIDEDRAG |
I rThickC, recip_rThickC, |
./pkg/mom_common/mom_w_sidedrag.F |
46 |
MOM_W_SIDEDRAG |
_RL recip_rThickC(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_common/mom_w_smag_3d.F |
14 |
MOM_W_SMAG_3D |
I rThickC_W, rThickC_S, rThickC_C, recip_rThickC, |
./pkg/mom_common/mom_w_smag_3d.F |
45 |
MOM_W_SMAG_3D |
_RL recip_rThickC(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_common/mom_w_smag_3d.F |
91 |
MOM_W_SMAG_3D |
& + recip_rThickC(i,j) |