1#include "applu_share.h" 2#include "RCCE.h" 3 4void neighbors() { 5 6//c--------------------------------------------------------------------- 7//c figure out the neighbors and their wrap numbers for each processor 8//c--------------------------------------------------------------------- 9 10 south = -1; 11 east = -1; 12 north = -1; 13 west = -1; 14 15 if (row >1) north = id -1; 16 else north = -1; 17 18 if (row < xdim) south = id + 1; 19 else south = -1; 20 21 if (col > 1) west = id- xdim; 22 else west = -1; 23 24 if (col < ydim) east = id + xdim; 25 else east = -1; 26 27 return; 28} 29