42 |
C | |
C | |
43 |
C |-- KPP_INIT_FIXED |
C |-- KPP_INIT_FIXED |
44 |
C | |
C | |
45 |
|
C |-- PP81_INIT_FIXED |
46 |
|
C | |
47 |
C |-- MY82_INIT_FIXED |
C |-- MY82_INIT_FIXED |
48 |
C | |
C | |
49 |
C |-- GGL90_INIT_FIXED |
C |-- GGL90_INIT_FIXED |
229 |
ENDIF |
ENDIF |
230 |
#endif |
#endif |
231 |
|
|
232 |
|
#ifdef ALLOW_PP81 |
233 |
|
C-- Initialize fixed arrays for PP81 |
234 |
|
IF ( usePP81 ) THEN |
235 |
|
# ifdef ALLOW_DEBUG |
236 |
|
IF (debugMode) CALL DEBUG_CALL('PP81_INIT_FIXED',myThid) |
237 |
|
# endif |
238 |
|
CALL PP81_INIT_FIXED( myThid ) |
239 |
|
ENDIF |
240 |
|
#endif |
241 |
|
|
242 |
#ifdef ALLOW_MY82 |
#ifdef ALLOW_MY82 |
243 |
C-- Initialize fixed arrays for MY82 |
C-- Initialize fixed arrays for MY82 |
244 |
IF ( useMY82 ) THEN |
IF ( useMY82 ) THEN |