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