Parent Directory | Revision Log | Revision Graph | Patch
revision 1.12 by heimbach, Tue Jul 31 16:09:43 2012 UTC | revision 1.13 by jahn, Wed Nov 7 21:37:33 2012 UTC | |
---|---|---|
# | Line 108 C-- Call external CheapAML forcing pac | Line 108 C-- Call external CheapAML forcing pac |
108 | ENDIF | ENDIF |
109 | #endif /*ALLOW_CHEAPAML */ | #endif /*ALLOW_CHEAPAML */ |
110 | ||
111 | IF ( .NOT.(useEXF.OR.useCheapAML) ) THEN | IF ( .NOT.useCheapAML ) THEN |
112 | #ifdef ALLOW_DEBUG | #ifdef ALLOW_DEBUG |
113 | IF (debugMode) CALL DEBUG_CALL('EXTERNAL_FIELDS_LOAD',myThid) | IF (debugMode) CALL DEBUG_CALL('EXTERNAL_FIELDS_LOAD',myThid) |
114 | #endif | #endif |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |