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

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

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

revision 1.95 by jmc, Wed Jul 30 03:31:35 2014 UTC revision 1.96 by jmc, Sat Sep 13 15:28:32 2014 UTC
# Line 367  C--   Initialize SEAICE model. Line 367  C--   Initialize SEAICE model.
367  #endif /* ALLOW_SHELFICE */  #endif /* ALLOW_SHELFICE */
368    
369  #ifdef ALLOW_STREAMICE  #ifdef ALLOW_STREAMICE
370  cph      IF (useStreamIce) THEN        IF (useStreamIce) THEN
371  # ifdef ALLOW_DEBUG  # ifdef ALLOW_DEBUG
372         IF (debugMode) CALL DEBUG_CALL('STREAMICE_INIT_VARIA',myThid)         IF (debugMode) CALL DEBUG_CALL('STREAMICE_INIT_VARIA',myThid)
373  # endif  # endif
374         CALL STREAMICE_INIT_VARIA( myThid )         CALL STREAMICE_INIT_VARIA( myThid )
375  cph      ENDIF        ENDIF
376  #endif /* ALLOW_STREAMICE */  #endif /* ALLOW_STREAMICE */
377    
378  #ifdef ALLOW_ICEFRONT  #ifdef ALLOW_ICEFRONT
Legend:
Removed from v.1.95  
changed lines
  Added in v.1.96
  ViewVC Help
Powered by ViewVC 1.1.22