| P2 = P0, A2 = A, F1 = F, X1 = X, DAid(A, D), ADid(A, D), nodups(A), partitions(P0, # A), Fok(F, P0, # A), ∀ p. p ∈ P0 → p.count = 0 ∧ okp(p, # A), ∀ X0. ¬ ( X = X0 + X1 ∧ perm(A, A2) ∧ DAid(A2, D) ∧ ADid(A2, D) ∧ split(P2, A2, X0) ∧ partitions(P2, # A2) ∧ resetcnt(P2) = P0 ∧ nodups(A2) ∧ Fok(F1, P2, # A2) ∧ F1 = F ∧ samepartitions(P2, A2, P0, A)) ⊦ |
[Concretesimprules((Csimpnamedseq(samepartitions-same,,, ⊦ samepartitions(P1, A1, P1, A1)) Csimpnamedseq(array-perm,array_of_nat,perm-refl, ⊦ perm(A, A)) Csimpnamedseq(list,list_of_nat,a, ⊦ (X + X0) + X1 = X + X0 + X1) Csimpnamedseq(list,list_of_nat,app-05, ⊦ X = X0 + X ↔ X0 = [])))]