| File |
Line number |
Procedure |
Code |
|
./pkg/flt/flt_exch2.F |
101 |
FLT_EXCH2 |
wSide=exch2_isWedge(nT).AND.facet_link(W2_WEST,myFace).EQ.0. |
|
./pkg/flt/flt_exch2.F |
102 |
FLT_EXCH2 |
eSide=exch2_isEedge(nT).AND.facet_link(W2_EAST,myFace).EQ.0. |
|
./pkg/flt/flt_exch2.F |
214 |
FLT_EXCH2 |
sSide=exch2_isSedge(nT).AND.facet_link(W2_SOUTH,myFace).EQ.0. |
|
./pkg/flt/flt_exch2.F |
215 |
FLT_EXCH2 |
nSide=exch2_isNedge(nT).AND.facet_link(W2_NORTH,myFace).EQ.0. |
|
./pkg/flt/flt_exch2.F |
49 |
FLT_EXCH2 |
INTEGER nT, ipass, myFace |
|
./pkg/flt/flt_exch2.F |
85 |
FLT_EXCH2 |
myFace = exch2_myFace(nT) |
|
./pkg/mom_common/mom_calc_hfacz.F |
245 |
MOM_CALC_HFACZ |
myFace = exch2_myFace(myTile) |
|
./pkg/mom_common/mom_calc_hfacz.F |
255 |
MOM_CALC_HFACZ |
myFace = bi |
|
./pkg/mom_common/mom_calc_hfacz.F |
272 |
MOM_CALC_HFACZ |
IF ( MOD(myFace,2).EQ.1 ) THEN |
|
./pkg/mom_common/mom_calc_hfacz.F |
297 |
MOM_CALC_HFACZ |
IF ( myFace.EQ.4 ) THEN |
|
./pkg/mom_common/mom_calc_hfacz.F |
302 |
MOM_CALC_HFACZ |
ELSEIF ( myFace.EQ.6 ) THEN |
|
./pkg/mom_common/mom_calc_hfacz.F |
327 |
MOM_CALC_HFACZ |
IF ( myFace.EQ.1 ) THEN |
|
./pkg/mom_common/mom_calc_hfacz.F |
332 |
MOM_CALC_HFACZ |
ELSEIF ( myFace.EQ.5 ) THEN |
|
./pkg/mom_common/mom_calc_hfacz.F |
356 |
MOM_CALC_HFACZ |
IF ( MOD(myFace,2).EQ.1 ) THEN |
|
./pkg/mom_common/mom_calc_hfacz.F |
71 |
MOM_CALC_HFACZ |
INTEGER myFace |
|
./pkg/mom_common/mom_calc_relvort3.F |
158 |
MOM_CALC_RELVORT3 |
IF ( myFace.EQ.2 ) THEN |
|
./pkg/mom_common/mom_calc_relvort3.F |
165 |
MOM_CALC_RELVORT3 |
ELSEIF ( myFace.EQ.4 ) THEN |
|
./pkg/mom_common/mom_calc_relvort3.F |
215 |
MOM_CALC_RELVORT3 |
IF ( myFace.EQ.1 ) THEN |
|
./pkg/mom_common/mom_calc_relvort3.F |
222 |
MOM_CALC_RELVORT3 |
ELSEIF ( myFace.EQ.3 ) THEN |
|
./pkg/mom_common/mom_calc_relvort3.F |
272 |
MOM_CALC_RELVORT3 |
IF ( MOD(myFace,2).EQ.1 ) THEN |
|
./pkg/mom_common/mom_calc_relvort3.F |
40 |
MOM_CALC_RELVORT3 |
INTEGER myFace |
|
./pkg/mom_common/mom_calc_relvort3.F |
86 |
MOM_CALC_RELVORT3 |
myFace = exch2_myFace(myTile) |
|
./pkg/mom_common/mom_calc_relvort3.F |
96 |
MOM_CALC_RELVORT3 |
myFace = bi |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
56 |
MOM_VI_U_CORIOLIS_C4 |
INTEGER myFace |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
78 |
MOM_VI_U_CORIOLIS_C4 |
myFace = exch2_myFace(myTile) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
88 |
MOM_VI_U_CORIOLIS_C4 |
myFace = bi |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
56 |
MOM_VI_V_CORIOLIS_C4 |
INTEGER myFace |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
78 |
MOM_VI_V_CORIOLIS_C4 |
myFace = exch2_myFace(myTile) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
88 |
MOM_VI_V_CORIOLIS_C4 |
myFace = bi |
|
./pkg/shap_filt/shap_filt_computvort.F |
122 |
SHAP_FILT_COMPUTVORT |
IF ( myFace.EQ.2 ) THEN |
|
./pkg/shap_filt/shap_filt_computvort.F |
125 |
SHAP_FILT_COMPUTVORT |
ELSEIF ( myFace.EQ.4 ) THEN |
|
./pkg/shap_filt/shap_filt_computvort.F |
144 |
SHAP_FILT_COMPUTVORT |
IF ( myFace.EQ.1 ) THEN |
|
./pkg/shap_filt/shap_filt_computvort.F |
147 |
SHAP_FILT_COMPUTVORT |
ELSEIF ( myFace.EQ.3 ) THEN |
|
./pkg/shap_filt/shap_filt_computvort.F |
166 |
SHAP_FILT_COMPUTVORT |
IF ( MOD(myFace,2).EQ.1 ) THEN |
|
./pkg/shap_filt/shap_filt_computvort.F |
55 |
SHAP_FILT_COMPUTVORT |
INTEGER myFace |
|
./pkg/shap_filt/shap_filt_computvort.F |
85 |
SHAP_FILT_COMPUTVORT |
myFace = exch2_myFace(myTile) |
|
./pkg/shap_filt/shap_filt_computvort.F |
95 |
SHAP_FILT_COMPUTVORT |
myFace = bi |
|
./pkg/shap_filt/shap_filt_relvort3.F |
103 |
SHAP_FILT_RELVORT3 |
myFace = bi |
|
./pkg/shap_filt/shap_filt_relvort3.F |
166 |
SHAP_FILT_RELVORT3 |
IF ( myFace.EQ.2 ) THEN |
|
./pkg/shap_filt/shap_filt_relvort3.F |
173 |
SHAP_FILT_RELVORT3 |
ELSEIF ( myFace.EQ.4 ) THEN |
|
./pkg/shap_filt/shap_filt_relvort3.F |
224 |
SHAP_FILT_RELVORT3 |
IF ( myFace.EQ.1 ) THEN |
|
./pkg/shap_filt/shap_filt_relvort3.F |
231 |
SHAP_FILT_RELVORT3 |
ELSEIF ( myFace.EQ.3 ) THEN |
|
./pkg/shap_filt/shap_filt_relvort3.F |
282 |
SHAP_FILT_RELVORT3 |
IF ( MOD(myFace,2).EQ.1 ) THEN |
|
./pkg/shap_filt/shap_filt_relvort3.F |
43 |
SHAP_FILT_RELVORT3 |
INTEGER myFace |
|
./pkg/shap_filt/shap_filt_relvort3.F |
93 |
SHAP_FILT_RELVORT3 |
myFace = exch2_myFace(myTile) |