Parent Directory | Revision Log | Revision Graph | Patch
revision 1.17 by adcroft, Mon Aug 30 18:25:33 1999 UTC | revision 1.18 by heimbach, Mon Sep 11 20:53:25 2000 UTC | |
---|---|---|
# | Line 10 C \================================= | Line 10 C \================================= |
10 | I K, | I K, |
11 | I myIter, myThid ) | I myIter, myThid ) |
12 | implicit none | implicit none |
13 | ! Common | |
14 | C == Global variables == | |
15 | #include "SIZE.h" | #include "SIZE.h" |
16 | #include "DYNVARS.h" | #include "DYNVARS.h" |
17 | #include "EEPARAMS.h" | #include "EEPARAMS.h" |
18 | #include "PARAMS.h" | #include "PARAMS.h" |
19 | #include "GRID.h" | #include "GRID.h" |
20 | ||
21 | C == Routine Arguments == | C == Routine Arguments == |
22 | INTEGER bi,bj,iMin,iMax,jMin,jMax | INTEGER bi,bj,iMin,iMax,jMin,jMax |
23 | INTEGER K | INTEGER K |
24 | INTEGER myIter, myThid | INTEGER myIter, myThid |
25 | ||
26 | C == Local variables == | C == Local variables == |
27 | INTEGER i,j | INTEGER i,j |
28 | _RL ab15,ab05 | _RL ab15,ab05 |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |