Commit b3e30be5 authored by Uwe Schulzweida's avatar Uwe Schulzweida
Browse files

zaxisCompare: set epsilon from 0 to 1e-9

parent 617208b1
2011-10-11 Uwe Schulzweida <Uwe.Schulzweida@zmaw.de>
* zaxisCompare: set epsilon from 0 to 1e-9 [request: Felicia Brisc]
2011-10-06 Uwe Schulzweida <Uwe.Schulzweida@zmaw.de>
* added level type ZAXIS_TOA, ZAXIS_SEA_BOTTOM, ZAXIS_ATMOSPHERE [request: Drte Liermann]
......
......@@ -701,11 +701,11 @@ int zaxisCompare(int zaxisID, int zaxistype, int nlevels, int lbounds, double *l
const double *dlevels;
char zlongname[256];
char zunits[256];
dlevels = zaxisInqLevelsPtr(zaxisID);
for ( levelID = 0; levelID < nlevels; levelID++ )
{
if ( fabs(dlevels[levelID] - levels[levelID]) > 0 )
if ( fabs(dlevels[levelID] - levels[levelID]) > 1.e-9 )
break;
}
......@@ -731,8 +731,8 @@ int zaxisCompare(int zaxisID, int zaxistype, int nlevels, int lbounds, double *l
}
int varDefZaxis(int vlistID, int zaxistype, int nlevels, double *levels, int lbounds,
double *levels1, double *levels2, int vctsize, double *vct, char *name,
int varDefZaxis(int vlistID, int zaxistype, int nlevels, double *levels, int lbounds,
double *levels1, double *levels2, int vctsize, double *vct, char *name,
char *longname, char *units, int prec, int mode, int ltype)
{
/*
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment