| (m * 2 ≤ m1 ⊃ mkkeyarray(n0)[m1 / 2];kar[m1 / 2]) = key-index(key0, m2), kar[1 + m1] = key-index(key, m0), 2exp-size(# kar), 2exp-size(n0), m1 + 1 < # kar, m1 + 1 < minsize, m < n0, m < minsize, m1 + 1 < m, key < key0, 2 + m1 < n0, 2 + m1 < minsize, m1 + 1 < n0, m1 / 2 < n0, heap-order(kar, m), no-dups-idx(kar, m), valid-idx(kar, ar, m), m ≤ # kar, minsize ≤ n0 ⊦ |
kar[1 + m1] = key-index(key, m0), mkkeyarray(n0)[m1 / 2] = key-index(key0, m2), 2exp-size(n0), 2exp-size(# kar), m1 / 2 < n0, m1 + 1 < n0, 2 + m1 < minsize, 2 + m1 < n0, key < key0, m1 + 1 < m, m < minsize, m < n0, m1 + 1 < minsize, m1 + 1 < # kar, heap-order(kar, m), no-dups-idx(kar, m), valid-idx(kar, ar, m), minsize ≤ n0, m ≤ # kar, m * 2 ≤ m1 ⊦
kar[1 + m1] = key-index(key, m0), kar[m1 / 2] = key-index(key0, m2), 2exp-size(n0), 2exp-size(# kar), m1 / 2 < n0, m1 + 1 < n0, 2 + m1 < minsize, 2 + m1 < n0, key < key0, m1 + 1 < m, m < minsize, m < n0, m1 + 1 < minsize, m1 + 1 < # kar, heap-order(kar, m), no-dups-idx(kar, m), valid-idx(kar, ar, m), minsize ≤ n0, m ≤ # kar ⊦ m * 2 ≤ m1