| perm(ints0, ints1 + ints), ints = [] ∨ j < min(ints), ints1 = [] ∨ max(ints1) ≤ j ⊦ j < i, ∃ ints, ints1. perm(i ' + ints0, ints + ints1) ∧ (ints = [] ∨ max(ints) ≤ j) ∧ (ints1 = [] ∨ j < min(ints1)) |
perm(ints0, ints1 + ints), i ≤ j, ints = [] ∨ j < min(ints), ints1 = [] ∨ max(ints1) ≤ j ⊦ ∃ ints, ints1. perm(i ' + ints0, ints + ints1) ∧ (ints = [] ∨ max(ints) ≤ j) ∧ (ints1 = [] ∨ j < min(ints1))
Used simplifier rules: lels: ⊦ ¬ i < j ↔ j ≤ i; from specification int-abs