| mklist(false, # bits) = bits ⊦ bits = [], bitsinvert(bits).last |
mklist(false, # bits0) = bits0 → bits0 = [] ∨ bitsinvert(bits0).last ⊦ mklist(false, #(boolvar + bits0)) = boolvar + bits0 → boolvar + bits0 = [] ∨ bitsinvert(boolvar + bits0).last
Used simplifier rules: bitlist freely generated by [], +;;