Parent Directory
| 
Revision Log
| 
Revision Graph
| 
Patch
| revision 1.14 by jmc, Thu Jun 12 18:21:34 2003 UTC | revision 1.15 by heimbach, Thu Jun 19 15:00:45 2003 UTC | |
|---|---|---|
| # | Line 92 CEOP | Line 92 CEOP |
| 92 | IF (useSEAICE) CALL PACKAGES_CHECK_ERROR('SEAICE', myThid) | IF (useSEAICE) CALL PACKAGES_CHECK_ERROR('SEAICE', myThid) |
| 93 | #endif | #endif |
| 94 | ||
| 95 | #if ( defined (ALLOW_ADJOINT_RUN) || \ | |
| 96 | defined (ALLOW_TANGENTLINEAR_RUN) || \ | |
| 97 | defined (ALLOW_GRADIENT_CHECK) || \ | |
| 98 | defined (ALLOW_ECCO_OPTIMIZATION) ) | |
| 99 | CALL CTRL_CHECK( myThid ) | |
| 100 | CALL COST_CHECK( myThid ) | |
| 101 | #endif | |
| 102 | ||
| 103 | RETURN | RETURN |
| 104 | END | END |
|
||||||||
| ViewVC Help | |
| Powered by ViewVC 1.1.22 |