| # int2bytes(i) ≤ # mklist(i2b(~1), i→n(j)), # int2bytes(i) ≤ i→n(j), # int2bytes(i) ≤ i→n(j), i < 0 ⊦ i >> 8 * j = bytes2int(firstn(# int2bytes(i), mklist(i2b(~1), i→n(j)))), j = 0 |
i < 0, # int2bytes(i) ≤ i→n(j) ⊦ j = 0, i >> 8 * j = bytes2int(mklist(i2b(~1), # int2bytes(i)))
Used simplifier rules: ⊦ # mklist(by, n) = n;% ⊦ m ≤ n → firstn(m, mklist(by, n)) = mklist(by, m);