| ⊦ 2 ^ (8 * n→i(n)) = bytes2int(i2b(0) ' + mklist(i2b(~1), n)) + 1 |
2 ^ (8 * n→i(m)) = bytes2int(i2b(0) ' + mklist(i2b(~1), m)) + 1 ⊦ 2 ^ (8 * n→i(m +1)) = bytes2int(i2b(0) ' + mklist(i2b(~1), m +1)) + 1
Used simplifier rules: bytes2int-zero: ⊦ bytes2int(i2b(0) ') = 0;%nat freely generated by 0, +1;;% ⊦ mklist(by, 0) = [];% ⊦ bytes + [] = bytes;% ⊦ (bytes + bytes0) + bytes1 = bytes + bytes0 + bytes1;