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

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

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

revision 1.42 by edhill, Mon Aug 1 21:07:34 2005 UTC revision 1.43 by heimbach, Thu Aug 25 16:11:30 2005 UTC
# Line 198  C--   Initialise & Read Land package par Line 198  C--   Initialise & Read Land package par
198        IF (useLand) CALL LAND_INITIALISE( myThid )        IF (useLand) CALL LAND_INITIALISE( myThid )
199  #endif  #endif
200    
201    #if (defined (ALLOW_SEAICE) && defined (ALLOW_COST))
202    C--   Initialise ecco-specific cost function.
203    C--   This needs to preceed the call ctrl_init
204    C--   in order to provide the weight files
205          CALL SEAICE_COST_INIT_FIXED( myThid )
206    #endif
207    
208  #if (defined (ALLOW_ECCO) && defined (ALLOW_COST))  #if (defined (ALLOW_ECCO) && defined (ALLOW_COST))
209  C--   Initialise ecco-specific cost function.  C--   Initialise ecco-specific cost function.
210  C--   This needs to preceed the call ctrl_init  C--   This needs to preceed the call ctrl_init
Legend:
Removed from v.1.42  
changed lines
  Added in v.1.43
  ViewVC Help
Powered by ViewVC 1.1.22