/[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.49 by jmc, Wed May 24 00:47:02 2006 UTC revision 1.50 by heimbach, Wed Jun 28 21:24:54 2006 UTC
# Line 266  C     IF (useDIC) Line 266  C     IF (useDIC)
266  #endif  #endif
267    
268  #ifdef ALLOW_DIAGNOSTICS  #ifdef ALLOW_DIAGNOSTICS
269        IF ( useDiagnostics ) THEN        IF ( useDiagnostics ) CALL DIAGNOSTICS_INIT_FIXED( myThid )
         CALL DIAGNOSTICS_INIT_FIXED( myThid )  
       ENDIF  
270  #endif  #endif
271    
272  #ifdef ALLOW_EMBED_FILES  #ifdef ALLOW_EMBED_FILES
273        IF ( useEMBED_FILES ) THEN        IF ( useEMBED_FILES ) CALL EMBED_FILES_INIT( mythid )
274          CALL EMBED_FILES_INIT( mythid )  #endif
275        ENDIF  
276    #ifdef ALLOW_MYPACKAGE
277          IF (useMYPACKAGE) CALL MYPACKAGE_INIT_FIXED(mythid)
278  #endif  #endif
279    
280        RETURN        RETURN
Legend:
Removed from v.1.49  
changed lines
  Added in v.1.50
  ViewVC Help
Powered by ViewVC 1.1.22