Anonymous user
Averages/Median: Difference between revisions
→{{header|Erlang}}: remove unused code
(→{{header|Erlang}}: remove unused code) |
|||
Line 1,310:
qs_median([P|Tail], TargetPos, P, up) when TargetPos /= 1 ->
qs_median(Tail, TargetPos - 1, P, up);
qs_median([P|Tail], TargetPos, _, _) ->
Smaller = [X || X <- Tail, X < P],
Line 1,324 ⟶ 1,322:
false ->
case (LS + 0.5) == TargetPos of
true -> (P + qs_median(Smaller,TargetPos - 0.5, P,
false ->
case LS + 1 > TargetPos of
true -> qs_median(Smaller,TargetPos, P,
false ->
Larger = [X || X <- Tail, X >= P],
| |||