Symbol Description Uses
myTile tile number 160



File Line number Procedure Code
./pkg/generic_advdiff/gad_advection.F 164 GAD_ADVECTION
      INTEGER myTile
./pkg/generic_advdiff/gad_advection.F 248 GAD_ADVECTION
       myTile = W2_myTileList(bi,bj)
./pkg/generic_advdiff/gad_advection.F 249 GAD_ADVECTION
       nCFace = exch2_myFace(myTile)
./pkg/generic_advdiff/gad_advection.F 250 GAD_ADVECTION
       N_edge = exch2_isNedge(myTile).EQ.1
./pkg/generic_advdiff/gad_advection.F 251 GAD_ADVECTION
       S_edge = exch2_isSedge(myTile).EQ.1
./pkg/generic_advdiff/gad_advection.F 252 GAD_ADVECTION
       E_edge = exch2_isEedge(myTile).EQ.1
./pkg/generic_advdiff/gad_advection.F 253 GAD_ADVECTION
       W_edge = exch2_isWedge(myTile).EQ.1
./pkg/generic_advdiff/gad_som_advect.F 140 GAD_SOM_ADVECT
      INTEGER myTile
./pkg/generic_advdiff/gad_som_advect.F 216 GAD_SOM_ADVECT
       myTile = W2_myTileList(bi,bj)
./pkg/generic_advdiff/gad_som_advect.F 217 GAD_SOM_ADVECT
       nCFace = exch2_myFace(myTile)
./pkg/generic_advdiff/gad_som_advect.F 218 GAD_SOM_ADVECT
       N_edge = exch2_isNedge(myTile).EQ.1
./pkg/generic_advdiff/gad_som_advect.F 219 GAD_SOM_ADVECT
       S_edge = exch2_isSedge(myTile).EQ.1
./pkg/generic_advdiff/gad_som_advect.F 220 GAD_SOM_ADVECT
       E_edge = exch2_isEedge(myTile).EQ.1
./pkg/generic_advdiff/gad_som_advect.F 221 GAD_SOM_ADVECT
       W_edge = exch2_isWedge(myTile).EQ.1
./pkg/mom_common/mom_calc_hfacz.F 239 MOM_CALC_HFACZ
        myTile = W2_myTileList(bi,bj)
./pkg/mom_common/mom_calc_hfacz.F 240 MOM_CALC_HFACZ
        myFace = exch2_myFace(myTile)
./pkg/mom_common/mom_calc_hfacz.F 241 MOM_CALC_HFACZ
        southWestCorner = exch2_isWedge(myTile).EQ.1
./pkg/mom_common/mom_calc_hfacz.F 242 MOM_CALC_HFACZ
     &              .AND. exch2_isSedge(myTile).EQ.1
./pkg/mom_common/mom_calc_hfacz.F 243 MOM_CALC_HFACZ
        southEastCorner = exch2_isEedge(myTile).EQ.1
./pkg/mom_common/mom_calc_hfacz.F 244 MOM_CALC_HFACZ
     &              .AND. exch2_isSedge(myTile).EQ.1
./pkg/mom_common/mom_calc_hfacz.F 245 MOM_CALC_HFACZ
        northEastCorner = exch2_isEedge(myTile).EQ.1
./pkg/mom_common/mom_calc_hfacz.F 246 MOM_CALC_HFACZ
     &              .AND. exch2_isNedge(myTile).EQ.1
./pkg/mom_common/mom_calc_hfacz.F 247 MOM_CALC_HFACZ
        northWestCorner = exch2_isWedge(myTile).EQ.1
./pkg/mom_common/mom_calc_hfacz.F 248 MOM_CALC_HFACZ
     &              .AND. exch2_isNedge(myTile).EQ.1
./pkg/mom_common/mom_calc_hfacz.F 76 MOM_CALC_HFACZ
      INTEGER myTile
./pkg/mom_common/mom_calc_relvort3.F 42 MOM_CALC_RELVORT3
      INTEGER myTile
./pkg/mom_common/mom_calc_relvort3.F 85 MOM_CALC_RELVORT3
       myTile = W2_myTileList(bi,bj)
./pkg/mom_common/mom_calc_relvort3.F 86 MOM_CALC_RELVORT3
       myFace = exch2_myFace(myTile)
./pkg/mom_common/mom_calc_relvort3.F 87 MOM_CALC_RELVORT3
       southWestCorner = exch2_isWedge(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 89 MOM_CALC_RELVORT3
       southEastCorner = exch2_isEedge(myTile).EQ.1
./pkg/mom_common/mom_calc_relvort3.F 90 MOM_CALC_RELVORT3
     &             .AND. exch2_isSedge(myTile).EQ.1
./pkg/mom_common/mom_calc_relvort3.F 91 MOM_CALC_RELVORT3
       northEastCorner = exch2_isEedge(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 93 MOM_CALC_RELVORT3
       northWestCorner = exch2_isWedge(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 60 MOM_VI_U_CORIOLIS_C4
      INTEGER myTile
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F 80 MOM_VI_U_CORIOLIS_C4
       myTile = W2_myTileList(bi,bj)
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F 81 MOM_VI_U_CORIOLIS_C4
       myFace = exch2_myFace(myTile)
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F 82 MOM_VI_U_CORIOLIS_C4
       southWestCorner = exch2_isWedge(myTile).EQ.1
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F 83 MOM_VI_U_CORIOLIS_C4
     &             .AND. exch2_isSedge(myTile).EQ.1
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F 84 MOM_VI_U_CORIOLIS_C4
       southEastCorner = exch2_isEedge(myTile).EQ.1
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F 85 MOM_VI_U_CORIOLIS_C4
     &             .AND. exch2_isSedge(myTile).EQ.1
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F 86 MOM_VI_U_CORIOLIS_C4
       northEastCorner = exch2_isEedge(myTile).EQ.1
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F 87 MOM_VI_U_CORIOLIS_C4
     &             .AND. exch2_isNedge(myTile).EQ.1
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F 88 MOM_VI_U_CORIOLIS_C4
       northWestCorner = exch2_isWedge(myTile).EQ.1
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F 89 MOM_VI_U_CORIOLIS_C4
     &             .AND. exch2_isNedge(myTile).EQ.1
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 60 MOM_VI_V_CORIOLIS_C4
      INTEGER myTile
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 80 MOM_VI_V_CORIOLIS_C4
       myTile = W2_myTileList(bi,bj)
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 81 MOM_VI_V_CORIOLIS_C4
       myFace = exch2_myFace(myTile)
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 82 MOM_VI_V_CORIOLIS_C4
       southWestCorner = exch2_isWedge(myTile).EQ.1
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 83 MOM_VI_V_CORIOLIS_C4
     &             .AND. exch2_isSedge(myTile).EQ.1
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 84 MOM_VI_V_CORIOLIS_C4
       southEastCorner = exch2_isEedge(myTile).EQ.1
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 85 MOM_VI_V_CORIOLIS_C4
     &             .AND. exch2_isSedge(myTile).EQ.1
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 86 MOM_VI_V_CORIOLIS_C4
       northEastCorner = exch2_isEedge(myTile).EQ.1
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 87 MOM_VI_V_CORIOLIS_C4
     &             .AND. exch2_isNedge(myTile).EQ.1
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 88 MOM_VI_V_CORIOLIS_C4
       northWestCorner = exch2_isWedge(myTile).EQ.1
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 89 MOM_VI_V_CORIOLIS_C4
     &             .AND. exch2_isNedge(myTile).EQ.1
./pkg/monitor/mon_vort3.F 165 MON_VORT3
           myTile = W2_myTileList(bi,bj)
./pkg/monitor/mon_vort3.F 166 MON_VORT3
           iG = exch2_myFace(myTile)
./pkg/monitor/mon_vort3.F 167 MON_VORT3
           southWestCorner = exch2_isWedge(myTile).EQ.1
./pkg/monitor/mon_vort3.F 168 MON_VORT3
     &                 .AND. exch2_isSedge(myTile).EQ.1
./pkg/monitor/mon_vort3.F 169 MON_VORT3
           southEastCorner = exch2_isEedge(myTile).EQ.1
./pkg/monitor/mon_vort3.F 170 MON_VORT3
     &                 .AND. exch2_isSedge(myTile).EQ.1
./pkg/monitor/mon_vort3.F 171 MON_VORT3
           northEastCorner = exch2_isEedge(myTile).EQ.1
./pkg/monitor/mon_vort3.F 172 MON_VORT3
     &                 .AND. exch2_isNedge(myTile).EQ.1
./pkg/monitor/mon_vort3.F 173 MON_VORT3
           northWestCorner = exch2_isWedge(myTile).EQ.1
./pkg/monitor/mon_vort3.F 174 MON_VORT3
     &                 .AND. exch2_isNedge(myTile).EQ.1
./pkg/monitor/mon_vort3.F 57 MON_VORT3
      INTEGER myTile
./pkg/seaice/seaice_advection.F 141 SEAICE_ADVECTION
      INTEGER myTile
./pkg/seaice/seaice_advection.F 216 SEAICE_ADVECTION
       myTile = W2_myTileList(bi,bj)
./pkg/seaice/seaice_advection.F 217 SEAICE_ADVECTION
       nCFace = exch2_myFace(myTile)
./pkg/seaice/seaice_advection.F 218 SEAICE_ADVECTION
       N_edge = exch2_isNedge(myTile).EQ.1
./pkg/seaice/seaice_advection.F 219 SEAICE_ADVECTION
       S_edge = exch2_isSedge(myTile).EQ.1
./pkg/seaice/seaice_advection.F 220 SEAICE_ADVECTION
       E_edge = exch2_isEedge(myTile).EQ.1
./pkg/seaice/seaice_advection.F 221 SEAICE_ADVECTION
       W_edge = exch2_isWedge(myTile).EQ.1
./model/src/ini_cori.F 155 INI_CORI
           myTile = iG
./model/src/ini_cori.F 157 INI_CORI
           myTile = W2_myTileList(bi,bj)
./model/src/ini_cori.F 158 INI_CORI
           iG = exch2_myface(myTile)
./model/src/ini_cori.F 163 INI_CORI
     &       ' Reading tile:', myTile, ' from file ', fName(1:iLen)
./model/src/ini_cori.F 49 INI_CORI
      INTEGER myTile, iG, iLen
./pkg/shap_filt/shap_filt_computvort.F 57 SHAP_FILT_COMPUTVORT
      INTEGER myTile
./pkg/shap_filt/shap_filt_computvort.F 84 SHAP_FILT_COMPUTVORT
         myTile = W2_myTileList(bi,bj)
./pkg/shap_filt/shap_filt_computvort.F 85 SHAP_FILT_COMPUTVORT
         myFace = exch2_myFace(myTile)
./pkg/shap_filt/shap_filt_computvort.F 86 SHAP_FILT_COMPUTVORT
         southWestCorner = exch2_isWedge(myTile).EQ.1
./pkg/shap_filt/shap_filt_computvort.F 87 SHAP_FILT_COMPUTVORT
     &               .AND. exch2_isSedge(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 89 SHAP_FILT_COMPUTVORT
     &               .AND. exch2_isSedge(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_computvort.F 91 SHAP_FILT_COMPUTVORT
     &               .AND. exch2_isNedge(myTile).EQ.1
./pkg/shap_filt/shap_filt_computvort.F 92 SHAP_FILT_COMPUTVORT
         northWestCorner = exch2_isWedge(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 100 SHAP_FILT_RELVORT3
         northWestCorner = exch2_isWedge(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 45 SHAP_FILT_RELVORT3
      INTEGER myTile
./pkg/shap_filt/shap_filt_relvort3.F 92 SHAP_FILT_RELVORT3
       myTile = W2_myTileList(bi,bj)
./pkg/shap_filt/shap_filt_relvort3.F 93 SHAP_FILT_RELVORT3
       myFace = exch2_myFace(myTile)
./pkg/shap_filt/shap_filt_relvort3.F 94 SHAP_FILT_RELVORT3
         southWestCorner = exch2_isWedge(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 96 SHAP_FILT_RELVORT3
         southEastCorner = exch2_isEedge(myTile).EQ.1
./pkg/shap_filt/shap_filt_relvort3.F 97 SHAP_FILT_RELVORT3
     &               .AND. exch2_isSedge(myTile).EQ.1
./pkg/shap_filt/shap_filt_relvort3.F 98 SHAP_FILT_RELVORT3
         northEastCorner = exch2_isEedge(myTile).EQ.1
./pkg/shap_filt/shap_filt_relvort3.F 99 SHAP_FILT_RELVORT3
     &               .AND. exch2_isNedge(myTile).EQ.1
./model/src/ini_global_domain.F 129 INI_GLOBAL_DOMAIN
           myTile = W2_myTileList(bi,bj)
./model/src/ini_global_domain.F 130 INI_GLOBAL_DOMAIN
           southWestCorner = exch2_isWedge(myTile).EQ.1
./model/src/ini_global_domain.F 131 INI_GLOBAL_DOMAIN
     &                 .AND. exch2_isSedge(myTile).EQ.1
./model/src/ini_global_domain.F 132 INI_GLOBAL_DOMAIN
           southEastCorner = exch2_isEedge(myTile).EQ.1
./model/src/ini_global_domain.F 133 INI_GLOBAL_DOMAIN
     &                 .AND. exch2_isSedge(myTile).EQ.1
./model/src/ini_global_domain.F 134 INI_GLOBAL_DOMAIN
           northEastCorner = exch2_isEedge(myTile).EQ.1
./model/src/ini_global_domain.F 135 INI_GLOBAL_DOMAIN
     &                 .AND. exch2_isNedge(myTile).EQ.1
./model/src/ini_global_domain.F 136 INI_GLOBAL_DOMAIN
           northWestCorner = exch2_isWedge(myTile).EQ.1
./model/src/ini_global_domain.F 137 INI_GLOBAL_DOMAIN
     &                 .AND. exch2_isNedge(myTile).EQ.1
./model/src/ini_global_domain.F 56 INI_GLOBAL_DOMAIN
      INTEGER myTile
./pkg/thsice/thsice_advection.F 141 THSICE_ADVECTION
      INTEGER myTile
./pkg/thsice/thsice_advection.F 187 THSICE_ADVECTION
       myTile = W2_myTileList(bi,bj)
./pkg/thsice/thsice_advection.F 188 THSICE_ADVECTION
       nCFace = exch2_myFace(myTile)
./pkg/thsice/thsice_advection.F 189 THSICE_ADVECTION
       N_edge = exch2_isNedge(myTile).EQ.1
./pkg/thsice/thsice_advection.F 190 THSICE_ADVECTION
       S_edge = exch2_isSedge(myTile).EQ.1
./pkg/thsice/thsice_advection.F 191 THSICE_ADVECTION
       E_edge = exch2_isEedge(myTile).EQ.1
./pkg/thsice/thsice_advection.F 192 THSICE_ADVECTION
       W_edge = exch2_isWedge(myTile).EQ.1
./eesupp/src/fill_cs_corner_ag_rl.F 67 FILL_CS_CORNER_AG_RL
      INTEGER myTile
./eesupp/src/fill_cs_corner_ag_rl.F 77 FILL_CS_CORNER_AG_RL
       myTile = W2_myTileList(bi,bj)
./eesupp/src/fill_cs_corner_ag_rl.F 78 FILL_CS_CORNER_AG_RL
       southWestCorner = exch2_isWedge(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 80 FILL_CS_CORNER_AG_RL
       southEastCorner = exch2_isEedge(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_ag_rl.F 82 FILL_CS_CORNER_AG_RL
       northEastCorner = exch2_isEedge(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 84 FILL_CS_CORNER_AG_RL
       northWestCorner = exch2_isWedge(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 67 FILL_CS_CORNER_TR_RL
      INTEGER myTile
./eesupp/src/fill_cs_corner_tr_rl.F 77 FILL_CS_CORNER_TR_RL
       myTile = W2_myTileList(bi,bj)
./eesupp/src/fill_cs_corner_tr_rl.F 78 FILL_CS_CORNER_TR_RL
       southWestCorner = exch2_isWedge(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 80 FILL_CS_CORNER_TR_RL
       southEastCorner = exch2_isEedge(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_tr_rl.F 82 FILL_CS_CORNER_TR_RL
       northEastCorner = exch2_isEedge(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 84 FILL_CS_CORNER_TR_RL
       northWestCorner = exch2_isWedge(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_rl.F 66 FILL_CS_CORNER_UV_RL
      INTEGER myTile
./eesupp/src/fill_cs_corner_uv_rl.F 76 FILL_CS_CORNER_UV_RL
       myTile = W2_myTileList(bi,bj)
./eesupp/src/fill_cs_corner_uv_rl.F 77 FILL_CS_CORNER_UV_RL
       southWestCorner = exch2_isWedge(myTile).EQ.1
./eesupp/src/fill_cs_corner_uv_rl.F 78 FILL_CS_CORNER_UV_RL
     &             .AND. exch2_isSedge(myTile).EQ.1
./eesupp/src/fill_cs_corner_uv_rl.F 79 FILL_CS_CORNER_UV_RL
       southEastCorner = exch2_isEedge(myTile).EQ.1
./eesupp/src/fill_cs_corner_uv_rl.F 80 FILL_CS_CORNER_UV_RL
     &             .AND. exch2_isSedge(myTile).EQ.1
./eesupp/src/fill_cs_corner_uv_rl.F 81 FILL_CS_CORNER_UV_RL
       northEastCorner = exch2_isEedge(myTile).EQ.1
./eesupp/src/fill_cs_corner_uv_rl.F 82 FILL_CS_CORNER_UV_RL
     &             .AND. exch2_isNedge(myTile).EQ.1
./eesupp/src/fill_cs_corner_uv_rl.F 83 FILL_CS_CORNER_UV_RL
       northWestCorner = exch2_isWedge(myTile).EQ.1
./eesupp/src/fill_cs_corner_uv_rl.F 84 FILL_CS_CORNER_UV_RL
     &             .AND. exch2_isNedge(myTile).EQ.1
./eesupp/src/fill_cs_corner_uv_rs.F 64 FILL_CS_CORNER_UV_RS
      INTEGER myTile
./eesupp/src/fill_cs_corner_uv_rs.F 74 FILL_CS_CORNER_UV_RS
       myTile = W2_myTileList(bi,bj)
./eesupp/src/fill_cs_corner_uv_rs.F 75 FILL_CS_CORNER_UV_RS
       southWestCorner = exch2_isWedge(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 77 FILL_CS_CORNER_UV_RS
       southEastCorner = exch2_isEedge(myTile).EQ.1
./eesupp/src/fill_cs_corner_uv_rs.F 78 FILL_CS_CORNER_UV_RS
     &             .AND. exch2_isSedge(myTile).EQ.1
./eesupp/src/fill_cs_corner_uv_rs.F 79 FILL_CS_CORNER_UV_RS
       northEastCorner = exch2_isEedge(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 81 FILL_CS_CORNER_UV_RS
       northWestCorner = exch2_isWedge(myTile).EQ.1
./eesupp/src/fill_cs_corner_uv_rs.F 82 FILL_CS_CORNER_UV_RS
     &             .AND. exch2_isNedge(myTile).EQ.1