| # gndx = # lax, gstore[n] = groupblock(gndx, lax, n0), n ∈ gstore, n0 ≤ m0 ⊦ nodes(gstore ↓, ginval) ⊆ nodes(gstore ↓[n, groupblock(gndx + gnd ', lax + ladr ', m0) ↓], ginval) |
# gndx = # lax, gstore[n] = groupblock(gndx, lax, n0), n ∈ gstore, n0 ≤ m0 ⊦ nodes(gstore ↓, ginval) ⊆ nodes (gstore ↓ [n, groupblock (prefixn((gnd.end ⊃ # lax + 1;valid-group-nodes(gndx)), gndx + gnd '), prefixn((gnd.end ⊃ # lax + 1;valid-group-nodes(gndx)), lax + ladr '), m0) ], ginval)
Used simplifier rules: down-block-explicit: ⊦ groupblock(gndx, lax, m0) ↓ = groupblock (prefixn(valid-group-nodes(gndx), gndx), prefixn(valid-group-nodes(gndx), lax), m0);%valid-group-nodes-rec: ⊦ valid-group-nodes(gndx + gnd ') = (gnd.end ⊃ # gndx + 1;valid-group-nodes(gndx));%a: ⊦ (gndx + gndx0) + gndx1 = gndx + gndx0 + gndx1; from specification list[group-store]