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

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

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

revision 1.18 by jmc, Tue Mar 20 23:38:03 2012 UTC revision 1.19 by dimitri, Mon Mar 26 01:47:08 2012 UTC
# Line 98  C                    and stagger/synchro Line 98  C                    and stagger/synchro
98         ENDIF         ENDIF
99  #endif /* ALLOW_BBL */  #endif /* ALLOW_BBL */
100    
 #ifdef ALLOW_FRAZIL  
        IF ( seqFlag.EQ.0 .AND. useFRAZIL ) THEN  
         CALL FRAZIL_DIAGNOSTICS_STATE( myTime, myIter, myThid )  
        ENDIF  
 #endif /* ALLOW_FRAZIL */  
   
101  #ifdef ALLOW_SEAICE  #ifdef ALLOW_SEAICE
102         IF ( seqFlag.EQ.0 .AND. useSEAICE ) THEN         IF ( seqFlag.EQ.0 .AND. useSEAICE ) THEN
103          CALL SEAICE_DIAGNOSTICS_STATE( myTime, myIter, myThid )          CALL SEAICE_DIAGNOSTICS_STATE( myTime, myIter, myThid )
Legend:
Removed from v.1.18  
changed lines
  Added in v.1.19
  ViewVC Help
Powered by ViewVC 1.1.22