Parent Directory | Revision Log | Revision Graph | Patch
revision 1.7 by heimbach, Thu Nov 6 22:05:08 2003 UTC | revision 1.8 by heimbach, Tue Nov 16 05:42:12 2004 UTC | |
---|---|---|
# | Line 29 c == global variables == | Line 29 c == global variables == |
29 | #include "GRID.h" | #include "GRID.h" |
30 | ||
31 | #include "ctrl.h" | #include "ctrl.h" |
#ifdef ALLOW_ECCO_OPTIMIZATION | ||
32 | #include "optim.h" | #include "optim.h" |
#endif | ||
33 | ||
34 | c == routine arguments == | c == routine arguments == |
35 | ||
# | Line 47 c == routine arguments == | Line 44 c == routine arguments == |
44 | ||
45 | c == local variables == | c == local variables == |
46 | ||
#ifndef ALLOW_ECCO_OPTIMIZATION | ||
integer optimcycle | ||
#endif | ||
47 | integer bi,bj | integer bi,bj |
48 | integer ip,jp | integer ip,jp |
49 | integer i,j,k | integer i,j,k |
# | Line 80 c == external == | Line 73 c == external == |
73 | ||
74 | c == end of interface == | c == end of interface == |
75 | ||
#ifndef ALLOW_ECCO_OPTIMIZATION | ||
optimcycle = 0 | ||
#endif | ||
76 | jtlo = 1 | jtlo = 1 |
77 | jthi = nsy | jthi = nsy |
78 | itlo = 1 | itlo = 1 |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |