Commit 338595c4 authored by Uwe Schulzweida's avatar Uwe Schulzweida
Browse files

pstreamDefVlist: unpack netCDF data if datatype = FLT64

parent 611089d4
......@@ -3,6 +3,7 @@
* using CDI library version 1.0.2
* Seltime: print warning message if parameter not found
* pstreamDefVlist: unpack netCDF data if datatype = FLT64
* Version 1.0.2 released
2006-08-01 Uwe Schulzweida <Uwe.Schulzweida@zmaw.de>
......@@ -23,8 +24,8 @@
* gradsdes: fix bug for only one record without time [report: Angelika Heil]
* gradsdes: fix problem for variable names with - character
* namelist update
* New module: Setbox [Etienne Tourigny)
* history format changed to nco [Etienne Tourigny)
* New module: Setbox [Etienne Tourigny]
* history format changed to nco [Etienne Tourigny]
* process: set MAX_ARGS from 1024 to 8192
* Version 1.0.1 released
......
......@@ -789,8 +789,18 @@ void pstreamDefVlist(int pstreamID, int vlistID)
if ( cdoDefaultDataType != CDI_UNDEFID )
{
int varID, nvars = vlistNvars(vlistID);
for ( varID = 0; varID < nvars; varID++ )
vlistDefVarDatatype(vlistID, varID, cdoDefaultDataType);
if ( cdoDefaultDataType == DATATYPE_FLT64 )
{
for ( varID = 0; varID < nvars; varID++ )
{
vlistDefVarAddoffset(vlistID, varID, 0.0);
vlistDefVarScalefactor(vlistID, varID, 1.0);
}
}
}
vlistDefAttribute(vlistID, "CDO", cdoComment());
if ( cdoTimer ) timer_start(timer_write);
......
Supports Markdown
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