| # xs = xs_len, # xs < h, # ys = 0 ∨ # ys = h ⊦ ⟪caterpillar_get#(h, xs, ys; ; x)⟫ true |
# xs < h, ys = [] ∨ # ys = h ⊦ ⟪caterpillar_get#(h, xs, ys; ; x)⟫ true
Used simplifier rules: ⊦ m < n → n ≠ 0; (s)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic% ⊦ # x = 0 ↔ x = []; (s)