Parent Directory | Revision Log | Revision Graph | Patch
revision 1.27 by jmc, Mon Dec 13 22:01:50 2004 UTC | revision 1.28 by adcroft, Tue May 31 18:24:28 2005 UTC | |
---|---|---|
# | Line 39 C msgBuf :: Informational/error | Line 39 C msgBuf :: Informational/error |
39 | CHARACTER*(MAX_LEN_MBUF) msgBuf | CHARACTER*(MAX_LEN_MBUF) msgBuf |
40 | CEOP | CEOP |
41 | ||
42 | #ifdef ALLOW_RUNCLOCK | |
43 | IF (useRunClock) CALL RUNCLOCK_CHECK( myThid ) | |
44 | #else | |
45 | IF (useRunClock) CALL PACKAGES_CHECK_ERROR('RUNCLOCK', myThid) | |
46 | #endif | |
47 | ||
48 | #ifdef ALLOW_KPP | #ifdef ALLOW_KPP |
49 | IF (useKPP) CALL KPP_CHECK( myThid ) | IF (useKPP) CALL KPP_CHECK( myThid ) |
50 | #else | #else |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |