17 |
C |
C |
18 |
C NOTES: 1) This code, as written, only works on ONE PROCESSOR! |
C NOTES: 1) This code, as written, only works on ONE PROCESSOR! |
19 |
C 2) This code assumes that the faces are square (sNx=sNy....) |
C 2) This code assumes that the faces are square (sNx=sNy....) |
20 |
C (also - we don't worry about barriers) |
C (also - we do not worry about barriers) |
21 |
C*=====================================================================* |
C*=====================================================================* |
22 |
|
|
23 |
#include "SIZE.h" |
#include "SIZE.h" |
24 |
#include "EEPARAMS.h" |
#include "EEPARAMS.h" |
25 |
#include "EESUPPORT.h" |
#include "EESUPPORT.h" |
26 |
|
#include "EXCH.h" |
27 |
|
|
28 |
C == Argument list variables == |
C == Argument list variables == |
29 |
_RX component1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RX component1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |