| P(H -- r), r ∈ H ⊦ ∃ H0, H1. H0 ⊥ H1 ∧ H = H0 ∪ H1 ∧ ((r => H[r]))(H0) ∧ P(H1) |
P(H -- r), r ∈ H ⊦ ∃ H0, H1. H0 ⊥ H1 ∧ H = H0 ∪ H1 ∧ H0 = (∅ ++ r)[r, (H0 ∪ H1)[r]] ∧ P(H1)
Used simplifier rules: maplet: ⊦ ((r => o))(H) ↔ H = (∅ ++ r)[r, o] ∧ r ≠ null;% ⊦ r ∈ H → r ≠ null; (s)