Used simplifier rules: int2bits-first: ⊦ j < 0 → int2bits(j) ≠ false ' + bits;% ⊦ (bits + bits0) + bits1 = bits + bits0 + bits1;