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


File Line number Procedure Code
./pkg/flt/flt_exch2.F 214 FLT_EXCH2 
           sSide=exch2_isSedge(nT).AND.facet_link(W2_SOUTH,myFace).EQ.0.
./pkg/generic_advdiff/gad_advection.F 230 GAD_ADVECTION 
       S_edge = exch2_isSedge(myTile).EQ.1
./pkg/generic_advdiff/gad_som_advect.F 225 GAD_SOM_ADVECT 
       S_edge = exch2_isSedge(myTile).EQ.1
./pkg/mnc/mnc_cw_model_attr.F 111 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 247 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 183 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 110 NO PROCEDURE 
     &        exch2_isEedge, exch2_isSedge,
./pkg/exch2/W2_EXCH2_TOPOLOGY.h 89 NO PROCEDURE 
       INTEGER exch2_isSedge( W2_maxNbTiles )
./pkg/exch2/exch2_get_uv_bounds.F 186 EXCH2_GET_UV_BOUNDS 
          IF ( exch2_isSedge(tgTile).EQ.1 ) THEN
./pkg/exch2/w2_eeboot.F 63 W2_EEBOOT 
        exch2_isSedge(I) = 0
./pkg/exch2/w2_print_e2setup.F 104 W2_PRINT_E2SETUP 
          IF ( ip(2).EQ.0 .AND. exch2_isSedge(is).EQ.1
./pkg/exch2/w2_print_e2setup.F 209 W2_PRINT_E2SETUP 
     &        ' N=', exch2_isNedge(is), ' , S=', exch2_isSedge(is),
./pkg/exch2/w2_set_tile2tiles.F 227 W2_SET_TILE2TILES 
     &        ' N=', exch2_isNedge(is), ' , S=', exch2_isSedge(is),
./pkg/exch2/w2_set_tile2tiles.F 98 W2_SET_TILE2TILES 
          IF ( .NOT.internConnect ) exch2_isSedge(is) = 1