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