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

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

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

revision 1.7 by cnh, Sat Aug 22 17:51:08 1998 UTC revision 1.8 by cnh, Wed Oct 28 03:11:37 1998 UTC
# Line 106  C Line 106  C
106        _EXCH_XYZ_R8(gt , myThid )        _EXCH_XYZ_R8(gt , myThid )
107        _EXCH_XYZ_R8(gtNM1 , myThid )        _EXCH_XYZ_R8(gtNM1 , myThid )
108    
109        CALL PLOT_FIELD_XYZRL( theta, 'Initial Temperature' , Nr, 1, myThid )        CALL PLOT_FIELD_XYZRL( theta, 'Initial Temperature' ,
110         &                       Nr, 1, myThid )
111    
112        RETURN        RETURN
113        END        END
Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8
  ViewVC Help
Powered by ViewVC 1.1.22