Parent Directory | Revision Log | Revision Graph | Patch
revision 1.64 by jmc, Sun Aug 17 02:08:24 2008 UTC | revision 1.65 by dfer, Tue Oct 7 19:41:49 2008 UTC | |
---|---|---|
# | Line 40 C |-- KPP_INIT_FIXED | Line 40 C |-- KPP_INIT_FIXED |
40 | C | | C | |
41 | C |-- MY82_INIT_FIXED | C |-- MY82_INIT_FIXED |
42 | C | | C | |
43 | C |-- GGL90_INIT_FIXED | |
44 | C | | |
45 | C |-- OPPS_INIT | C |-- OPPS_INIT |
46 | C | | C | |
47 | C |-- OBCS_INIT_FIXED | C |-- OBCS_INIT_FIXED |
# | Line 166 C-- Initialize fixed arrays for MY82 | Line 168 C-- Initialize fixed arrays for MY82 |
168 | ENDIF | ENDIF |
169 | #endif | #endif |
170 | ||
171 | #ifdef ALLOW_GGL90 | |
172 | C-- Initialize fixed arrays for GGL90 | |
173 | IF ( useGGL90 ) THEN | |
174 | CALL GGL90_INIT_FIXED( myThid ) | |
175 | ENDIF | |
176 | #endif | |
177 | ||
178 | #ifdef ALLOW_OPPS | #ifdef ALLOW_OPPS |
179 | IF (useOPPS) CALL OPPS_INIT( myThid ) | IF (useOPPS) CALL OPPS_INIT( myThid ) |
180 | #endif /* ALLOW_OPPS */ | #endif /* ALLOW_OPPS */ |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |