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

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

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

revision 1.8 by cnh, Fri Nov 6 22:44:48 1998 UTC revision 1.12 by jmc, Tue Mar 6 17:10:29 2001 UTC
# Line 1  Line 1 
1  C $Header$  C $Header$
2    C $Name$
3    
4  #include "CPP_OPTIONS.h"  #include "CPP_OPTIONS.h"
5    
# Line 26  C     | point etc.. Line 27  C     | point etc..
27  C     | Other plot formats can also be substituted here.         |  C     | Other plot formats can also be substituted here.         |
28  C     | _RS is usually REAL*4                                    |  C     | _RS is usually REAL*4                                    |
29  C     \==========================================================/  C     \==========================================================/
30          IMPLICIT NONE
31    
32  #include "SIZE.h"  #include "SIZE.h"
33  #include "EEPARAMS.h"  #include "EEPARAMS.h"
34  #include "PARAMS.h"  #include "PARAMS.h"
 #include "CG2D.h"  
35    
36  C     == Routine arguments ==  C     == Routine arguments ==
37  C     fld - Field to plot  C     fld - Field to plot
# Line 108  C     | point etc.. Line 110  C     | point etc..
110  C     | Other plot formats can also be substituted here.         |  C     | Other plot formats can also be substituted here.         |
111  C     | _RL is usually REAL*8                                    |  C     | _RL is usually REAL*8                                    |
112  C     \==========================================================/  C     \==========================================================/
113          IMPLICIT NONE
114    
115  #include "SIZE.h"  #include "SIZE.h"
116  #include "EEPARAMS.h"  #include "EEPARAMS.h"
117  #include "PARAMS.h"  #include "PARAMS.h"
 #include "CG2D.h"  
118    
119  C     == Routine arguments ==  C     == Routine arguments ==
120  C     fld - Field to plot  C     fld - Field to plot
# Line 190  C     | point etc.. Line 193  C     | point etc..
193  C     | Other plot formats can also be substituted here.         |  C     | Other plot formats can also be substituted here.         |
194  C     | _RS is usually a REAL*4 field                            |  C     | _RS is usually a REAL*4 field                            |
195  C     \==========================================================/  C     \==========================================================/
196          IMPLICIT NONE
197    
198  #include "SIZE.h"  #include "SIZE.h"
199  #include "EEPARAMS.h"  #include "EEPARAMS.h"
200  #include "PARAMS.h"  #include "PARAMS.h"
 #include "CG2D.h"  
201    
202  C     == Routine arguments ==  C     == Routine arguments ==
203  C     fld - Field to plot  C     fld - Field to plot
# Line 243  C      jStart   =  sNy Line 247  C      jStart   =  sNy
247  C      jEnd     =  1  C      jEnd     =  1
248         jStride  = -1         jStride  = -1
249         kStart   =  1         kStart   =  1
250         kEnd     =  fldNz  C      kEnd     =  fldNz
251         kEnd     =  1         kEnd     =  1
252         kStride  =  1         kStride  =  1
253         biStart  =  1         biStart  =  1
# Line 282  C     | point etc.. Line 286  C     | point etc..
286  C     | Other plot formats can also be substituted here.         |  C     | Other plot formats can also be substituted here.         |
287  C     | _RL is usually a REAL*8 field                            |  C     | _RL is usually a REAL*8 field                            |
288  C     \==========================================================/  C     \==========================================================/
289          IMPLICIT NONE
290    
291  #include "SIZE.h"  #include "SIZE.h"
292  #include "EEPARAMS.h"  #include "EEPARAMS.h"
293  #include "PARAMS.h"  #include "PARAMS.h"
 #include "CG2D.h"  
294    
295  C     == Routine arguments ==  C     == Routine arguments ==
296  C     fld - Field to plot  C     fld - Field to plot

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

  ViewVC Help
Powered by ViewVC 1.1.22