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