35 |
C-- Set model parameters. |
C-- Set model parameters. |
36 |
C Parameters are set to defaults and then updates are read from |
C Parameters are set to defaults and then updates are read from |
37 |
C an input file called data. |
C an input file called data. |
38 |
CALL INI_PARMS( myThid ) |
CALL INI_PARMS( myThid ) |
39 |
_BARRIER |
_BARRIER |
40 |
|
|
41 |
|
C-- Configure packages |
42 |
|
CALL PACKAGE_INIT( myThid ) |
43 |
|
|
44 |
#ifdef ALLOW_OBCS |
#ifdef ALLOW_OBCS |
45 |
C-- Open boundaries positions |
C-- Open boundaries positions |
46 |
CALL INI_OBCS( myThid ) |
CALL INI_OBCS( myThid ) |
81 |
C-- Finally summarise the model cofiguration |
C-- Finally summarise the model cofiguration |
82 |
CALL CONFIG_SUMMARY( myThid ) |
CALL CONFIG_SUMMARY( myThid ) |
83 |
|
|
84 |
|
C-- Check dependances between packages |
85 |
|
CALL PACKAGE_CHECK( myThid ) |
86 |
|
|
87 |
END |
END |