/[MITgcm]/MITgcm/pkg/diagnostics/diagnostics_utils.F
ViewVC logotype

Diff of /MITgcm/pkg/diagnostics/diagnostics_utils.F

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

revision 1.4 by molod, Thu Feb 26 19:52:05 2004 UTC revision 1.9 by edhill, Tue Jul 6 03:55:53 2004 UTC
# Line 1  Line 1 
1    C $Header$
2    C $Name$
3    
4    #include "DIAG_OPTIONS.h"
5    
6        subroutine getdiag (myThid,lev,ipoint,undef,qtmp)        subroutine getdiag (myThid,lev,ipoint,undef,qtmp)
7  C***********************************************************************          C***********************************************************************        
8  C  PURPOSE                                                                        C  PURPOSE                                                                      
# Line 14  C    qtmp ..... AVERAGED DIAGNOSTIC QUAN Line 19  C    qtmp ..... AVERAGED DIAGNOSTIC QUAN
19  C                                                                                C                                                                              
20  C***********************************************************************          C***********************************************************************        
21        implicit none        implicit none
   
22  #include "EEPARAMS.h"  #include "EEPARAMS.h"
23  #include "CPP_OPTIONS.h"  #include "CPP_OPTIONS.h"
24  #include "SIZE.h"  #include "SIZE.h"
# Line 23  C*************************************** Line 27  C***************************************
27  #include "fizhi_SIZE.h"  #include "fizhi_SIZE.h"
28  #else  #else
29         integer Nrphys         integer Nrphys
30         parameter (Nrphys=1)         parameter (Nrphys=0)
31  #endif  #endif
32    
33  #include "diagnostics_SIZE.h"  #include "diagnostics_SIZE.h"
# Line 89  C*************************************** Line 93  C***************************************
93  #include "fizhi_SIZE.h"  #include "fizhi_SIZE.h"
94  #else  #else
95         integer Nrphys         integer Nrphys
96         parameter (Nrphys=1)         parameter (Nrphys=0)
97  #endif  #endif
98    
99  #include "diagnostics_SIZE.h"  #include "diagnostics_SIZE.h"
# Line 143  C*************************************** Line 147  C***************************************
147  #include "EEPARAMS.h"  #include "EEPARAMS.h"
148  #include "CPP_OPTIONS.h"  #include "CPP_OPTIONS.h"
149  #include "SIZE.h"  #include "SIZE.h"
 #include "fizhi_SIZE.h"  
150  #include "diagnostics_SIZE.h"  #include "diagnostics_SIZE.h"
151  #include "diagnostics.h"  #include "diagnostics.h"
152    
# Line 189  C*************************************** Line 192  C***************************************
192  #include "EEPARAMS.h"  #include "EEPARAMS.h"
193  #include "CPP_OPTIONS.h"  #include "CPP_OPTIONS.h"
194  #include "SIZE.h"  #include "SIZE.h"
 #include "fizhi_SIZE.h"  
195  #include "diagnostics_SIZE.h"  #include "diagnostics_SIZE.h"
196  #include "diagnostics.h"  #include "diagnostics.h"
197    
# Line 230  C*************************************** Line 232  C***************************************
232        implicit none        implicit none
233  #include "CPP_OPTIONS.h"  #include "CPP_OPTIONS.h"
234  #include "SIZE.h"  #include "SIZE.h"
 #include "fizhi_SIZE.h"  
235  #include "diagnostics_SIZE.h"  #include "diagnostics_SIZE.h"
236  #include "diagnostics.h"  #include "diagnostics.h"
237    
Legend:
Removed from v.1.4  
changed lines
  Added in v.1.9
  ViewVC Help
Powered by ViewVC 1.1.22