| bytes = by + bytes0, 0 ≤ b2i(by), # bytes < n, 0 ≤ bytes2int(bytes) ⊦ mklist(i2b(0), n - # bytes) + bytes = i2b(0) ' + fix(n - 1, bytes), bytes = [] |
1 + # bytes0 < n, 0 ≤ b2i(by), 0 ≤ bytes2int(by ' + bytes0) ⊦ mklist(i2b(0), n - 1 + # bytes0) + by ' + bytes0 = i2b(0) ' + fix(n - 1, by ' + bytes0)
Used simplifier rules: ⊦ i ≤ j ∧ 0 ≤ i → 0 ≤ j; (forward)% ⊦ by ' + bytes ≠ [];% ⊦ (bytes + bytes0) + bytes1 = bytes + bytes0 + bytes1;% ⊦ # by ' = 0 +1;% ⊦ #(bytes + bytes0) = # bytes + # bytes0;% ⊦ by + bytes = by ' + bytes;