Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
mpim-sw
cdo
Commits
2b156939
Commit
2b156939
authored
Oct 20, 2015
by
Uwe Schulzweida
Browse files
runpctl: replace nth_element() by percentile()
parent
6585abcb
Changes
1
Hide whitespace changes
Inline
Side-by-side
src/Runpctl.c
View file @
2b156939
...
...
@@ -25,7 +25,7 @@
#include
"cdo.h"
#include
"cdo_int.h"
#include
"pstream.h"
#include
"
nth_element
.h"
#include
"
percentiles
.h"
void
*
Runpctl
(
void
*
argument
)
...
...
@@ -135,7 +135,7 @@ void *Runpctl(void *argument)
if
(
j
>
0
)
{
vars1
[
0
][
varID
][
levelID
].
ptr
[
i
]
=
nth_element
(
array
,
j
,
(
int
)
ceil
(
j
*
(
pn
/
100
.
0
))
-
1
);
vars1
[
0
][
varID
][
levelID
].
ptr
[
i
]
=
percentile
(
array
,
j
,
pn
);
}
else
{
...
...
Write
Preview
Supports
Markdown
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