Parent Directory | Revision Log | Revision Graph | Patch
revision 1.1 by adcroft, Tue Mar 14 16:10:23 2000 UTC | revision 1.2 by adcroft, Tue Mar 14 20:28:12 2000 UTC | |
---|---|---|
# | Line 11 C $Header$ | Line 11 C $Header$ |
11 | #include "mpif.h" | #include "mpif.h" |
12 | #endif | #endif |
13 | ||
14 | REAL*8 ans | Real*8 ans |
15 | INTEGER myThid | INTEGER myThid |
16 | ||
17 | #ifdef LETS_MAKE_JAM | #ifdef LETS_MAKE_JAM |
18 | ||
19 | REAL*8 phi | Real*8 phi |
20 | INTEGER RC | INTEGER RC |
21 | ||
22 | phi = ans | phi = ans |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |