43 |
C | |
C | |
44 |
C |-- PACKAGES_READPARMS |
C |-- PACKAGES_READPARMS |
45 |
C | |
C | |
|
C |-- PACKAGES_CHECK |
|
|
C | |
|
46 |
C |-- PACKAGES_INIT_FIXED |
C |-- PACKAGES_INIT_FIXED |
47 |
C | |
C | |
48 |
|
C |-- PACKAGES_CHECK |
49 |
|
C | |
50 |
C |-- INI_LINEAR_PHSURF |
C |-- INI_LINEAR_PHSURF |
51 |
C | |
C | |
52 |
C |-- INI_CORI |
C |-- INI_CORI |
108 |
C-- Read configuration parameters for packages |
C-- Read configuration parameters for packages |
109 |
CALL PACKAGES_READPARMS( myThid ) |
CALL PACKAGES_READPARMS( myThid ) |
110 |
|
|
|
C-- Check dependances between packages |
|
|
CALL PACKAGES_CHECK( myThid ) |
|
|
|
|
111 |
C-- Call fixed data initialization phase of packages |
C-- Call fixed data initialization phase of packages |
112 |
CALL PACKAGES_INIT_FIXED( myThid ) |
CALL PACKAGES_INIT_FIXED( myThid ) |
113 |
|
|
114 |
|
C-- Check dependances between packages |
115 |
|
CALL PACKAGES_CHECK( myThid ) |
116 |
|
|
117 |
C-- Set Bo_surf => define the Linear Relation: Phi_surf(eta) |
C-- Set Bo_surf => define the Linear Relation: Phi_surf(eta) |
118 |
CALL INI_LINEAR_PHISURF( myThid ) |
CALL INI_LINEAR_PHISURF( myThid ) |
119 |
|
|