1 |
|
C $Header$ |
2 |
|
C $Name$ |
3 |
|
|
4 |
subroutine getdiag (myThid,lev,ipoint,undef,qtmp) |
subroutine getdiag (myThid,lev,ipoint,undef,qtmp) |
5 |
C*********************************************************************** |
C*********************************************************************** |
6 |
C PURPOSE |
C PURPOSE |
18 |
C*********************************************************************** |
C*********************************************************************** |
19 |
implicit none |
implicit none |
20 |
|
|
21 |
|
#include "PACKAGES_CONFIG.h" |
22 |
#include "EEPARAMS.h" |
#include "EEPARAMS.h" |
23 |
#include "CPP_OPTIONS.h" |
#include "CPP_OPTIONS.h" |
24 |
#include "SIZE.h" |
#include "SIZE.h" |
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" |
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" |
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 |
|
|
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 |
|
|
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 |
|
|