| # bitsand(int2bits(i), int2bits(j)) - 1 ≤ # int2bits(i) - 1 ∧ bitsand(int2bits(i), int2bits(j)) ≠ [] → ¬ 2 ^ n→i(# int2bits(i) - 1) + bits2int(bitsand(int2bits(i), int2bits(j))) < 0, bits2int(bitsand(int2bits(i), int2bits(j))) < i0, i0 + 2 ^ (n→i(# int2bits(i)) - 1) ≤ 0, i0 + 2 ^ (n→i(# int2bits(j)) - 1) ≤ 0, i < 0, j < 0, # int2bits(j) ≤ # int2bits(i) ⊦ |
bits2int(bitsand(int2bits(i), int2bits(j))) < i0, i0 + 2 ^ (n→i(# int2bits(i)) - 1) ≤ 0, i0 + 2 ^ (n→i(# int2bits(j)) - 1) ≤ 0, i < 0, j < 0, # int2bits(j) ≤ # int2bits(i), ¬ (# int2bits(i) - 1) + 1 < # bitsand(int2bits(i), int2bits(j)) → 0 ≤ 2 ^ n→i(# int2bits(i) - 1) + bits2int(bitsand(int2bits(i), int2bits(j))) ⊦
Used simplifier rules: and-notempty-09: ⊦ bitsand(int2bits(i), int2bits(i0)) ≠ [];% ⊦ ¬ i < j ↔ j ≤ i;%n0 ≤ n ⊦ n - n0 ≤ m ↔ n ≤ m + n0;% ⊦ ¬ m ≤ n ↔ n < m;% ⊦ m < 1 ↔ m = 0;% ⊦ # bits = 0 ↔ bits = [];