&     exch2_nNeighbours(tnum), exch2_oi(1,tnum), myThid)

       INTEGER exch2_oi(MAX_NEIGHBOURS,NTILES)

     &        exch2_oi, exch2_oj

       exch2_oi(1,2)=0

       exch2_oi(2,2)=33

       exch2_oi(3,2)=32

       exch2_oi(4,2)=-32

       exch2_oi(1,3)=33

       exch2_oi(2,3)=0

       exch2_oi(3,3)=32

       exch2_oi(4,3)=-32

       exch2_oi(1,4)=0

       exch2_oi(2,4)=33

       exch2_oi(3,4)=32

       exch2_oi(4,4)=-32

       exch2_oi(1,5)=33

       exch2_oi(2,5)=0

       exch2_oi(3,5)=32

       exch2_oi(4,5)=-32

       exch2_oi(1,6)=0

       exch2_oi(2,6)=33

       exch2_oi(3,6)=32

       exch2_oi(4,6)=-32

       exch2_oi(1,1)=33

       exch2_oi(2,1)=0

       exch2_oi(3,1)=32

       exch2_oi(4,1)=-32

        oi        =exch2_oi(N,myTileId)