heap-order(kar, n), n + 1 ≤ # kar ⊦ n = 0, ki.key < kar[(n - 1) / 2].key, heap-order(kar[n, ki], n + 1)