| n1 = n3 + n0, n0 ≤ n1, n1 + m1 ≤ n0 + m0, n + m0 ≤ # ar, n0 + m0 ≤ # ar0, n1 + m1 ≤ # ar0 ⊦ range=(ar2, n2, copy(ar, n, ar0, n0, m0), n1, m1) ↔ range=(ar2, n2, ar, n + n3, m1) |
n + m0 ≤ # ar, n0 + m0 ≤ # ar0, (n3 + n0) + m1 ≤ # ar0, n3 + m1 ≤ m0 ⊦ range=(ar2, n2, copy(ar, n, ar0, n0, m0), n3 + n0, m1) ↔ range=(ar2, n2, ar, n + n3, m1)
[Concretesimprules((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,,lep, ⊦ m ≤ m + n)))]