Improved HeapSort Speed