| inv(groupblock(gndx0 + gndx1, lax0 + lax1, n)) ⊦ prefixn(# gndx0 + # gndx1, lax0 + lax1) = lax0 + lax1 |
# gndx0 + # gndx1 < # lax0 + # lax1, inv(groupblock(gndx0 + gndx1, lax0 + lax1, n)) ⊦
Used simplifier rules: ⊦ m < n → n ≠ 0; (s)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic% ⊦ m ≤ n ↔ ¬ n < m; (ss)% ⊦ n ≥ m ↔ m ≤ n; (s)%a: ⊦ (lax + lax0) + lax1 = lax + lax0 + lax1; from specification list[laddress-list]% ⊦ #(lax + lax0) = # lax + # lax0; (s)% ⊦ prefixn(n, lax) = lax ↔ n ≥ # lax; (ss)