782 |
ENDIF |
ENDIF |
783 |
|
|
784 |
C-- Time-stepping limitations |
C-- Time-stepping limitations |
785 |
|
IF ( implicitIntGravWave .AND. staggerTimeStep ) THEN |
786 |
|
WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: staggerTimeStep', |
787 |
|
& ' incompatible with implicitIntGravWave' |
788 |
|
CALL PRINT_ERROR( msgBuf, myThid ) |
789 |
|
errCount = errCount + 1 |
790 |
|
ENDIF |
791 |
IF ( momForcingOutAB.NE.0 .AND. momForcingOutAB.NE.1 ) THEN |
IF ( momForcingOutAB.NE.0 .AND. momForcingOutAB.NE.1 ) THEN |
792 |
WRITE(msgBuf,'(A,I10,A)') 'CONFIG_CHECK: momForcingOutAB=', |
WRITE(msgBuf,'(A,I10,A)') 'CONFIG_CHECK: momForcingOutAB=', |
793 |
& momForcingOutAB, ' not allowed' |
& momForcingOutAB, ' not allowed' |