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

       INTEGER exch2_oj(MAX_NEIGHBOURS,NTILES)

     &        exch2_oi, exch2_oj

       exch2_oj(1,2)=32

       exch2_oj(2,2)=-32

       exch2_oj(3,2)=33

       exch2_oj(4,2)=0

       exch2_oj(1,3)=32

       exch2_oj(2,3)=-32

       exch2_oj(3,3)=0

       exch2_oj(4,3)=33

       exch2_oj(1,4)=32

       exch2_oj(2,4)=-32

       exch2_oj(3,4)=33

       exch2_oj(4,4)=0

       exch2_oj(1,5)=32

       exch2_oj(2,5)=-32

       exch2_oj(3,5)=0

       exch2_oj(4,5)=33

       exch2_oj(1,6)=32

       exch2_oj(2,6)=-32

       exch2_oj(3,6)=33

       exch2_oj(4,6)=0

       exch2_oj(1,1)=32

       exch2_oj(2,1)=-32

       exch2_oj(3,1)=0

       exch2_oj(4,1)=33

        oj        =exch2_oj(N,myTileId)