Symbol Description Uses
exch2_isNedge 1 if North is at domain edge, 0 if not. 34


File Line number Procedure Code
./pkg/flt/flt_exch2.F 215 FLT_EXCH2 
           nSide=exch2_isNedge(nT).AND.facet_link(W2_NORTH,myFace).EQ.0.
./pkg/generic_advdiff/gad_advection.F 229 GAD_ADVECTION 
       N_edge = exch2_isNedge(myTile).EQ.1
./pkg/generic_advdiff/gad_som_advect.F 224 GAD_SOM_ADVECT 
       N_edge = exch2_isNedge(myTile).EQ.1
./pkg/mnc/mnc_cw_model_attr.F 109 MNC_CW_SET_GATTR 
     &     'exch2_isNedge', 1, exch2_isNedge(tnum), myThid)
./pkg/mom_common/mom_calc_hfacz.F 251 MOM_CALC_HFACZ 
     &              .AND. exch2_isNedge(myTile).EQ.1
./pkg/mom_common/mom_calc_hfacz.F 253 MOM_CALC_HFACZ 
     &              .AND. exch2_isNedge(myTile).EQ.1
./pkg/mom_common/mom_calc_relvort3.F 92 MOM_CALC_RELVORT3 
     &             .AND. exch2_isNedge(myTile).EQ.1
./pkg/mom_common/mom_calc_relvort3.F 94 MOM_CALC_RELVORT3 
     &             .AND. exch2_isNedge(myTile).EQ.1
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F 84 MOM_VI_U_CORIOLIS_C4 
     &             .AND. exch2_isNedge(myTile).EQ.1
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F 86 MOM_VI_U_CORIOLIS_C4 
     &             .AND. exch2_isNedge(myTile).EQ.1
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 84 MOM_VI_V_CORIOLIS_C4 
     &             .AND. exch2_isNedge(myTile).EQ.1
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 86 MOM_VI_V_CORIOLIS_C4 
     &             .AND. exch2_isNedge(myTile).EQ.1
./pkg/monitor/mon_vort3.F 172 MON_VORT3 
     &                 .AND. exch2_isNedge(myTile).EQ.1
./pkg/monitor/mon_vort3.F 174 MON_VORT3 
     &                 .AND. exch2_isNedge(myTile).EQ.1
./pkg/seaice/seaice_advection.F 199 SEAICE_ADVECTION 
       N_edge = exch2_isNedge(myTile).EQ.1
./pkg/shap_filt/shap_filt_computvort.F 91 SHAP_FILT_COMPUTVORT 
     &               .AND. exch2_isNedge(myTile).EQ.1
./pkg/shap_filt/shap_filt_computvort.F 93 SHAP_FILT_COMPUTVORT 
     &               .AND. exch2_isNedge(myTile).EQ.1
./pkg/shap_filt/shap_filt_relvort3.F 101 SHAP_FILT_RELVORT3 
     &               .AND. exch2_isNedge(myTile).EQ.1
./pkg/shap_filt/shap_filt_relvort3.F 99 SHAP_FILT_RELVORT3 
     &               .AND. exch2_isNedge(myTile).EQ.1
./pkg/thsice/thsice_advection.F 182 THSICE_ADVECTION 
       N_edge = exch2_isNedge(myTile).EQ.1
./eesupp/src/fill_cs_corner_ag_rl.F 83 FILL_CS_CORNER_AG_RL 
     &             .AND. exch2_isNedge(myTile).EQ.1
./eesupp/src/fill_cs_corner_ag_rl.F 85 FILL_CS_CORNER_AG_RL 
     &             .AND. exch2_isNedge(myTile).EQ.1
./eesupp/src/fill_cs_corner_tr_rl.F 83 FILL_CS_CORNER_TR_RL 
     &             .AND. exch2_isNedge(myTile).EQ.1
./eesupp/src/fill_cs_corner_tr_rl.F 85 FILL_CS_CORNER_TR_RL 
     &             .AND. exch2_isNedge(myTile).EQ.1
./eesupp/src/fill_cs_corner_uv_rs.F 80 FILL_CS_CORNER_UV_RS 
     &             .AND. exch2_isNedge(myTile).EQ.1
./eesupp/src/fill_cs_corner_uv_rs.F 82 FILL_CS_CORNER_UV_RS 
     &             .AND. exch2_isNedge(myTile).EQ.1
./pkg/exch2/W2_EXCH2_TOPOLOGY.h 109 NO PROCEDURE 
     &        exch2_isWedge, exch2_isNedge,
./pkg/exch2/W2_EXCH2_TOPOLOGY.h 87 NO PROCEDURE 
       INTEGER exch2_isNedge( W2_maxNbTiles )
./pkg/exch2/exch2_get_uv_bounds.F 191 EXCH2_GET_UV_BOUNDS 
          IF ( exch2_isNedge(tgTile).EQ.1 ) THEN
./pkg/exch2/w2_eeboot.F 61 W2_EEBOOT 
        exch2_isNedge(I) = 0
./pkg/exch2/w2_print_e2setup.F 209 W2_PRINT_E2SETUP 
     &        ' N=', exch2_isNedge(is), ' , S=', exch2_isSedge(is),
./pkg/exch2/w2_print_e2setup.F 98 W2_PRINT_E2SETUP 
          IF ( ip(1).EQ.0 .AND. exch2_isNedge(is).EQ.1
./pkg/exch2/w2_set_tile2tiles.F 227 W2_SET_TILE2TILES 
     &        ' N=', exch2_isNedge(is), ' , S=', exch2_isSedge(is),
./pkg/exch2/w2_set_tile2tiles.F 92 W2_SET_TILE2TILES 
          IF ( .NOT.internConnect ) exch2_isNedge(is) = 1