292 |
IF (useSALT_PLUME)CALL PACKAGES_ERROR_MSG('SALT_PLUME',' ',myThid) |
IF (useSALT_PLUME)CALL PACKAGES_ERROR_MSG('SALT_PLUME',' ',myThid) |
293 |
#endif |
#endif |
294 |
|
|
295 |
|
#ifdef ALLOW_ECCO |
296 |
|
CALL ECCO_CHECK( myThid ) |
297 |
|
#endif |
298 |
|
|
299 |
C--- Exclusive packages (which cannot be used together): |
C--- Exclusive packages (which cannot be used together): |
300 |
IF ( useEXF .AND. useBulkForce ) THEN |
IF ( useEXF .AND. useBulkForce ) THEN |
301 |
WRITE(msgBuf,'(2A)') 'PACKAGES_CHECK: ', |
WRITE(msgBuf,'(2A)') 'PACKAGES_CHECK: ', |