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
[code]a_deleteDuplicates[b]([/b]A[b][[/b]0...n-[color=FFFF77]1[/color][b]][/b][b])[/b] :A[color=999999][i]'[0...n-1][/i][/color] buildHeap[b]([/b]A[b])[/b] //as it[color=999999][i]'s done in heapsort[/i][/color] for [b]([/b]i=n downto [color=FFFF77]2[/color][b])[/b] do temp := Heap.deleteMin if [b]([/b]A[color=999999][i]'[i-1] != temp)[/i][/color] A[color=999999][i]'[i]:= temp[/i][/color] b_deleteDuplicates[b]([/b]A[b][[/b]0...n-[color=FFFF77]1[/color][b]][/b][b])[/b] :A[color=999999][i]'[0...n-1][/i][/color] for [b]([/b]i=[color=FFFF77]0[/color] to n-[color=FFFF77]1[/color][b])[/b] do A[color=999999][i]'[i] := null[/i][/color] for [b]([/b]i=[color=FFFF77]0[/color] to n-[color=FFFF77]1[/color][b])[/b] do h:= H[b]([/b]A[b][[/b]i[b]][/b][b])[/b] //H ist universelle Hashfkt die ganzzahlig in [b][[/b][color=FFFF77]0[/color],...,n-[color=FFFF77]1[/color][b]][/b] abbildet A[color=999999][i]'[h]:= A[i][/i][/color] return A[color=999999][i]'[/i][/color] [/code]
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'