33 |
C | |
C | |
34 |
C |-- PACKAGES_READPARMS |
C |-- PACKAGES_READPARMS |
35 |
C | | |
C | | |
36 |
C | | - MNC_INIT + MNC_CW_INIT + INI_MNC_VARS |
C | | - MNC_INIT + MNC_CW_INIT |
37 |
C | | |
C | | |
38 |
C | | - ${PKG}_READPARMS |
C | | - ${PKG}_READPARMS |
39 |
C | |
C | |
40 |
|
C |-- INI_MODEL_IO |
41 |
|
C | |
42 |
C |-- MON_INIT |
C |-- MON_INIT |
43 |
C | |
C | |
44 |
C |-- INI_GRID |
C |-- INI_GRID |
65 |
C | |
C | |
66 |
C |-- CONFIG_SUMMARY |
C |-- CONFIG_SUMMARY |
67 |
C | |
C | |
|
C |-- INI_MODEL_IO |
|
|
C | |
|
68 |
C |-- WRITE_GRID |
C |-- WRITE_GRID |
69 |
C | |
C | |
70 |
C |-- CPL_EXCH_CONFIGS |
C |-- CPL_EXCH_CONFIGS |
93 |
C-- Read configuration parameters for packages |
C-- Read configuration parameters for packages |
94 |
CALL PACKAGES_READPARMS( myThid ) |
CALL PACKAGES_READPARMS( myThid ) |
95 |
|
|
96 |
|
C-- Write units/set precision/etc for I/O of variables/arrays belonging |
97 |
|
C to the core dynamical model |
98 |
|
CALL INI_MODEL_IO( myThid ) |
99 |
|
|
100 |
#ifdef ALLOW_MONITOR |
#ifdef ALLOW_MONITOR |
101 |
C-- Initialise MONITOR I/O streams so we can report config. info |
C-- Initialise MONITOR I/O streams so we can report config. info |
102 |
CALL MON_INIT( myThid ) |
CALL MON_INIT( myThid ) |
148 |
C-- Finally summarise the model cofiguration |
C-- Finally summarise the model cofiguration |
149 |
CALL CONFIG_SUMMARY( myThid ) |
CALL CONFIG_SUMMARY( myThid ) |
150 |
|
|
|
C-- Write units/set precision/etc for I/O of variables/arrays belonging |
|
|
C to the core dynamical model |
|
|
CALL INI_MODEL_IO( myThid ) |
|
|
|
|
151 |
C-- Write grid data and geometry arrays |
C-- Write grid data and geometry arrays |
152 |
IF ( debugLevel.GE.debLevA .OR. |
IF ( debugLevel.GE.debLevA .OR. |
153 |
& startTime.EQ.baseTime ) CALL WRITE_GRID( myThid ) |
& startTime.EQ.baseTime ) CALL WRITE_GRID( myThid ) |
154 |
|
|
155 |
#ifdef COMPONENT_MODULE |
#ifdef COMPONENT_MODULE |