| modify(rs)(H0, H), r ∈ rs, r ∈ rs → (r ∈ H ↔ r ∈ H1) ∧ (r ∈ H → H[r] = H1[r]) ⊦ # rs = 0, rs = ∅, (r ∈ H0 ↔ r ∈ H1) ∧ (r ∈ H0 → H0[r] = H1[r]) |
r ∈ H ↔ r ∈ H1, modify(rs)(H0, H), r ∈ rs, r ∈ H1 → H[r] = H1[r] ⊦ # rs = 0, rs = ∅, (r ∈ H0 ↔ r ∈ H1) ∧ (r ∈ H0 → H0[r] = H1[r])