26 |
#ifdef ALLOW_KPP |
#ifdef ALLOW_KPP |
27 |
IF (useKPP) CALL KPP_CHECK( myThid ) |
IF (useKPP) CALL KPP_CHECK( myThid ) |
28 |
#else |
#else |
29 |
IF (useKPP) CALL PACKAGES_CHECK_ERROR('KPP') |
IF (useKPP) CALL PACKAGES_CHECK_ERROR('KPP', myThid) |
30 |
#endif |
#endif |
31 |
|
|
32 |
#ifdef ALLOW_GMREDI |
#ifdef ALLOW_GMREDI |
33 |
IF (useGMRedi) CALL GMREDI_CHECK( myThid ) |
IF (useGMRedi) CALL GMREDI_CHECK( myThid ) |
34 |
#else |
#else |
35 |
IF (useGMRedi) CALL PACKAGES_CHECK_ERROR('GMREDI') |
IF (useGMRedi) CALL PACKAGES_CHECK_ERROR('GMREDI', myThid) |
36 |
#endif |
#endif |
37 |
|
|
38 |
return |
return |