/[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.46 by jmc, Sat Jul 29 21:02:12 2006 UTC revision 1.47 by jmc, Tue Oct 17 18:52:34 2006 UTC
# Line 98  C--   Set model parameters. Line 98  C--   Set model parameters.
98  C     Parameters are set to defaults and then updates are read from  C     Parameters are set to defaults and then updates are read from
99  C     an input file called data.  C     an input file called data.
100        CALL INI_PARMS( myThid )        CALL INI_PARMS( myThid )
       _BARRIER  
101    
102  C--   Configure packages  C--   Configure packages
103        CALL PACKAGES_BOOT( myThid )        CALL PACKAGES_BOOT( myThid )
# Line 117  C     to the core dynamical model Line 116  C     to the core dynamical model
116  #ifdef ALLOW_MONITOR  #ifdef ALLOW_MONITOR
117  C--   Initialise MONITOR I/O streams so we can report config. info  C--   Initialise MONITOR I/O streams so we can report config. info
118        CALL MON_INIT( myThid )        CALL MON_INIT( myThid )
       _BARRIER  
119  #endif  #endif
120    
121  C--   Set model grid.  C--   Set model grid.
122  C     Variables defining model grid spacing are defined.  C     Variables defining model grid spacing are defined.
123        CALL INI_GRID( myThid )        CALL INI_GRID( myThid )
       _BARRIER  
124    
125  C--   Set equation of state parameters.  C--   Set equation of state parameters.
126        CALL INI_EOS( myThid )        CALL INI_EOS( myThid )
       _BARRIER  
127    
128  C--   Set pressure/geopotential reference profile  C--   Set pressure/geopotential reference profile
129        CALL INI_PHIREF( myThid )        CALL INI_PHIREF( myThid )
       _BARRIER  
130    
131  C--   Initialise map of depths  C--   Initialise map of depths
132        CALL INI_DEPTHS( myThid )        CALL INI_DEPTHS( myThid )
       _BARRIER  
133    
134  C--   Derive masks, lopping factors and recipricols of quantities.  C--   Derive masks, lopping factors and recipricols of quantities.
135  C     Volumes and areas are set according to grid and depth map.  C     Volumes and areas are set according to grid and depth map.
136        CALL INI_MASKS_ETC( myThid )        CALL INI_MASKS_ETC( myThid )
137    
138    C--   Synchronize all threads after setting masks and before pkgs init.
139        _BARRIER        _BARRIER
140    
141  C--   Call fixed data initialization phase of packages  C--   Call fixed data initialization phase of packages
Legend:
Removed from v.1.46  
changed lines
  Added in v.1.47
  ViewVC Help
Powered by ViewVC 1.1.22