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'
 

Diesen Code in Original-Formatierung anzeigen
goto line:
Compare with:
text copy window edit this code post new code