Skip to content
Home
Post Code
Jass (Warcraft III)
Wurst
GUI (Warcraft III)
Galaxy (StarCraft II)
GUI (StarCraft II)
C++
Java
Delphi
Text
Search Code
Compare Code
Uploads
Draw
Create New Drawing
View Drawings
Graph
Log in
a_deleteDuplicates
(
A
[
0
...n
-
1
]
)
:A'
[
0
...n
-
1
]
buildHeap
(
A
)
//as it's done in heapsort
for
(
i
=
n
downto
2
)
do
temp :
=
Heap.deleteMin
if
(
A'
[
i
-
1
]
!
=
temp
)
A'
[
i
]
:
=
temp
b_deleteDuplicates
(
A
[
0
...n
-
1
]
)
:A'
[
0
...n
-
1
]
for
(
i
=
0
to
n
-
1
)
do
A'
[
i
]
:
=
null
for
(
i
=
0
to
n
-
1
)
do
h:
=
H
(
A
[
i
]
)
//H ist universelle Hashfkt die ganzzahlig in [0,...,n-1] abbildet
A'
[
h
]
:
=
A
[
i
]
return
A'
select language
jass
java
delphi
C++
php
GSL
galaxy
visualBasic
> wurst
Text
Markdown
select style
default
bbcode - default
Jasscraft
jasscraft html
visual
lightweight
> lightweightNr
goto line:
Compare with:
text copy window
edit this code
post new code
a_deleteDuplicates(A[0...n-1]) :A'[0...n-1] buildHeap(A) //as it's done in heapsort for (i=n downto 2) do temp := Heap.deleteMin if (A'[i-1] != temp) A'[i]:= temp b_deleteDuplicates(A[0...n-1]) :A'[0...n-1] for (i=0 to n-1) do A'[i] := null for (i=0 to n-1) do h:= H(A[i]) //H ist universelle Hashfkt die ganzzahlig in [0,...,n-1] abbildet A'[h]:= A[i] return A'