/[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.15 by molod, Mon Dec 15 23:00:44 2003 UTC revision 1.19 by molod, Thu Feb 26 19:41:48 2004 UTC
# Line 111  C--   Initialise the control variables Line 111  C--   Initialise the control variables
111  #endif  #endif
112  #endif  #endif
113    
114    CAMM
115    #ifdef ALLOW_DIAGNOSTICS
116          IF (usediagnostics) then
117           call diagnostics_initialise(mythid)
118          ENDIF
119    #endif
120    CAMM
121    
122        RETURN        RETURN
123        END        END
Legend:
Removed from v.1.15  
changed lines
  Added in v.1.19
  ViewVC Help
Powered by ViewVC 1.1.22