| h = h0, xs_len = xs_len0, xs_len0 = # xs, xs_len1 = # xs, ((del-list(to_delete, n) * ls(rys, ys) * ls(rxs, xs)))(H), ((ls(rxs, xs) * ls(rys, ys) * del-list(to_delete, n)))(H), # xs + 1 < h0, # xs < h0, n + # xs ≤ h0, n ≤ # xs + # ys, 2 ≤ n → ((del-list(to_delete0, n - 2) * ls(rys, ys) * ls(rxs, xs)))(H1), n < 2 → to_delete0 = [] ∧ ((ls(rys, ys) * ls(rxs, xs)))(H1), ys = [] ∨ # ys = h0 ⊦ ⟨xs := a + xs; xs_len := 1 + xs_len⟩ ∃ n. ((ls(r, xs) * ls(rys, ys) * del-list(to_delete0, n)))((H1 ++ r)[r, a × rxs]) ∧ n ≤ # xs + # ys ∧ n + # xs ≤ h0 ∧ 1 + xs_len1 = xs_len, # xs + 1 = h0, r = null, r ∈ H1 |
h = h0, xs_len = xs_len0, xs_len0 = # xs, xs_len1 = # xs, ((ls(rxs, xs) * ls(rys, ys) * del-list(to_delete, n)))(H), ((del-list(to_delete, n) * ls(rys, ys) * ls(rxs, xs)))(H), # xs < h0, # xs + 1 < h0, n ≤ # xs + # ys, n + # xs ≤ h0, n < 2 → to_delete0 = [] ∧ ((ls(rys, ys) * ls(rxs, xs)))(H1), 2 ≤ n → ((del-list(to_delete0, n - 2) * ls(rys, ys) * ls(rxs, xs)))(H1), ys = [] ∨ # ys = h0 ⊦ ⟨xs_len := 1 + xs_len⟩ ∃ n. ((ls(r, a + xs) * ls(rys, ys) * del-list(to_delete0, n)))((H1 ++ r)[r, a × rxs]) ∧ n ≤ #(a + xs) + # ys ∧ n + #(a + xs) ≤ h0 ∧ 1 + xs_len1 = xs_len, # xs + 1 = h0, r = null, r ∈ H1