| # mklist(i2b(0), i→n(j)) ≤ # int2bytes(i), i→n(j) < # int2bytes(i), 0 ≤ i ⊦ j = 0, bytes2int(firstn(# int2bytes(i) - i→n(j), int2bytes(i))) = bytes2int(mklist(i2b(0), i→n(j)) + firstn(# int2bytes(i) - # mklist(i2b(0), i→n(j)), int2bytes(i))) |
i→n(j) < # int2bytes(i), 0 ≤ i ⊦ j = 0, bytes2int(firstn(# int2bytes(i) - i→n(j), int2bytes(i))) = bytes2int(mklist(i2b(0), i→n(j)) + firstn(# int2bytes(i) - i→n(j), int2bytes(i)))
Used simplifier rules: ⊦ m < n → m ≤ n;% ⊦ # mklist(by, n) = n;