| bag0 -- bag0.max = ∅ ∨ bag0.max = (bag0 -- bag0.max).max ∨ count(bag0.max, bag0) = 1 ⊦ (bag0 ++ m) -- (bag0 ++ m).max = ∅, (bag0 ++ m).max = ((bag0 ++ m) -- (bag0 ++ m).max).max, count((bag0 ++ m).max, bag0 ++ m) = 1 |
bag0 -- bag0.max = ∅ ∨ bag0.max = (bag0 -- bag0.max).max ∨ count(bag0.max, bag0) = 1 ⊦ (m = (bag0 = ∅ ⊃ m;(m < bag0.max ⊃ bag0.max;m)) ⊃ bag0;(bag0 -- (bag0 = ∅ ⊃ m;bag0.max)) ++ m) = ∅, (bag0 = ∅ ⊃ m;(m < bag0.max ⊃ bag0.max;m)) = (m = (bag0 = ∅ ⊃ m;(m < bag0.max ⊃ bag0.max;m)) ⊃ bag0;(bag0 -- (bag0 = ∅ ⊃ m;bag0.max)) ++ m).max, count((bag0 = ∅ ⊃ m;(m < bag0.max ⊃ bag0.max;m)), bag0 ++ m) = 1
Used simplifier rules: max-rec: ⊦ (bag ++ n).max = (bag = ∅ ⊃ n;(bag.max > n ⊃ bag.max;n));% ⊦ (bag0 ++ n) -- n0 = (n = n0 ⊃ bag0;(bag0 -- n0) ++ n); (s)% ⊦ m > n ↔ n < m; (s)