| # gndx0 = (m + 1) + # lax2, # ndx = 2 + m + # lax2, # gndx1 = # lax1, # lax0 = m + 1, gndx0.last = mkgnode(nd0, m2, boolvar1, true), gndx0[m] = mkgnode(nd1, m3, boolvar, boolvar2), gstore[m6] = groupblock(gndx1, lax1, m9), m < # gndx0, m6 ∈ gstore, ∀ n0. ¬ # gndx0 < n0 → (mkgnode(nd, m1, true, boolvar0) ' + gndx0)[n0].nd = ndx[n0], ∀ n0. (n0 ≠ 0 ∧ ¬ # gndx0 < n0 → ¬ (mkgnode(nd, m1, true, boolvar0) ' + gndx0)[n0].start) ∧ (n0 < # gndx0 → ¬ (mkgnode(nd, m1, true, boolvar0) ' + gndx0)[n0].end) ⊦ gndx0 = [], lax0 = [], nd1 = ndx[m + 1], dups((lax1 + lax0) + lax2), dups(lax1), dups(lax0 + lax2), dups(lax1 + lax0), dups(lax2), dups(lax0), @(m7, m8) ∈ lax2, @(m7, m8) ∈ lax0, @(m7, m8) ∈ lax1, m6 ∈ ginval |
Used simplifier rules: ⊦ m < n + 1 ↔ ¬ n < m; (s)%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic%c: ⊦ m + n = n + m; from specification nat-basic% ⊦ (gnd ' + gndx)[n + 1] = gndx[n]; (s)%a: ⊦ (gndx + gndx0) + gndx1 = gndx + gndx0 + gndx1; from specification list[group-store]% ⊦ mkgnode(nd, m, boolvar, boolvar0).nd = nd; (s) Used terms: m + 1