/[MITgcm]/MITgcm/pkg/thsice/thsice_init_fixed.F
ViewVC logotype

Diff of /MITgcm/pkg/thsice/thsice_init_fixed.F

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

revision 1.1 by jmc, Tue Jan 4 00:25:31 2005 UTC revision 1.2 by edhill, Fri Jun 24 04:36:54 2005 UTC
# Line 33  CEOP Line 33  CEOP
33  C     !LOCAL VARIABLES:  C     !LOCAL VARIABLES:
34  C     === Local variables ===  C     === Local variables ===
35    
36    #ifdef ALLOW_MNC
37          IF ( useMNC ) THEN
38            CALL THSICE_MNC_INIT( myThid )
39          ENDIF
40    #endif
41    
42  #ifdef ALLOW_DIAGNOSTICS  #ifdef ALLOW_DIAGNOSTICS
43        IF ( useDiagnostics ) THEN        IF ( useDiagnostics ) THEN
44          CALL THSICE_DIAGNOSTICS_INIT( myThid )          CALL THSICE_DIAGNOSTICS_INIT( myThid )
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22