| r0 ∈ (H0 -- r) ∪ (H1 -- r), r0 ∈ H1, H0 ⊥ H1 ⊦ (r0 ∈ H0 ⊃ H0[r0];H1[r0]) = ((H0 -- r) ∪ (H1 -- r))[r0], r0 = r |
r0 ∈ H1, r0 ∈ (H0 -- r) ∪ (H1 -- r), H0 ⊥ H1 ⊦ H1[r0] = ((H0 -- r) ∪ (H1 -- r))[r0], r0 = r
Used simplifier rules: disj-r: ⊦ r ∈ H1 ∧ H0 ⊥ H1 → (r ∈ H0 ↔ false);