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
f6fccdec
Commit
f6fccdec
authored
Oct 09, 2017
by
Uwe Schulzweida
Browse files
Merge branch 'test' into develop
parents
541a1d7f
a9ea605e
Changes
206
Hide whitespace changes
Inline
Side-by-side
src/Importobs.cc
View file @
f6fccdec
...
...
@@ -66,7 +66,7 @@ void write_data(int streamID, int vlistID, int nvars, double *data[])
pstreamDefRecord
(
streamID
,
varID
,
0
);
in
t
nmiss
=
0
;
size_
t
nmiss
=
0
;
for
(
int
i
=
0
;
i
<
gridsize
;
++
i
)
if
(
DBL_IS_EQUAL
(
data
[
varID
][
i
],
missval
)
)
nmiss
++
;
...
...
src/Info.cc
View file @
f6fccdec
...
...
@@ -241,7 +241,7 @@ void printMap(int nlon, int nlat, double *array, double missval, double min, dou
typedef
struct
{
double
min
,
max
,
sum
,
sumi
;
long
nvals
,
nmiss
,
nlevs
;
size_t
nvals
,
nmiss
,
nlevs
;
}
infostat_type
;
static
...
...
@@ -263,8 +263,8 @@ void *Info(void *argument)
int
fpeRaised
=
0
;
int
varID
,
levelID
;
int
nrecs
;
in
t
nmiss
;
long
imiss
=
0
;
size_
t
nmiss
;
size_t
imiss
=
0
;
char
varname
[
CDI_MAX_NAME
];
char
paramstr
[
32
];
char
vdatestr
[
32
],
vtimestr
[
32
];
...
...
@@ -351,7 +351,7 @@ void *Info(void *argument)
int
zaxisID
=
vlistInqVarZaxis
(
vlistID
,
varID
);
int
number
=
vlistInqVarNumber
(
vlistID
,
varID
);
long
gridsize
=
gridInqSize
(
gridID
);
long
nlevs
=
zaxisInqSize
(
zaxisID
);
size_t
nlevs
=
zaxisInqSize
(
zaxisID
);
double
level
=
cdoZaxisInqLevel
(
zaxisID
,
levelID
);
double
missval
=
vlistInqVarMissval
(
vlistID
,
varID
);
...
...
@@ -383,11 +383,11 @@ void *Info(void *argument)
set_text_color
(
stdout
,
RESET
,
GREEN
);
if
(
operatorID
==
XINFON
)
fprintf
(
stdout
,
"%7
ld
"
,
nlevs
);
fprintf
(
stdout
,
"%7
zu
"
,
nlevs
);
else
fprintf
(
stdout
,
"%7g "
,
level
);
fprintf
(
stdout
,
"%8ld %7
ld
"
,
gridsize
,
infostatp
->
nmiss
);
fprintf
(
stdout
,
"%8ld %7
zu
"
,
gridsize
,
infostatp
->
nmiss
);
set_text_color
(
stdout
,
RESET
,
BLACK
);
fprintf
(
stdout
,
":"
);
...
...
@@ -402,7 +402,7 @@ void *Info(void *argument)
if
(
infostatp
->
nmiss
>
0
)
{
long
nvals
=
0
;
size_t
nvals
=
0
;
for
(
long
i
=
0
;
i
<
gridsize
;
++
i
)
{
if
(
!
DBL_IS_EQUAL
(
array
[
i
],
missval
)
)
...
...
@@ -452,7 +452,7 @@ void *Info(void *argument)
}
else
{
long
nvals
=
0
;
size_t
nvals
=
0
;
for
(
long
i
=
0
;
i
<
gridsize
;
i
++
)
{
if
(
!
DBL_IS_EQUAL
(
array
[
i
*
2
],
missval
)
&&
...
...
@@ -505,7 +505,7 @@ void *Info(void *argument)
}
if
(
imiss
!=
nmiss
&&
nmiss
>
0
)
cdoPrint
(
"Found %
d
of %
d
missing values!"
,
imiss
,
nmiss
);
cdoPrint
(
"Found %
zu
of %
zu
missing values!"
,
imiss
,
nmiss
);
if
(
fpeRaised
>
0
)
cdoWarning
(
"floating-point exception reported: %s!"
,
fpe_errstr
(
fpeRaised
));
...
...
src/Input.cc
View file @
f6fccdec
...
...
@@ -245,7 +245,7 @@ void *Input(void *argument)
pstreamDefRecord
(
streamID
,
varID
,
levelID
);
int
offset
=
gridsize
*
levelID
;
in
t
nmiss
=
0
;
size_
t
nmiss
=
0
;
for
(
i
=
0
;
i
<
gridsize
;
++
i
)
if
(
DBL_IS_EQUAL
(
array
[
offset
+
i
],
missval
)
)
nmiss
++
;
...
...
src/Intgrid.cc
View file @
f6fccdec
...
...
@@ -224,7 +224,7 @@ void boxavg(field_type *field1, field_type *field2, int xinc, int yinc)
xfield2
[
ilat
][
ilon
]
/=
in
;
}
in
t
nmiss
=
0
;
size_
t
nmiss
=
0
;
for
(
int
i
=
0
;
i
<
nlat2
*
nlon2
;
i
++
)
if
(
DBL_IS_EQUAL
(
array2
[
i
],
missval
)
)
nmiss
++
;
...
...
@@ -271,7 +271,7 @@ void thinout(field_type *field1, field_type *field2, int xinc, int yinc)
olat
++
;
}
in
t
nmiss
=
0
;
size_
t
nmiss
=
0
;
for
(
int
i
=
0
;
i
<
nlat2
*
nlon2
;
i
++
)
if
(
DBL_IS_EQUAL
(
array2
[
i
],
missval
)
)
nmiss
++
;
...
...
@@ -288,7 +288,7 @@ void *Intgrid(void *argument)
int
nrecs
;
int
varID
,
levelID
;
int
gridID1
=
-
1
,
gridID2
=
-
1
;
in
t
nmiss
;
size_
t
nmiss
;
int
xinc
=
0
,
yinc
=
0
;
double
missval
;
...
...
src/Intgridtraj.cc
View file @
f6fccdec
...
...
@@ -55,7 +55,7 @@ void *Intgridtraj(void *argument)
int
gridID1
;
int
varID
,
levelID
;
int
vdate
,
vtime
;
in
t
nmiss
;
size_
t
nmiss
;
double
point
;
double
xpos
,
ypos
;
int
calendar
=
CALENDAR_STANDARD
;
...
...
src/Intlevel.cc
View file @
f6fccdec
...
...
@@ -159,7 +159,7 @@ void *Intlevel(void *argument)
int
nrecs
;
int
i
,
offset
;
int
varID
,
levelID
;
in
t
nmiss
;
size_
t
nmiss
;
int
zaxisID1
=
-
1
;
int
gridID
,
zaxisID
;
int
nlevel
=
0
;
...
...
@@ -290,7 +290,7 @@ void *Intlevel(void *argument)
bool
*
vars
=
(
bool
*
)
Malloc
(
nvars
*
sizeof
(
bool
));
bool
*
varinterp
=
(
bool
*
)
Malloc
(
nvars
*
sizeof
(
bool
));
in
t
**
varnmiss
=
(
in
t
**
)
Malloc
(
nvars
*
sizeof
(
in
t
*
));
size_
t
**
varnmiss
=
(
size_
t
**
)
Malloc
(
nvars
*
sizeof
(
size_
t
*
));
double
**
vardata1
=
(
double
**
)
Malloc
(
nvars
*
sizeof
(
double
*
));
double
**
vardata2
=
(
double
**
)
Malloc
(
nvars
*
sizeof
(
double
*
));
...
...
@@ -309,14 +309,14 @@ void *Intlevel(void *argument)
{
varinterp
[
varID
]
=
true
;
vardata2
[
varID
]
=
(
double
*
)
Malloc
(
gridsize
*
nlev2
*
sizeof
(
double
));
varnmiss
[
varID
]
=
(
in
t
*
)
Malloc
(
maxlev
*
sizeof
(
in
t
));
memset
(
varnmiss
[
varID
],
0
,
maxlev
*
sizeof
(
in
t
));
varnmiss
[
varID
]
=
(
size_
t
*
)
Malloc
(
maxlev
*
sizeof
(
size_
t
));
memset
(
varnmiss
[
varID
],
0
,
maxlev
*
sizeof
(
size_
t
));
}
else
{
varinterp
[
varID
]
=
false
;
vardata2
[
varID
]
=
vardata1
[
varID
];
varnmiss
[
varID
]
=
(
in
t
*
)
Malloc
(
nlevel
*
sizeof
(
in
t
));
varnmiss
[
varID
]
=
(
size_
t
*
)
Malloc
(
nlevel
*
sizeof
(
size_
t
));
}
}
...
...
src/Intlevel3d.cc
View file @
f6fccdec
...
...
@@ -40,7 +40,7 @@ void *Intlevel3d(void *argument)
int
tsID
,
varID
,
levelID
;
int
nvars
,
nvct
;
int
nzaxis
;
in
t
nmiss
;
size_
t
nmiss
;
int
nlonIn
,
nlatIn
,
nlonOut
,
nlatOut
;
//double *lonIn, *latIn, *lonOut, *latOut;
...
...
@@ -53,7 +53,7 @@ void *Intlevel3d(void *argument)
double
*
single1
,
*
single2
;
int
taxisID1
,
taxisID3
;
double
*
zlevels_in
,
*
zlevels_out
;
in
t
zlevels_in_miss
,
zlevels_out_miss
;
size_
t
zlevels_in_miss
,
zlevels_out_miss
;
char
varname
[
10
];
cdoInitialize
(
argument
);
...
...
@@ -319,7 +319,7 @@ void *Intlevel3d(void *argument)
nvars
=
vlistNvars
(
vlistID1
);
bool
*
vars
=
(
bool
*
)
Malloc
(
nvars
*
sizeof
(
bool
));
bool
*
varinterp
=
(
bool
*
)
Malloc
(
nvars
*
sizeof
(
bool
));
/* marker for variables to be interpolated */
in
t
**
varnmiss
=
(
in
t
**
)
Malloc
(
nvars
*
sizeof
(
in
t
*
));
/* can for missing values of arbitrary variables */
size_
t
**
varnmiss
=
(
size_
t
**
)
Malloc
(
nvars
*
sizeof
(
size_
t
*
));
/* can for missing values of arbitrary variables */
double
**
vardata1
=
(
double
**
)
Malloc
(
nvars
*
sizeof
(
double
*
));
/* input */
double
**
vardata2
=
(
double
**
)
Malloc
(
nvars
*
sizeof
(
double
*
));
/* output */
...
...
@@ -359,22 +359,22 @@ void *Intlevel3d(void *argument)
{
varinterp
[
varID
]
=
false
;
vardata2
[
varID
]
=
vardata1
[
varID
];
varnmiss
[
varID
]
=
(
in
t
*
)
Malloc
(
nlevel
*
sizeof
(
in
t
));
varnmiss
[
varID
]
=
(
size_
t
*
)
Malloc
(
nlevel
*
sizeof
(
size_
t
));
if
(
cdoVerbose
)
cdoPrint
(
"Ignore variable %s with %d levels"
,
varname
,
nlevel
);
}
else
{
varinterp
[
varID
]
=
true
;
vardata2
[
varID
]
=
(
double
*
)
Malloc
(
gridsize
*
nlevo
*
sizeof
(
double
));
varnmiss
[
varID
]
=
(
in
t
*
)
Malloc
(
maxlev
*
sizeof
(
in
t
));
memset
(
varnmiss
[
varID
],
0
,
maxlev
*
sizeof
(
in
t
));
varnmiss
[
varID
]
=
(
size_
t
*
)
Malloc
(
maxlev
*
sizeof
(
size_
t
));
memset
(
varnmiss
[
varID
],
0
,
maxlev
*
sizeof
(
size_
t
));
}
}
else
{
varinterp
[
varID
]
=
false
;
vardata2
[
varID
]
=
vardata1
[
varID
];
varnmiss
[
varID
]
=
(
in
t
*
)
Malloc
(
nlevel
*
sizeof
(
in
t
));
varnmiss
[
varID
]
=
(
size_
t
*
)
Malloc
(
nlevel
*
sizeof
(
size_
t
));
if
(
cdoVerbose
)
cdoPrint
(
"Ignore variable %s with %d levels"
,
varname
,
nlevel
);
}
}
...
...
src/Intntime.cc
View file @
f6fccdec
...
...
@@ -60,8 +60,8 @@ void *Intntime(void *argument)
int
gridsize
=
vlistGridsizeMax
(
vlistID1
);
double
*
array
=
(
double
*
)
Malloc
(
gridsize
*
sizeof
(
double
));
in
t
**
nmiss1
=
(
in
t
**
)
Malloc
(
nvars
*
sizeof
(
in
t
*
));
in
t
**
nmiss2
=
(
in
t
**
)
Malloc
(
nvars
*
sizeof
(
in
t
*
));
size_
t
**
nmiss1
=
(
size_
t
**
)
Malloc
(
nvars
*
sizeof
(
size_
t
*
));
size_
t
**
nmiss2
=
(
size_
t
**
)
Malloc
(
nvars
*
sizeof
(
size_
t
*
));
double
**
vardata1
=
(
double
**
)
Malloc
(
nvars
*
sizeof
(
double
*
));
double
**
vardata2
=
(
double
**
)
Malloc
(
nvars
*
sizeof
(
double
*
));
...
...
@@ -69,8 +69,8 @@ void *Intntime(void *argument)
{
gridsize
=
gridInqSize
(
vlistInqVarGrid
(
vlistID1
,
varID
));
nlevel
=
zaxisInqSize
(
vlistInqVarZaxis
(
vlistID1
,
varID
));
nmiss1
[
varID
]
=
(
in
t
*
)
Malloc
(
nlevel
*
sizeof
(
in
t
));
nmiss2
[
varID
]
=
(
in
t
*
)
Malloc
(
nlevel
*
sizeof
(
in
t
));
nmiss1
[
varID
]
=
(
size_
t
*
)
Malloc
(
nlevel
*
sizeof
(
size_
t
));
nmiss2
[
varID
]
=
(
size_
t
*
)
Malloc
(
nlevel
*
sizeof
(
size_
t
));
vardata1
[
varID
]
=
(
double
*
)
Malloc
(
gridsize
*
nlevel
*
sizeof
(
double
));
vardata2
[
varID
]
=
(
double
*
)
Malloc
(
gridsize
*
nlevel
*
sizeof
(
double
));
}
...
...
@@ -164,7 +164,7 @@ void *Intntime(void *argument)
single1
=
vardata1
[
varID
]
+
offset
;
single2
=
vardata2
[
varID
]
+
offset
;
in
t
nmiss3
=
0
;
size_
t
nmiss3
=
0
;
if
(
nmiss1
[
varID
][
levelID
]
>
0
||
nmiss2
[
varID
][
levelID
]
>
0
)
{
...
...
src/Inttime.cc
View file @
f6fccdec
...
...
@@ -105,8 +105,8 @@ void *Inttime(void *argument)
int
gridsize
=
vlistGridsizeMax
(
vlistID1
);
double
*
array
=
(
double
*
)
Malloc
(
gridsize
*
sizeof
(
double
));
in
t
**
nmiss1
=
(
in
t
**
)
Malloc
(
nvars
*
sizeof
(
in
t
*
));
in
t
**
nmiss2
=
(
in
t
**
)
Malloc
(
nvars
*
sizeof
(
in
t
*
));
size_
t
**
nmiss1
=
(
size_
t
**
)
Malloc
(
nvars
*
sizeof
(
size_
t
*
));
size_
t
**
nmiss2
=
(
size_
t
**
)
Malloc
(
nvars
*
sizeof
(
size_
t
*
));
double
**
vardata1
=
(
double
**
)
Malloc
(
nvars
*
sizeof
(
double
*
));
double
**
vardata2
=
(
double
**
)
Malloc
(
nvars
*
sizeof
(
double
*
));
...
...
@@ -114,8 +114,8 @@ void *Inttime(void *argument)
{
gridsize
=
gridInqSize
(
vlistInqVarGrid
(
vlistID1
,
varID
));
nlevel
=
zaxisInqSize
(
vlistInqVarZaxis
(
vlistID1
,
varID
));
nmiss1
[
varID
]
=
(
in
t
*
)
Malloc
(
nlevel
*
sizeof
(
in
t
));
nmiss2
[
varID
]
=
(
in
t
*
)
Malloc
(
nlevel
*
sizeof
(
in
t
));
nmiss1
[
varID
]
=
(
size_
t
*
)
Malloc
(
nlevel
*
sizeof
(
size_
t
));
nmiss2
[
varID
]
=
(
size_
t
*
)
Malloc
(
nlevel
*
sizeof
(
size_
t
));
vardata1
[
varID
]
=
(
double
*
)
Malloc
(
gridsize
*
nlevel
*
sizeof
(
double
));
vardata2
[
varID
]
=
(
double
*
)
Malloc
(
gridsize
*
nlevel
*
sizeof
(
double
));
}
...
...
@@ -227,7 +227,7 @@ void *Inttime(void *argument)
single1
=
vardata1
[
varID
]
+
offset
;
single2
=
vardata2
[
varID
]
+
offset
;
in
t
nmiss3
=
0
;
size_
t
nmiss3
=
0
;
if
(
nmiss1
[
varID
][
levelID
]
>
0
||
nmiss2
[
varID
][
levelID
]
>
0
)
{
...
...
src/Intyear.cc
View file @
f6fccdec
...
...
@@ -34,7 +34,7 @@ void *Intyear(void *argument)
{
int
nrecs
;
int
varID
,
levelID
;
in
t
nmiss1
,
nmiss2
,
nmiss3
;
size_
t
nmiss1
,
nmiss2
,
nmiss3
;
char
filesuffix
[
32
];
char
filename
[
8192
];
...
...
src/Invert.cc
View file @
f6fccdec
...
...
@@ -283,7 +283,7 @@ void *Invert(void *argument)
int
nrecs
;
int
varID
,
levelID
;
int
gridID1
;
in
t
nmiss
;
size_
t
nmiss
;
cdoInitialize
(
argument
);
...
...
src/Invertlev.cc
View file @
f6fccdec
...
...
@@ -93,7 +93,7 @@ void *Invertlev(void *argument)
{
int
nrecs
;
int
varID
,
levelID
;
in
t
nmiss
;
size_
t
nmiss
;
int
nlev
,
nlevel
;
int
gridID
,
zaxisID
,
offset
;
bool
linvert
=
false
;
...
...
@@ -129,7 +129,7 @@ void *Invertlev(void *argument)
int
nvars
=
vlistNvars
(
vlistID1
);
double
**
vardata
=
(
double
**
)
Malloc
(
nvars
*
sizeof
(
double
*
));
in
t
**
varnmiss
=
(
in
t
**
)
Malloc
(
nvars
*
sizeof
(
in
t
*
));
size_
t
**
varnmiss
=
(
size_
t
**
)
Malloc
(
nvars
*
sizeof
(
size_
t
*
));
for
(
varID
=
0
;
varID
<
nvars
;
varID
++
)
{
...
...
@@ -147,7 +147,7 @@ void *Invertlev(void *argument)
{
linvert
=
true
;
vardata
[
varID
]
=
(
double
*
)
Malloc
(
gridsize
*
nlev
*
sizeof
(
double
));
varnmiss
[
varID
]
=
(
in
t
*
)
Malloc
(
nlev
*
sizeof
(
in
t
));
varnmiss
[
varID
]
=
(
size_
t
*
)
Malloc
(
nlev
*
sizeof
(
size_
t
));
}
}
...
...
src/Isosurface.cc
View file @
f6fccdec
...
...
@@ -81,7 +81,7 @@ void *Isosurface(void *argument)
int
gridID
;
int
i
,
offset
;
int
varID
,
levelID
;
in
t
nmiss
;
size_
t
nmiss
;
int
zaxisID
,
zaxisID1
=
-
1
;
double
missval
;
double
*
single
;
...
...
src/Maggraph.cc
View file @
f6fccdec
...
...
@@ -882,7 +882,7 @@ void *Maggraph(void *argument)
int
gridID
;
int
nrecs
;
int
vlistID0
=
-
1
;
in
t
nmiss
;
size_
t
nmiss
;
long
nts_alloc
;
int
nparam
=
operatorArgc
();
...
...
src/Magplot.cc
View file @
f6fccdec
...
...
@@ -1102,7 +1102,7 @@ void *Magplot(void *argument)
#if defined(HAVE_LIBMAGICS)
int
nrecs
;
int
levelID
;
in
t
nmiss
;
size_
t
nmiss
;
char
varname
[
CDI_MAX_NAME
];
char
units
[
CDI_MAX_NAME
];
char
vdatestr
[
32
],
vtimestr
[
32
],
datetimestr
[
64
];
...
...
src/Magvector.cc
View file @
f6fccdec
...
...
@@ -316,7 +316,7 @@ void *Magvector(void *argument)
#if defined(HAVE_LIBMAGICS)
int
nrecs
;
int
levelID
;
in
t
nmiss
;
size_
t
nmiss
;
char
varname
[
CDI_MAX_NAME
];
char
units
[
CDI_MAX_NAME
];
char
vdatestr
[
32
],
vtimestr
[
32
],
datetimestr
[
64
];
...
...
src/MapReduce.cc
View file @
f6fccdec
...
...
@@ -38,7 +38,8 @@
* function definition */
void
read_first_record
(
char
*
filename
,
double
*
field
)
{
int
nmiss
,
varID
,
levelID
;
size_t
nmiss
;
int
varID
,
levelID
;
int
streamID
=
streamOpenRead
(
filename
);
streamInqTimestep
(
streamID
,
0
);
streamInqRecord
(
streamID
,
&
varID
,
&
levelID
);
...
...
@@ -72,7 +73,7 @@ void *MapReduce(void *argument)
{
int
nrecs
;
int
varID
,
levelID
;
in
t
nmiss
;
size_
t
nmiss
;
int
nobounds
=
FALSE
;
int
nocoords
=
FALSE
;
/*double missval1, missval2; */
...
...
src/Maskbox.cc
View file @
f6fccdec
...
...
@@ -399,7 +399,7 @@ void *Maskbox(void *argument)
if
(
vars
[
varID
]
)
{
in
t
nmiss
;
size_
t
nmiss
;
pstreamReadRecord
(
streamID1
,
array
,
&
nmiss
);
double
missval
=
vlistInqVarMissval
(
vlistID1
,
varID
);
...
...
src/Mastrfu.cc
View file @
f6fccdec
...
...
@@ -30,7 +30,7 @@
static
void
mastrfu
(
int
gridID
,
int
zaxisID
,
double
*
array1
,
double
*
array2
,
in
t
nmiss
,
double
missval
)
void
mastrfu
(
int
gridID
,
int
zaxisID
,
double
*
array1
,
double
*
array2
,
size_
t
nmiss
,
double
missval
)
{
int
ilev
,
ilat
,
n
;
double
fact
=
4
*
atan
(
1.0
)
*
6371000
/
9.81
;
...
...
@@ -109,7 +109,7 @@ void *Mastrfu(void *argument)
int
nrecs
;
int
varID
,
levelID
;
int
offset
;
in
t
nmiss
,
nmiss1
;
size_
t
nmiss
,
nmiss1
;
cdoInitialize
(
argument
);
...
...
src/Math.cc
View file @
f6fccdec
...
...
@@ -46,7 +46,7 @@ void *Math(void *argument)
enum
{
ABS
,
FINT
,
FNINT
,
SQR
,
SQRT
,
EXP
,
LN
,
LOG10
,
SIN
,
COS
,
TAN
,
ASIN
,
ACOS
,
ATAN
,
POW
,
RECI
};
int
nrecs
;
int
varID
,
levelID
;
in
t
nmiss
,
nmiss2
;
size_
t
nmiss
,
nmiss2
;
int
i
;
cdoInitialize
(
argument
);
...
...
Prev
1
2
3
4
5
6
7
8
…
11
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