| bytes = bytes0 + by ', # bytes ≤ 2, bytes2int(bytes) < 0 ⊦ bytes = [], (mklist(i2b(~1), 2 - # bytes) + bytes).rest = by ' |
# bytes0 ≤ 1, bytes2int(bytes0 + by ') < 0 ⊦ (mklist(i2b(~1), 2 - # bytes0 + 1) + bytes0 + by ').rest = by '
Used simplifier rules: ⊦ j < i ∧ i ≤ 0 → j < 0; (forward)% ⊦ m + n = n + m;% ⊦ (m + n0) + n1 = m + n0 + n1;%n < n0 ⊦ m + (* n) ≤ (* n0) ↔ m ≤ n0 - n;% ⊦ # by ' = 0 +1;% ⊦ #(bytes + bytes0) = # bytes + # bytes0;% ⊦ (bytes + bytes0) + bytes1 = bytes + bytes0 + bytes1;% ⊦ bytes + by ' ≠ [];