| m0 = n1 + n3, n3 ≤ m0, m0 ≤ n3 + m1, n + m0 ≤ # ar, n0 + m0 ≤ # ar0, n3 + n0 ≤ # ar0, n0 ≤ # ar0 ⊦ range=(ar2, n2, copy(ar, n, ar0, n0, m0), n3 + n0, m1) ↔ range=(ar2, n2, ar, n + n3, n1) ∧ range=(ar2, n1 + n2, ar0, n0 + m0, m1 + n3 - m0) |
n + n1 + n3 ≤ # ar, n0 + n1 + n3 ≤ # ar0, n3 + n0 ≤ # ar0, n0 ≤ # ar0, n1 ≤ m1 ⊦ range=(ar2, n2, copy(ar, n, ar0, n0, n1 + n3), n3 + n0, m1) ↔ range=(ar2, n2, ar, n + n3, n1) ∧ range=(ar2, n1 + n2, ar0, n0 + n1 + n3, m1 - n1)
[Concretesimprules((Csimpnamedseq(nat,,lep-02, ⊦ m + n ≤ m + n0 ↔ n ≤ n0) Csimpnamedseq(nat,,lep, ⊦ m ≤ m + n) Csimpnamedseq(nat-basic2,,c, ⊦ m + n = n + m) Csimpnamedseq(nat-basic2,,a, ⊦ (m + n0) + n1 = m + n0 + n1) Csimpnamedseq(nat,,cancel-01, ⊦ m + n - n + n1 = m - n1)))]