HeapSort ALMOST works