| bits0 = boolvar + bits1, mklist(false, # bits) = bits, # bits0 + 1 < n0 + # bits, # bits0 < n0 + # bits, boolvar, # bits0 < # bits ⊦ bits0 = [], bits = [], n0 = 0, mklist(false, n0) = mklist(bits.first, n0) |
mklist(false, # bits) = bits, 2 + # bits1 < n0 + # bits, 1 + # bits1 < # bits ⊦ bits = [], n0 = 0, mklist(false, n0) = mklist(bits.first, n0)
Used simplifier rules: ⊦ m + n < m0 → m + n < m0 + n0;% ⊦ m + n = n + m;% ⊦ (m + n0) + n1 = m + n0 + n1;% ⊦ # boolvar ' = 0 +1;% ⊦ #(bits + bits0) = # bits + # bits0;% ⊦ (bits + bits0) + bits1 = bits + bits0 + bits1;% ⊦ boolvar ' + bits ≠ [];% ⊦ boolvar + bits = boolvar ' + bits;