--- MITgcm/pkg/diagnostics/diagnostics_utils.F 2004/02/26 22:20:36 1.5 +++ MITgcm/pkg/diagnostics/diagnostics_utils.F 2004/05/05 00:39:21 1.8 @@ -1,3 +1,6 @@ +C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/pkg/diagnostics/diagnostics_utils.F,v 1.8 2004/05/05 00:39:21 edhill Exp $ +C $Name: $ + subroutine getdiag (myThid,lev,ipoint,undef,qtmp) C*********************************************************************** C PURPOSE @@ -15,6 +18,7 @@ C*********************************************************************** implicit none +#include "PACKAGES_CONFIG.h" #include "EEPARAMS.h" #include "CPP_OPTIONS.h" #include "SIZE.h" @@ -23,7 +27,7 @@ #include "fizhi_SIZE.h" #else integer Nrphys - parameter (Nrphys=1) + parameter (Nrphys=0) #endif #include "diagnostics_SIZE.h" @@ -89,7 +93,7 @@ #include "fizhi_SIZE.h" #else integer Nrphys - parameter (Nrphys=1) + parameter (Nrphys=0) #endif #include "diagnostics_SIZE.h" @@ -143,14 +147,6 @@ #include "EEPARAMS.h" #include "CPP_OPTIONS.h" #include "SIZE.h" - -#ifdef ALLOW_FIZHI -#include "fizhi_SIZE.h" -#else - integer Nrphys - parameter (Nrphys=1) -#endif - #include "diagnostics_SIZE.h" #include "diagnostics.h" @@ -196,14 +192,6 @@ #include "EEPARAMS.h" #include "CPP_OPTIONS.h" #include "SIZE.h" - -#ifdef ALLOW_FIZHI -#include "fizhi_SIZE.h" -#else - integer Nrphys - parameter (Nrphys=1) -#endif - #include "diagnostics_SIZE.h" #include "diagnostics.h" @@ -244,14 +232,6 @@ implicit none #include "CPP_OPTIONS.h" #include "SIZE.h" - -#ifdef ALLOW_FIZHI -#include "fizhi_SIZE.h" -#else - integer Nrphys - parameter (Nrphys=1) -#endif - #include "diagnostics_SIZE.h" #include "diagnostics.h"