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

added number type to ext output

parent 768fba80
......@@ -220,6 +220,7 @@ int extDefRecord(int streamID)
header[3] = gridInqSize(gridID);
extp->prec = extDefDatatype(streamptr->record->prec);
extp->number = streamptr->record->number;
extDefHeader(extp, header);
......@@ -974,6 +975,7 @@ void extWriteVarDP(int streamID, int varID, const double *data)
header[3] = gridInqSize(gridID);
extp->prec = extDefDatatype(vlistInqVarDatatype(vlistID, varID));
extp->number = vlistInqVarNumber(vlistID, varID);
for ( levID = 0; levID < nlevs; levID++ )
{
......@@ -1022,6 +1024,7 @@ void extWriteVarSliceDP(int streamID, int varID, int levID, const double *data)
header[3] = gridInqSize(gridID);
extp->prec = extDefDatatype(vlistInqVarDatatype(vlistID, varID));
extp->number = vlistInqVarNumber(vlistID, varID);
extDefHeader(extp, header);
extDefDataDP(extp, data);
......
......@@ -120,6 +120,7 @@ typedef struct
int levelID;
int recid;
int prec;
int number;
int sec0[2];
int sec1[1024];
int sec2[4096];
......
......@@ -239,6 +239,7 @@ void streamDefRecord(int streamID, int varID, int levelID)
streamptr->record->gridID = gridID;
streamptr->record->zaxisID = zaxisID;
streamptr->record->prec = vlistInqVarDatatype(vlistID, varID);
streamptr->record->number = vlistInqVarNumber(vlistID, varID);
filetype = streamptr->filetype;
......
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