Commit 3572162f authored by Uwe Schulzweida's avatar Uwe Schulzweida
Browse files

removed unused-but-set-variable taxisID

parent f62701bf
......@@ -8,7 +8,7 @@ int nts = 3; // Number of time steps
int main(void)
{
int taxisID, vlistID1, vlistID2, varID1, varID2, streamID1, streamID2, tsID;
int vlistID1, vlistID2, varID1, varID2, streamID1, streamID2, tsID;
int nmiss;
double var1[nlon*nlat];
double var2[nlon*nlat*nlev];
......@@ -29,9 +29,6 @@ int main(void)
varID1 = 0;
varID2 = 1;
// Get the Time axis from the variable list
taxisID = vlistInqTaxis(vlistID1);
// Open the output dataset (GRIB format)
streamID2 = streamOpenWrite("example.grb", FILETYPE_GRB);
if ( streamID2 < 0 )
......
......@@ -10,7 +10,7 @@
PARAMETER (nlev = 5) ! Number of levels
PARAMETER (nts = 3) ! Number of time steps
INTEGER gridID, zaxisID1, zaxisID2, taxisID, tsID
INTEGER gridID, zaxisID1, zaxisID2, tsID
INTEGER vlistID1, vlistID2, varID1, varID2, streamID1, streamID2
INTEGER i, nmiss, status
REAL*8 var1(nlon*nlat), var2(nlon*nlat*nlev)
......@@ -29,9 +29,6 @@
varID1 = 0
varID2 = 1
! Get the Time axis from the variable list
taxisID = vlistInqTaxis(vlistID1)
! Open the output dataset (GRIB format)
streamID2 = streamOpenWrite("example.grb", FILETYPE_GRB)
IF ( streamID2 < 0 ) THEN
......
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