File |
Line number |
Procedure |
Code |
./pkg/flt/flt_exch2.F |
102 |
FLT_EXCH2 |
eSide=exch2_isEedge(nT).AND.facet_link(W2_EAST,myFace).EQ.0. |
./pkg/generic_advdiff/gad_advection.F |
231 |
GAD_ADVECTION |
E_edge = exch2_isEedge(myTile).EQ.1 |
./pkg/generic_advdiff/gad_som_advect.F |
226 |
GAD_SOM_ADVECT |
E_edge = exch2_isEedge(myTile).EQ.1 |
./pkg/mnc/mnc_cw_model_attr.F |
113 |
MNC_CW_SET_GATTR |
& 'exch2_isEedge', 1, exch2_isEedge(tnum), myThid) |
./pkg/mom_common/mom_calc_hfacz.F |
248 |
MOM_CALC_HFACZ |
southEastCorner = exch2_isEedge(myTile).EQ.1 |
./pkg/mom_common/mom_calc_hfacz.F |
250 |
MOM_CALC_HFACZ |
northEastCorner = exch2_isEedge(myTile).EQ.1 |
./pkg/mom_common/mom_calc_relvort3.F |
89 |
MOM_CALC_RELVORT3 |
southEastCorner = exch2_isEedge(myTile).EQ.1 |
./pkg/mom_common/mom_calc_relvort3.F |
91 |
MOM_CALC_RELVORT3 |
northEastCorner = exch2_isEedge(myTile).EQ.1 |
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
81 |
MOM_VI_U_CORIOLIS_C4 |
southEastCorner = exch2_isEedge(myTile).EQ.1 |
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
83 |
MOM_VI_U_CORIOLIS_C4 |
northEastCorner = exch2_isEedge(myTile).EQ.1 |
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
81 |
MOM_VI_V_CORIOLIS_C4 |
southEastCorner = exch2_isEedge(myTile).EQ.1 |
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
83 |
MOM_VI_V_CORIOLIS_C4 |
northEastCorner = exch2_isEedge(myTile).EQ.1 |
./pkg/monitor/mon_vort3.F |
169 |
MON_VORT3 |
southEastCorner = exch2_isEedge(myTile).EQ.1 |
./pkg/monitor/mon_vort3.F |
171 |
MON_VORT3 |
northEastCorner = exch2_isEedge(myTile).EQ.1 |
./pkg/seaice/seaice_advection.F |
201 |
SEAICE_ADVECTION |
E_edge = exch2_isEedge(myTile).EQ.1 |
./pkg/shap_filt/shap_filt_computvort.F |
88 |
SHAP_FILT_COMPUTVORT |
southEastCorner = exch2_isEedge(myTile).EQ.1 |
./pkg/shap_filt/shap_filt_computvort.F |
90 |
SHAP_FILT_COMPUTVORT |
northEastCorner = exch2_isEedge(myTile).EQ.1 |
./pkg/shap_filt/shap_filt_relvort3.F |
96 |
SHAP_FILT_RELVORT3 |
southEastCorner = exch2_isEedge(myTile).EQ.1 |
./pkg/shap_filt/shap_filt_relvort3.F |
98 |
SHAP_FILT_RELVORT3 |
northEastCorner = exch2_isEedge(myTile).EQ.1 |
./pkg/thsice/thsice_advection.F |
184 |
THSICE_ADVECTION |
E_edge = exch2_isEedge(myTile).EQ.1 |
./eesupp/src/fill_cs_corner_ag_rl.F |
80 |
FILL_CS_CORNER_AG_RL |
southEastCorner = exch2_isEedge(myTile).EQ.1 |
./eesupp/src/fill_cs_corner_ag_rl.F |
82 |
FILL_CS_CORNER_AG_RL |
northEastCorner = exch2_isEedge(myTile).EQ.1 |
./eesupp/src/fill_cs_corner_tr_rl.F |
80 |
FILL_CS_CORNER_TR_RL |
southEastCorner = exch2_isEedge(myTile).EQ.1 |
./eesupp/src/fill_cs_corner_tr_rl.F |
82 |
FILL_CS_CORNER_TR_RL |
northEastCorner = exch2_isEedge(myTile).EQ.1 |
./eesupp/src/fill_cs_corner_uv_rs.F |
77 |
FILL_CS_CORNER_UV_RS |
southEastCorner = exch2_isEedge(myTile).EQ.1 |
./eesupp/src/fill_cs_corner_uv_rs.F |
79 |
FILL_CS_CORNER_UV_RS |
northEastCorner = exch2_isEedge(myTile).EQ.1 |
./pkg/exch2/W2_EXCH2_TOPOLOGY.h |
110 |
NO PROCEDURE |
& exch2_isEedge, exch2_isSedge, |
./pkg/exch2/W2_EXCH2_TOPOLOGY.h |
88 |
NO PROCEDURE |
INTEGER exch2_isEedge( W2_maxNbTiles ) |
./pkg/exch2/exch2_get_uv_bounds.F |
215 |
EXCH2_GET_UV_BOUNDS |
IF ( exch2_isEedge(tgTile).EQ.1 ) THEN |
./pkg/exch2/w2_eeboot.F |
62 |
W2_EEBOOT |
exch2_isEedge(I) = 0 |
./pkg/exch2/w2_print_e2setup.F |
110 |
W2_PRINT_E2SETUP |
IF ( ip(3).EQ.0 .AND. exch2_isEedge(is).EQ.1 |
./pkg/exch2/w2_print_e2setup.F |
210 |
W2_PRINT_E2SETUP |
& ' , E=', exch2_isEedge(is), ' , W=', exch2_isWedge(is) |
./pkg/exch2/w2_set_tile2tiles.F |
104 |
W2_SET_TILE2TILES |
IF ( .NOT.internConnect ) exch2_isEedge(is) = 1 |
./pkg/exch2/w2_set_tile2tiles.F |
228 |
W2_SET_TILE2TILES |
& ' , E=', exch2_isEedge(is), ' , W=', exch2_isWedge(is) |