Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
mpim-sw
cdo
Commits
5f5b0228
Commit
5f5b0228
authored
Jan 18, 2011
by
Uwe Schulzweida
Browse files
removed check of result from streamOpenWrite
parent
6e70972f
Changes
146
Hide whitespace changes
Inline
Side-by-side
src/Duplicate.c
View file @
5f5b0228
...
...
@@ -76,7 +76,6 @@ void *Duplicate(void *argument)
}
streamID2
=
streamOpenWrite
(
cdoStreamName
(
1
),
cdoFiletype
());
if
(
streamID2
<
0
)
cdiError
(
streamID2
,
"Open failed on %s"
,
cdoStreamName
(
1
));
streamDefVlist
(
streamID2
,
vlistID2
);
...
...
src/EOFs.c
View file @
5f5b0228
...
...
@@ -143,7 +143,7 @@ void *EOFs(void * argument)
/* eigenvalues */
streamID2
=
streamOpenWrite
(
cdoStreamName
(
1
),
cdoFiletype
());
if
(
streamID2
<
0
)
cdiError
(
streamID2
,
"Open failed on %s"
,
cdoStreamName
(
1
));
vlistID2
=
vlistDuplicate
(
vlistID1
);
taxisID2
=
taxisDuplicate
(
taxisID1
);
taxisDefRdate
(
taxisID2
,
0
);
...
...
@@ -164,7 +164,7 @@ void *EOFs(void * argument)
/* eigenvectors */
streamID3
=
streamOpenWrite
(
cdoStreamName
(
2
),
cdoFiletype
());
if
(
streamID3
<
0
)
cdiError
(
streamID3
,
"Open failed on %s"
,
cdoStreamName
(
2
));
vlistID3
=
vlistDuplicate
(
vlistID1
);
taxisID3
=
taxisDuplicate
(
taxisID1
);
gridID3
=
gridDuplicate
(
gridID1
);
...
...
src/Echam5ini.c
View file @
5f5b0228
...
...
@@ -1490,7 +1490,6 @@ void *Echam5ini(void *argument)
cdoDefaultFileType
=
FILETYPE_NC
;
streamID2
=
streamOpenWrite
(
cdoStreamName
(
1
),
cdoFiletype
());
if
(
streamID2
<
0
)
cdiError
(
streamID2
,
"Open failed on %s"
,
cdoStreamName
(
1
));
streamDefVlist
(
streamID2
,
vlistID2
);
...
...
src/Enlarge.c
View file @
5f5b0228
...
...
@@ -25,7 +25,6 @@
#include "cdo.h"
#include "cdo_int.h"
#include "pstream.h"
#include "functs.h"
void
*
Enlarge
(
void
*
argument
)
...
...
@@ -72,7 +71,6 @@ void *Enlarge(void *argument)
}
streamID2
=
streamOpenWrite
(
cdoStreamName
(
1
),
cdoFiletype
());
if
(
streamID2
<
0
)
cdiError
(
streamID2
,
"Open failed on %s"
,
cdoStreamName
(
1
));
streamDefVlist
(
streamID2
,
vlistID2
);
...
...
src/Enlargegrid.c
View file @
5f5b0228
...
...
@@ -222,7 +222,6 @@ void *Enlargegrid(void *argument)
}
streamID2
=
streamOpenWrite
(
cdoStreamName
(
1
),
cdoFiletype
());
if
(
streamID2
<
0
)
cdiError
(
streamID2
,
"Open failed on %s"
,
cdoStreamName
(
1
));
vlistDefTaxis
(
vlistID2
,
taxisID2
);
streamDefVlist
(
streamID2
,
vlistID2
);
...
...
src/Ensstat.c
View file @
5f5b0228
...
...
@@ -159,7 +159,6 @@ void *Ensstat(void *argument)
vlistDefTaxis
(
vlistID2
,
taxisID2
);
streamID2
=
streamOpenWrite
(
ofilename
,
cdoFiletype
());
if
(
streamID2
<
0
)
cdiError
(
streamID2
,
"Open failed on %s"
,
ofilename
);
streamDefVlist
(
streamID2
,
vlistID2
);
...
...
src/Ensstat3.c
View file @
5f5b0228
...
...
@@ -213,7 +213,6 @@ void *Ensstat3(void *argument)
if
(
operfunc
!=
func_roc
)
{
streamID2
=
streamOpenWrite
(
ofilename
,
cdoFiletype
());
if
(
streamID2
<
0
)
cdiError
(
streamID2
,
"Open failed on %s"
,
ofilename
);
streamDefVlist
(
streamID2
,
vlistID2
);
}
...
...
src/Eof3d.c
View file @
5f5b0228
...
...
@@ -150,7 +150,7 @@ void *EOF3d(void * argument)
/* eigenvalues */
streamID2
=
streamOpenWrite
(
cdoStreamName
(
1
),
cdoFiletype
());
if
(
streamID2
<
0
)
cdiError
(
streamID2
,
"Open failed on %s"
,
cdoStreamName
(
1
));
taxisID2
=
taxisDuplicate
(
taxisID1
);
gridID2
=
gridCreate
(
GRID_LONLAT
,
1
);
...
...
@@ -184,7 +184,7 @@ void *EOF3d(void * argument)
/* eigenvectors */
streamID3
=
streamOpenWrite
(
cdoStreamName
(
2
),
cdoFiletype
());
if
(
streamID3
<
0
)
cdiError
(
streamID3
,
"Open failed on %s"
,
cdoStreamName
(
2
));
vlistID3
=
vlistDuplicate
(
vlistID1
);
taxisID3
=
taxisDuplicate
(
taxisID1
);
gridID3
=
gridDuplicate
(
gridID1
);
...
...
src/Eofcoeff.c
View file @
5f5b0228
...
...
@@ -174,9 +174,7 @@ void *Eofcoeff(void * argument)
strcat
(
oname
,
filesuffix
);
streamIDs
[
eofID
]
=
streamOpenWrite
(
oname
,
cdoFiletype
());
if
(
streamIDs
[
eofID
]
<
0
)
cdiError
(
streamIDs
[
eofID
],
"Open failed on %s"
,
oname
);
else
if
(
cdoVerbose
)
if
(
cdoVerbose
)
cdoPrint
(
"opened %s ('w') as stream%i for %i. eof"
,
oname
,
streamIDs
[
eofID
],
eofID
+
1
);
streamDefVlist
(
streamIDs
[
eofID
],
vlistID3
);
...
...
src/Eofcoeff3d.c
View file @
5f5b0228
...
...
@@ -183,9 +183,7 @@ void *Eofcoeff3d(void * argument)
strcat
(
oname
,
filesuffix
);
streamIDs
[
eofID
]
=
streamOpenWrite
(
oname
,
cdoFiletype
());
if
(
streamIDs
[
eofID
]
<
0
)
cdiError
(
streamIDs
[
eofID
],
"Open failed on %s"
,
oname
);
else
if
(
cdoVerbose
)
if
(
cdoVerbose
)
cdoPrint
(
"opened %s ('w') as stream%i for %i. eof"
,
oname
,
streamIDs
[
eofID
],
eofID
+
1
);
streamDefVlist
(
streamIDs
[
eofID
],
vlistID3
);
...
...
src/Exprf.c
View file @
5f5b0228
...
...
@@ -161,7 +161,6 @@ void *Expr(void *argument)
vlistDefTaxis
(
vlistID2
,
taxisID2
);
streamID2
=
streamOpenWrite
(
cdoStreamName
(
1
),
cdoFiletype
());
if
(
streamID2
<
0
)
cdiError
(
streamID2
,
"Open failed on %s"
,
cdoStreamName
(
1
));
streamDefVlist
(
streamID2
,
vlistID2
);
...
...
src/Fillmiss.c
View file @
5f5b0228
...
...
@@ -187,7 +187,6 @@ void *Fillmiss(void *argument)
}
streamID2
=
streamOpenWrite
(
cdoStreamName
(
1
),
cdoFiletype
());
if
(
streamID2
<
0
)
cdiError
(
streamID2
,
"Open failed on %s"
,
cdoStreamName
(
1
));
streamDefVlist
(
streamID2
,
vlistID2
);
...
...
src/Filter.c
View file @
5f5b0228
...
...
@@ -195,7 +195,6 @@ void *Filter(void *argument)
dpy
=
calendar_dpy
(
calendar
);
/* should be 365 !!! */
streamID2
=
streamOpenWrite
(
cdoStreamName
(
1
),
cdoFiletype
());
if
(
streamID2
<
0
)
cdiError
(
streamID2
,
"Open failed on %s"
,
cdoStreamName
(
1
));
streamDefVlist
(
streamID2
,
vlistID2
);
...
...
src/Fldrms.c
View file @
5f5b0228
...
...
@@ -25,7 +25,6 @@
#include "cdo.h"
#include "cdo_int.h"
#include "pstream.h"
#include "functs.h"
void
*
Fldrms
(
void
*
argument
)
...
...
@@ -93,7 +92,6 @@ void *Fldrms(void *argument)
if
(
ndiffgrids
>
0
)
cdoAbort
(
"Too many different grids!"
);
streamID3
=
streamOpenWrite
(
cdoStreamName
(
2
),
cdoFiletype
());
if
(
streamID3
<
0
)
cdiError
(
streamID3
,
"Open failed on %s"
,
cdoStreamName
(
2
));
streamDefVlist
(
streamID3
,
vlistID3
);
...
...
src/Fldstat.c
View file @
5f5b0228
...
...
@@ -33,7 +33,6 @@
#include "cdo.h"
#include "cdo_int.h"
#include "pstream.h"
#include "functs.h"
void
*
Fldstat
(
void
*
argument
)
...
...
@@ -115,7 +114,6 @@ void *Fldstat(void *argument)
vlistChangeGridIndex
(
vlistID2
,
index
,
gridID2
);
streamID2
=
streamOpenWrite
(
cdoStreamName
(
1
),
cdoFiletype
());
if
(
streamID2
<
0
)
cdiError
(
streamID2
,
"Open failed on %s"
,
cdoStreamName
(
1
));
streamDefVlist
(
streamID2
,
vlistID2
);
...
...
src/Fldstat2.c
View file @
5f5b0228
...
...
@@ -26,7 +26,6 @@
#include "cdo.h"
#include "cdo_int.h"
#include "pstream.h"
#include "functs.h"
/* routine corr copied from PINGO */
...
...
@@ -126,7 +125,6 @@ void *Fldstat2(void *argument)
vlistChangeGridIndex
(
vlistID3
,
index
,
gridID3
);
streamID3
=
streamOpenWrite
(
cdoStreamName
(
2
),
cdoFiletype
());
if
(
streamID3
<
0
)
cdiError
(
streamID3
,
"Open failed on %s"
,
cdoStreamName
(
2
));
streamDefVlist
(
streamID3
,
vlistID3
);
...
...
src/Fourier.c
View file @
5f5b0228
...
...
@@ -72,7 +72,6 @@ void *Fourier(void *argument)
vlistDefTaxis
(
vlistID2
,
taxisID2
);
streamID2
=
streamOpenWrite
(
cdoStreamName
(
1
),
cdoFiletype
());
if
(
streamID2
<
0
)
cdiError
(
streamID2
,
"Open failed on %s"
,
cdoStreamName
(
1
));
streamDefVlist
(
streamID2
,
vlistID2
);
...
...
src/Gather.c
View file @
5f5b0228
...
...
@@ -323,7 +323,6 @@ void *Gather(void *argument)
}
streamID2
=
streamOpenWrite
(
ofilename
,
cdoFiletype
());
if
(
streamID2
<
0
)
cdiError
(
streamID2
,
"Open failed on %s"
,
ofilename
);
streamDefVlist
(
streamID2
,
vlistID2
);
...
...
src/Gengrid.c
View file @
5f5b0228
...
...
@@ -25,7 +25,6 @@
#include "cdo.h"
#include "cdo_int.h"
#include "pstream.h"
#include "functs.h"
void
*
Gengrid
(
void
*
argument
)
...
...
@@ -143,7 +142,6 @@ void *Gengrid(void *argument)
vlistDefTaxis
(
vlistID3
,
taxisID3
);
streamID3
=
streamOpenWrite
(
cdoStreamName
(
2
),
cdoFiletype
());
if
(
streamID3
<
0
)
cdiError
(
streamID3
,
"Open failed on %s"
,
cdoStreamName
(
2
));
streamDefVlist
(
streamID3
,
vlistID3
);
...
...
src/Gridboxstat.c
View file @
5f5b0228
...
...
@@ -35,7 +35,6 @@
#include "cdo.h"
#include "cdo_int.h"
#include "pstream.h"
#include "functs.h"
#include "grid.h"
...
...
@@ -676,7 +675,6 @@ void *Gridboxstat(void *argument)
vlistChangeGridIndex
(
vlistID2
,
index
,
gridID2
);
streamID2
=
streamOpenWrite
(
cdoStreamName
(
1
),
cdoFiletype
());
if
(
streamID2
<
0
)
cdiError
(
streamID2
,
"Open failed on %s"
,
cdoStreamName
(
1
));
streamDefVlist
(
streamID2
,
vlistID2
);
...
...
Prev
1
2
3
4
5
6
…
8
Next
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment