| cf(r) = a × r0, rs1 ∩ rs0 = ∅, ((r => ce))(mk(rs1, cf)), R[rs0, cf, af], ∀ r. r ∈ rs1 → af(r) = o ⊦ r = null, (o[r => a × r0] * R)[rs1 ∪ rs0, cf, af], ∀ r1. (r1 ∈ mk(rs1, cf) ↔ r1 ∈ (∅ ++ r)[r, a × r0]) ∧ (r1 ∈ mk(rs1, cf) → mk(rs1, cf)[r1] = (∅ ++ r)[r, a × r0][r1]) |
cf(r) = a × r0, rs1 ∩ rs0 = ∅, ((r => ce))(mk(rs1, cf)), R[rs0, cf, af], ∀ r. r ∈ rs1 → af(r) = o ⊦ r = null, (o[r => a × r0] * R)[rs1 ∪ rs0, cf, af], (r1 ∈ rs1 ↔ r1 = r) ∧ (r1 ∈ rs1 → cf(r1) = (r1 = r ⊃ a × r0;(∅ ++ r)[r1]))
Used simplifier rules: ⊦ H[r0, ce][r] = (r = r0 ∧ r0 ∈ H ⊃ ce;H[r]); (s)% ⊦ r ∈ rs → mk(rs, cf)[r] = cf(r); (s)%r0 ≠ null, ¬ r0 ∈ H ⊦ r ∈ H ++ r0 ↔ r = r0 ∨ r ∈ H; (s)% ⊦ ¬ r ∈ ∅; (s)% ⊦ r ∈ H[r0, ce] ↔ r ∈ H; (s)% ⊦ r ∈ mk(rs, cf) ↔ r ∈ rs; (s)