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


File Line number Procedure Code
./pkg/generic_advdiff/gad_advection.F 228 GAD_ADVECTION 
       N_edge = exch2_isNedge(myTile).EQ.1
./pkg/generic_advdiff/gad_som_advect.F 223 GAD_SOM_ADVECT 
       N_edge = exch2_isNedge(myTile).EQ.1
./pkg/mnc/mnc_cw_model_attr.F 108 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 178 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 55 NO PROCEDURE 
       INTEGER exch2_isNedge(NTILES)
./pkg/exch2/W2_EXCH2_TOPOLOGY.h 73 NO PROCEDURE 
     &        exch2_isWedge, exch2_isNedge,
./pkg/exch2/w2_e2setup.F 102 W2_E2SETUP_2 
       exch2_isNedge(2)=1
./pkg/exch2/w2_e2setup.F 174 W2_E2SETUP_3 
       exch2_isNedge(3)=1
./pkg/exch2/w2_e2setup.F 246 W2_E2SETUP_4 
       exch2_isNedge(4)=1
./pkg/exch2/w2_e2setup.F 30 W2_E2SETUP_1 
       exch2_isNedge(1)=1
./pkg/exch2/w2_e2setup.F 318 W2_E2SETUP_5 
       exch2_isNedge(5)=1
./pkg/exch2/w2_e2setup.F 390 W2_E2SETUP_6 
       exch2_isNedge(6)=1