/[MITgcm]/MITgcm_contrib/dgoldberg/streamice/streamice_diagnostics_state.F
ViewVC logotype

Diff of /MITgcm_contrib/dgoldberg/streamice/streamice_diagnostics_state.F

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

revision 1.4 by dgoldberg, Thu Sep 27 20:29:00 2012 UTC revision 1.6 by dgoldberg, Thu May 23 22:12:33 2013 UTC
# Line 50  C     === Global variables === Line 50  C     === Global variables ===
50       &      0,1,0,1,1,myThid)       &      0,1,0,1,1,myThid)
51         CALL DIAGNOSTICS_FILL(STREAMICE_hmask,'SI_hmask',         CALL DIAGNOSTICS_FILL(STREAMICE_hmask,'SI_hmask',
52       &      0,1,0,1,1,myThid)       &      0,1,0,1,1,myThid)
53    #ifdef STREAMICE_HYBRID_STRESS
54         CALL DIAGNOSTICS_FILL(streamice_u_surf,'SI_usurf',         CALL DIAGNOSTICS_FILL(streamice_u_surf,'SI_usurf',
55       &      0,1,0,1,1,myThid)       &      0,1,0,1,1,myThid)
56         CALL DIAGNOSTICS_FILL(STREAMICE_v_surf,'SI_vsurf',         CALL DIAGNOSTICS_FILL(STREAMICE_v_surf,'SI_vsurf',
57       &      0,1,0,1,1,myThid)       &      0,1,0,1,1,myThid)
58    #endif
59         CALL DIAGNOSTICS_FILL(surf_el_streamice,'SI_selev',         CALL DIAGNOSTICS_FILL(surf_el_streamice,'SI_selev',
60       &      0,1,0,1,1,myThid)       &      0,1,0,1,1,myThid)
61    #ifdef ALLOW_STREAMICE_2DTRACER
62           CALL DIAGNOSTICS_FILL(trac2d,'SI2Dtrac',
63         &      0,1,0,1,1,myThid)
64    #endif
65    
66        ENDIF        ENDIF
67    
Legend:
Removed from v.1.4  
changed lines
  Added in v.1.6
  ViewVC Help
Powered by ViewVC 1.1.22