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

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

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

revision 1.8 by adcroft, Wed Jul 15 22:13:21 1998 UTC revision 1.9 by cnh, Sat Aug 22 17:51:07 1998 UTC
# Line 60  C--   fields are ready. Line 60  C--   fields are ready.
60         _BARRIER         _BARRIER
61    
62  C--    Write "text-plots" of certain fields  C--    Write "text-plots" of certain fields
63         CALL PLOT_FIELD_XYZRL( uVel , 'Current uVel  ' , Nz, myIter, myThid )         CALL PLOT_FIELD_XYZRL( uVel , 'Current uVel  ' , Nr, myIter, myThid )
64         CALL PLOT_FIELD_XYZRL( vVel , 'Current vVel  ' , Nz, myIter, myThid )         CALL PLOT_FIELD_XYZRL( vVel , 'Current vVel  ' , Nr, myIter, myThid )
65         CALL PLOT_FIELD_XYZRL( theta, 'Current theta ' , Nz, myIter, myThid )         CALL PLOT_FIELD_XYZRL( theta, 'Current theta ' , Nr, myIter, myThid )
66         CALL PLOT_FIELD_XYRL( cg2d_x, 'Current cg2d_x ' , myIter, myThid )         CALL PLOT_FIELD_XYRL( cg2d_x, 'Current cg2d_x ' , myIter, myThid )
67    
68        ENDIF        ENDIF

Legend:
Removed from v.1.8  
changed lines
  Added in v.1.9

  ViewVC Help
Powered by ViewVC 1.1.22