| ⊦ valid-group-nodes ((n ≤ #(gndx + mkgnode(nd, m, boolvar, false) ') ⊃ firstn(n, gndx + mkgnode(nd, m, boolvar, false) ');gndx + mkgnode(nd, m, boolvar, false) ')) = valid-group-nodes(prefixn(n, gndx)) |
⊦ valid-group-nodes((n ≤ # gndx + 1 ⊃ firstn(n, gndx + mkgnode(nd, m, boolvar, false) ');gndx + mkgnode(nd, m, boolvar, false) ')) = valid-group-nodes(prefixn(n, gndx))
Used simplifier rules: a: ⊦ (gndx + gndx0) + gndx1 = gndx + gndx0 + gndx1; from specification list[group-store]% ⊦ # gnd ' = 0 +1; (s)% ⊦ #(gndx + gndx0) = # gndx + # gndx0; (s)