2 c---------------------------------------------------------------------
3 c---------------------------------------------------------------------
5 subroutine neighbors ()
7 c---------------------------------------------------------------------
8 c---------------------------------------------------------------------
14 c---------------------------------------------------------------------
15 c figure out the neighbors and their wrap numbers for each processor
16 c---------------------------------------------------------------------