/[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.5 by cnh, Wed Jun 10 17:05:59 1998 UTC revision 1.6 by cnh, Mon Jun 15 05:13:56 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  C        CALL PLOT_FIELD_XYZRL( theta, 'Initial Temperature' , Nz, 1, myThid )
       CALL PLOT_FIELD_XYZR8( theta, 'Potential temp.' , Nz, 1, myThid )  
 C  
110    
111        RETURN        RETURN
112        END        END

Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6

  ViewVC Help
Powered by ViewVC 1.1.22