/[MITgcm]/MITgcm/model/src/initialise_fixed.F
ViewVC logotype

Diff of /MITgcm/model/src/initialise_fixed.F

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.11 by jmc, Tue Feb 11 03:03:46 2003 UTC revision 1.12 by jmc, Wed Feb 26 03:13:28 2003 UTC
# Line 38  C      |-- INI_DEPTHS Line 38  C      |-- INI_DEPTHS
38  C      |  C      |
39  C      |-- INI_MASKS_ETC  C      |-- INI_MASKS_ETC
40  C      |  C      |
 C      |-- INI_LINEAR_PHSURF  
 C      |  
 C      |-- INI_CORI  
 C      |  
41  C      |-- PACKAGES_BOOT  C      |-- PACKAGES_BOOT
42  C      |  C      |
43  C      |-- PACKAGES_READPARMS  C      |-- PACKAGES_READPARMS
# Line 50  C      |-- PACKAGES_CHECK Line 46  C      |-- PACKAGES_CHECK
46  C      |  C      |
47  C      |-- PACKAGES_INIT_FIXED  C      |-- PACKAGES_INIT_FIXED
48  C      |  C      |
49  C      |-- ZONAL_FILT_INIT  C      |-- INI_LINEAR_PHSURF
50    C      |
51    C      |-- INI_CORI
52  C      |  C      |
53  C      |-- INI_CG2D  C      |-- INI_CG2D
54  C      |  C      |
# Line 103  C     Volumes and areas are set accordin Line 101  C     Volumes and areas are set accordin
101        CALL INI_MASKS_ETC( myThid )        CALL INI_MASKS_ETC( myThid )
102        _BARRIER        _BARRIER
103    
 C--   Set Bo_surf => define the Linear Relation: Phi_surf(eta)  
       CALL INI_LINEAR_PHISURF( myThid )  
   
 C--   Set coriolis operators  
       CALL INI_CORI( myThid )  
   
104  C--   Configure packages  C--   Configure packages
105        CALL PACKAGES_BOOT( myThid )        CALL PACKAGES_BOOT( myThid )
106    
# Line 121  C--   Check dependances between packages Line 113  C--   Check dependances between packages
113  C--   Call fixed data initialization phase of packages  C--   Call fixed data initialization phase of packages
114        CALL PACKAGES_INIT_FIXED( myThid )        CALL PACKAGES_INIT_FIXED( myThid )
115    
116    C--   Set Bo_surf => define the Linear Relation: Phi_surf(eta)
117          CALL INI_LINEAR_PHISURF( myThid )
118    
119    C--   Set coriolis operators
120          CALL INI_CORI( myThid )
121    
122  C--   Set laplace operators for use in 2D conjugate gradient solver.  C--   Set laplace operators for use in 2D conjugate gradient solver.
123        CALL INI_CG2D( myThid )        CALL INI_CG2D( myThid )
124    
# Line 135  C--   Check parameters and model cofigur Line 133  C--   Check parameters and model cofigur
133  C--   Finally summarise the model cofiguration  C--   Finally summarise the model cofiguration
134        CALL CONFIG_SUMMARY( myThid )        CALL CONFIG_SUMMARY( myThid )
135    
136          RETURN
137        END        END
Legend:
Removed from v.1.11  
changed lines
  Added in v.1.12
  ViewVC Help
Powered by ViewVC 1.1.22