| x + a ' = a0 ' + y, a = a0 ∨ a ∈ y, a0 ∈ x ∨ a0 = a ⊦ # y = # x |
x + a ' = a0 ' + y, a0 ∈ x ∨ a0 = a, a = a0 ∨ a ∈ y ⊦ # y = # x, #(x + a ') = #(a0 ' + y)
Used simplifier rules: len: ⊦ #(x + y) = # x + # y;%len-02: ⊦ # a ' = 0 +1;%a: ⊦ (x + y) + z = x + y + z;% ⊦ m + n = m + n0 ↔ n = n0; (s)%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic%c: ⊦ m + n = n + m; from specification nat-basic Used formulas: #(x + a ') = #(a0 ' + y)