| r ∈ H ⊦ #(H -- r) = # H - 1 |
⊦ r ≠ null → (r ∈ H ↔ (∃ H0, ce. H = (H0 ++ r)[r, ce] ∧ ¬ r ∈ H0))
Used simplifier rules: r0 ≠ null, ¬ r0 ∈ H ⊦ r ∈ H ++ r0 ↔ r = r0 ∨ r ∈ H; (s)%r ∈ H ⊦ H[r, ce] -- r = H -- r; (s)%¬ r ∈ H, r ≠ null ⊦ (H ++ r) -- r = H; (s)%r ∈ H ⊦ # H[r, ce] = # H; (s)%¬ r ∈ H, r ≠ null ⊦ #(H ++ r) = # H + 1; (s)% ⊦ n ≤ m → m + n0 - n = (m - n) + n0; (s)% ⊦ n + 0 = n; (s)%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic%c: ⊦ m + n = n + m; from specification nat-basic% ⊦ ¬ null ∈ H; (s) Used terms: H, r