Symbol Description Uses
exch2_isSedge 1 if South is at domain edge, 0 if not. 34


File Line number Procedure Code
./pkg/generic_advdiff/gad_advection.F 229 GAD_ADVECTION 
       S_edge = exch2_isSedge(myTile).EQ.1
./pkg/generic_advdiff/gad_som_advect.F 224 GAD_SOM_ADVECT 
       S_edge = exch2_isSedge(myTile).EQ.1
./pkg/mnc/mnc_cw_model_attr.F 110 MNC_CW_SET_GATTR 
     &     'exch2_isSedge', 1, exch2_isSedge(tnum), myThid)
./pkg/mom_common/mom_calc_hfacz.F 247 MOM_CALC_HFACZ 
     &               .AND. exch2_isSedge(myTile).EQ.1
./pkg/mom_common/mom_calc_hfacz.F 249 MOM_CALC_HFACZ 
     &              .AND. exch2_isSedge(myTile).EQ.1
./pkg/mom_common/mom_calc_relvort3.F 88 MOM_CALC_RELVORT3 
     &             .AND. exch2_isSedge(myTile).EQ.1
./pkg/mom_common/mom_calc_relvort3.F 90 MOM_CALC_RELVORT3 
     &             .AND. exch2_isSedge(myTile).EQ.1
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F 80 MOM_VI_U_CORIOLIS_C4 
     &             .AND. exch2_isSedge(myTile).EQ.1
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F 82 MOM_VI_U_CORIOLIS_C4 
     &             .AND. exch2_isSedge(myTile).EQ.1
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 80 MOM_VI_V_CORIOLIS_C4 
     &             .AND. exch2_isSedge(myTile).EQ.1
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 82 MOM_VI_V_CORIOLIS_C4 
     &             .AND. exch2_isSedge(myTile).EQ.1
./pkg/monitor/mon_vort3.F 168 MON_VORT3 
     &                 .AND. exch2_isSedge(myTile).EQ.1
./pkg/monitor/mon_vort3.F 170 MON_VORT3 
     &                 .AND. exch2_isSedge(myTile).EQ.1
./pkg/seaice/seaice_advection.F 200 SEAICE_ADVECTION 
       S_edge = exch2_isSedge(myTile).EQ.1
./pkg/seaice/seaice_init_varia.F 221 SEAICE_INIT_VARIA 
         ELSEIF ( exch2_isSedge(myTile) .EQ. 1 ) THEN
./pkg/shap_filt/shap_filt_computvort.F 87 SHAP_FILT_COMPUTVORT 
     &               .AND. exch2_isSedge(myTile).EQ.1
./pkg/shap_filt/shap_filt_computvort.F 89 SHAP_FILT_COMPUTVORT 
     &               .AND. exch2_isSedge(myTile).EQ.1
./pkg/shap_filt/shap_filt_relvort3.F 95 SHAP_FILT_RELVORT3 
     &               .AND. exch2_isSedge(myTile).EQ.1
./pkg/shap_filt/shap_filt_relvort3.F 97 SHAP_FILT_RELVORT3 
     &               .AND. exch2_isSedge(myTile).EQ.1
./pkg/thsice/thsice_advection.F 179 THSICE_ADVECTION 
       S_edge = exch2_isSedge(myTile).EQ.1
./eesupp/src/fill_cs_corner_ag_rl.F 79 FILL_CS_CORNER_AG_RL 
     &             .AND. exch2_isSedge(myTile).EQ.1
./eesupp/src/fill_cs_corner_ag_rl.F 81 FILL_CS_CORNER_AG_RL 
     &             .AND. exch2_isSedge(myTile).EQ.1
./eesupp/src/fill_cs_corner_tr_rl.F 79 FILL_CS_CORNER_TR_RL 
     &             .AND. exch2_isSedge(myTile).EQ.1
./eesupp/src/fill_cs_corner_tr_rl.F 81 FILL_CS_CORNER_TR_RL 
     &             .AND. exch2_isSedge(myTile).EQ.1
./eesupp/src/fill_cs_corner_uv_rs.F 76 FILL_CS_CORNER_UV_RS 
     &             .AND. exch2_isSedge(myTile).EQ.1
./eesupp/src/fill_cs_corner_uv_rs.F 78 FILL_CS_CORNER_UV_RS 
     &             .AND. exch2_isSedge(myTile).EQ.1
./pkg/exch2/W2_EXCH2_TOPOLOGY.h 57 NO PROCEDURE 
       INTEGER exch2_isSedge(NTILES)
./pkg/exch2/W2_EXCH2_TOPOLOGY.h 74 NO PROCEDURE 
     &        exch2_isEedge, exch2_isSedge,
./pkg/exch2/w2_e2setup.F 104 W2_E2SETUP_2 
       exch2_isSedge(2)=1
./pkg/exch2/w2_e2setup.F 176 W2_E2SETUP_3 
       exch2_isSedge(3)=1
./pkg/exch2/w2_e2setup.F 248 W2_E2SETUP_4 
       exch2_isSedge(4)=1
./pkg/exch2/w2_e2setup.F 320 W2_E2SETUP_5 
       exch2_isSedge(5)=1
./pkg/exch2/w2_e2setup.F 32 W2_E2SETUP_1 
       exch2_isSedge(1)=1
./pkg/exch2/w2_e2setup.F 392 W2_E2SETUP_6 
       exch2_isSedge(6)=1