| r ∈ H, r1 ∈ H, r ∈ H[r1, o1] ⊦ (H ++ r0)[r] = H[r1, o1][r], r = r1, r = r0, r0 = null, r0 ∈ H, r0 ∈ H[r1, o1] |
r1 ∈ H, r ∈ H ⊦ (H ++ r0)[r] = H[r], r = r1, r0 = null, r0 ∈ H
Used simplifier rules: at-write: ⊦ H[r0, o][r] = (r = r0 ∧ r0 ∈ H ⊃ o;H[r]);%in-write: ⊦ r ∈ H[r0, o] ↔ r ∈ H;