| 0 ≤ i, 0 ≤ i0, 1 < i, 0 < i ⊦ bits2uint(firstn(# int2bits(i / 2), (mklist(false, i→n(i0)) + false ' + int2bits(i / 2) + (i % 2 = 1)').rest)) = bits2int(firstn(# int2bits(i / 2), mklist(false, i→n(i0)) + int2bits(i / 2))) |
mklist(false, i→n(i0)) + false ' + int2bits(i / 2) + (i % 2 = 1)' = mklist(false, i→n(i0) + 1) + int2bits(i / 2) + (i % 2 = 1)', 0 ≤ i, 0 ≤ i0, 1 < i, 0 < i ⊦ bits2uint(firstn(# int2bits(i / 2), (mklist(false, i→n(i0)) + false ' + int2bits(i / 2) + (i % 2 = 1)').rest)) = bits2int(firstn(# int2bits(i / 2), mklist(false, i→n(i0)) + int2bits(i / 2)))
Used simplifier rules: ⊦ (bits + bits0) + bits1 = bits + bits0 + bits1;% ⊦ mklist(boolvar, m + n) = mklist(boolvar, m) + mklist(boolvar, n);%n ≠ 0 ⊦ mklist(false, (* n)) = false ' + mklist(false, n -1);% ⊦ mklist(boolvar, 0) = [];% ⊦ bits + [] = bits;% ⊦ (m + n0) + n1 = m + n0 + n1;% ⊦ m + n = n + m;% ⊦ bits + bits0 = bits + bits1 ↔ bits0 = bits1; Used formulas: mklist(false, i→n(i0)) + false ' + int2bits(i / 2) + (i % 2 = 1)' = mklist(false, i→n(i0) + 1) + int2bits(i / 2) + (i % 2 = 1)'