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

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

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

revision 1.39 by heimbach, Fri Sep 17 22:57:12 2004 UTC revision 1.40 by heimbach, Fri Oct 8 17:25:37 2004 UTC
# Line 85  C     == Local variables == Line 85  C     == Local variables ==
85        INTEGER bi,bj,K,iMin,iMax,jMin,jMax        INTEGER bi,bj,K,iMin,iMax,jMin,jMax
86  CEOP  CEOP
87    
88  #ifdef ALLOW_TAMC_CHECKPOINTING  #ifdef ALLOW_AUTODIFF_TAMC
89    
90        nIter0 = INT( startTime/deltaTClock )        nIter0 = INT( startTime/deltaTClock )
91    
# Line 104  ceh3 should add an IF ( useNONHYDROSTATI Line 104  ceh3 should add an IF ( useNONHYDROSTATI
104        CALL INI_CG3D( myThid )        CALL INI_CG3D( myThid )
105  #endif  #endif
106    
107  #endif /* ALLOW_TAMC_CHECKPOINTING */  #endif /* ALLOW_AUTODIFF_TAMC */
108        _BARRIER        _BARRIER
109    
110  C--   Initialise 3-dim. diffusivities  C--   Initialise 3-dim. diffusivities
Legend:
Removed from v.1.39  
changed lines
  Added in v.1.40
  ViewVC Help
Powered by ViewVC 1.1.22