| ¬ # int2bits(128) ≤ 32, i2b(bits2int(sublist(0, # fillsgn(32, int2bits(128)), false ' + fillsgn(32, int2bits(128))))) = i2b(bits2uint(firstn(31, fillsgn(32, int2bits(~128))))), # int2bits(~128) ≤ 32 ⊦ |
i2b(bits2int(sublist(0, # fillsgn(32, int2bits(128)), false ' + fillsgn(32, int2bits(128))))) = i2b(bits2uint(firstn(31, fillsgn(32, int2bits(~128))))), # int2bits(~128) < # int2bits(128), 32 < # int2bits(128), # int2bits(~128) ≤ 32 ⊦
Used simplifier rules: ⊦ int2bits(j) ≠ [];% ⊦ # bits = 0 ↔ bits = [];% ⊦ m ≤ n ∧ n < n0 → m < n0; (forward)% ⊦ m < n → n ≠ 0; (forward)% ⊦ ¬ m ≤ n ↔ n < m;