| i = i0, ∀ i. i ∈ ints0 → Π ints0 = i ^ n→i(#oc(i, ints0)) * Π(ints0 -l i) ⊦ i0 * Π ints0 = i ^ (n→i(#oc(i, i0 ')) + n→i(#oc(i, ints0))) * Π((i0 ' + ints0) -l i), i ≠ i0 ∧ ¬ i ∈ ints0 |
∀ i. i ∈ ints0 → Π ints0 = i ^ n→i(#oc(i, ints0)) * Π(ints0 -l i) ⊦ i0 * Π ints0 = i0 ^ (1 + n→i(#oc(i0, ints0))) * Π(ints0 -l i0)
Used simplifier rules: a: ⊦ (ints + ints0) + ints1 = ints + ints0 + ints1; from specification list[intlista]%del-y: ⊦ (i ' + ints) -l i = ints -l i; from specification list-del[intlista]%one: ⊦ #oc(i, i ') = 1; from specification list-perm[intlista]