| i→n(i) = #(mklist(false, i→n(i) - # int2bits(j)) + int2bits(j)), # int2bits(j) ≤ i→n(i), 0 ≤ j, j < 2 ^ (i - 1), 0 < i ⊦ bits2int(mklist(false, i→n(i) - # int2bits(j)) + int2bits(j)) = j |
# int2bits(j) ≤ i→n(i), 0 ≤ j, j < 2 ^ (i - 1), 0 < i ⊦ bits2int(mklist(false, i→n(i) - # int2bits(j)) + int2bits(j)) = j
Used simplifier rules: ⊦ (m + n0) + n1 = m + n0 + n1;%n ≤ m ⊦ (m - n) + n0 = n1 ↔ m + n0 = n + n1;% ⊦ (bits + bits0) + bits1 = bits + bits0 + bits1;% ⊦ # mklist(boolvar, n) = n;% ⊦ #(bits + bits0) = # bits + # bits0;% ⊦ m + n = n + m;