| ks ⊆ ks0 ⊦ ks ++ key ⊆ ks0 ∪ ks1 ↔ key ∈ ks0 ∨ key ∈ ks1 |
ks ⊆ ks0, key ∈ ks0 ∨ key ∈ ks1 ⊦ ks ++ key ⊆ ks0 ∪ ks1
Used simplifier rules: ⊦ ks ++ key ⊆ ks0 ↔ ks ⊆ ks0 ∧ key ∈ ks0; (ws)% ⊦ ks ⊆ ks0 → ks ⊆ ks0 ∪ ks1; (s)%una: ⊦ (ks ∪ ks0) ∪ ks1 = ks ∪ ks0 ∪ ks1; from specification set-union[node-index]%unc: ⊦ ks ∪ ks0 = ks0 ∪ ks; from specification set-union[node-index]% ⊦ ¬ key ∈ ks → (key ∈ ks ∪ ks0 ↔ key ∈ ks0); (s)