| # ndx = # gndx1 + 1, gndx1[n0 - # mkgnode(nd0, m, true, boolvar0) '] = mkgnode(nd4, m3, boolvar7, boolvar8), (mkgnode(nd0, m, true, boolvar0) ' + gndx1 + mkgnode(nd, n, ndx = [], true) ')[n1] = mkgnode(nd1, m0, boolvar1, boolvar2), (mkgnode(nd0, m, true, boolvar0) ' + gndx1 + mkgnode(nd, n, ndx = [], true) ')[n0] = mkgnode(nd3, m2, true, boolvar6), n0 ≤ # ndx, ¬ # gndx1 < n0 → ¬ boolvar8, ¬ # gndx1 < n0 → ¬ boolvar7, ∀ n2. ¬ # gndx1 < n2 → (mkgnode(nd0, m, true, boolvar0) ' + gndx1)[n2].nd = (ndx + nd ')[n2] ⊦ n0 = 0, n0 < # mkgnode(nd0, m, true, boolvar0) ' |
# ndx = # gndx1 + 1, (gndx1 + mkgnode(nd, n, ndx = [], true) ')[n0 - 1] = mkgnode(nd3, m2, true, boolvar6), (mkgnode(nd0, m, true, boolvar0) ' + gndx1 + mkgnode(nd, n, ndx = [], true) ')[n1] = mkgnode(nd1, m0, boolvar1, boolvar2), gndx1[n0 - 1] = mkgnode(nd4, m3, boolvar7, boolvar8), n0 ≤ # ndx, ¬ # gndx1 < n0 → ¬ boolvar7, ¬ # gndx1 < n0 → ¬ boolvar8, ∀ n2. ¬ # gndx1 < n2 → (mkgnode(nd0, m, true, boolvar0) ' + gndx1)[n2].nd = (ndx + nd ')[n2] ⊦ n0 = 0
Used simplifier rules: ⊦ m < 1 ↔ m = 0; (s)%a: ⊦ (gndx + gndx0) + gndx1 = gndx + gndx0 + gndx1; from specification list[group-store]% ⊦ # gnd ' = 0 +1; (s)% ⊦ ¬ n < # gndx → (gndx + gndx0)[n] = gndx0[n - # gndx]; (s)