Skip to content
Snippets Groups Projects
Commit 1be3fa66 authored by Thomas Jahns's avatar Thomas Jahns :cartwheel:
Browse files

Comment unused code and fix conversions in test.

parent c73c4f94
No related branches found
No related tags found
No related merge requests found
......@@ -13,29 +13,27 @@ int main(int argc, char *argv[])
{
char fname[] = "test.grb";
int filetype = FILETYPE_GRB;
int nlat = 18, nlon = 2*nlat;
enum {
nlat = 18,
nlon = 2*nlat,
};
double *data = NULL;
double missval;
int nlevel;
int varID;
int datasize = 0;
int streamID1, streamID2;
int gridID, zaxisID, code, vdate, vtime;
int gridID, zaxisID;
int nrecs, nvars;
int gridtype, gridsize = 0;
int tsID;
int timeID = 0;
int level, levelID;
int offset;
int levelID;
int vlistID, taxisID;
int nmiss;
datasize = nlon * nlat;
data = (double *)xmalloc(datasize*sizeof(double));
memset(data, 0, datasize*sizeof(double));
size_t datasize = (size_t)nlon * (size_t)nlat;
data = (double *)xmalloc(datasize * sizeof (double));
memset(data, 0, datasize * sizeof (double));
gridID = gridCreate(GRID_GAUSSIAN, datasize);
gridID = gridCreate(GRID_GAUSSIAN, (int)datasize);
gridDefXsize(gridID, nlon);
gridDefYsize(gridID, nlat);
......@@ -81,10 +79,10 @@ int main(int argc, char *argv[])
for ( varID = 0; varID < nvars; varID++ )
{
gridID = vlistInqVarGrid(vlistID, varID);
zaxisID = vlistInqVarZaxis(vlistID, varID);
gridsize = gridInqSize(gridID);
nlevel = zaxisInqSize(zaxisID);
int gridID = vlistInqVarGrid(vlistID, varID);
int zaxisID = vlistInqVarZaxis(vlistID, varID);
size_t gridsize = (size_t)gridInqSize(gridID);
size_t nlevel = (size_t)zaxisInqSize(zaxisID);
if ( gridsize*nlevel > datasize ) datasize = gridsize*nlevel;
}
......@@ -96,8 +94,8 @@ int main(int argc, char *argv[])
tsID = 0;
while ( (nrecs = streamInqTimestep(streamID1, tsID)) )
{
vdate = taxisInqVdate(taxisID);
vtime = taxisInqVtime(taxisID);
/* int vdate = */taxisInqVdate(taxisID);
/* int vtime = */taxisInqVtime(taxisID);
streamDefTimestep(streamID2, tsID);
......@@ -105,18 +103,18 @@ int main(int argc, char *argv[])
{
streamReadVar(streamID1, varID, data, &nmiss);
code = vlistInqVarCode(vlistID, varID);
/* int code = */vlistInqVarCode(vlistID, varID);
gridID = vlistInqVarGrid(vlistID, varID);
zaxisID = vlistInqVarZaxis(vlistID, varID);
gridtype = gridInqType(gridID);
gridsize = gridInqSize(gridID);
/* int gridtype = */gridInqType(gridID);
/* int gridsize = */gridInqSize(gridID);
nlevel = zaxisInqSize(zaxisID);
missval = vlistInqVarMissval(vlistID, varID);
/* double missval = */vlistInqVarMissval(vlistID, varID);
for ( levelID = 0; levelID < nlevel; levelID++ )
{
level = (int) zaxisInqLevel(zaxisID, levelID);
offset = gridsize*levelID;
/* int level = (int) */ zaxisInqLevel(zaxisID, levelID);
/* int offset = gridsize*levelID; */
}
streamWriteVar(streamID2, varID, data, nmiss);
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment