modifiy heap sort, r>len