| ¬ 8 ≤ # bitsand(bits, int2bits(j)), # bits = 8, int2bits(i) = bits0 + bits, # int2bits(j) < # bits0 + # bitsand(bits, int2bits(j)), 8 ≤ # bits0 + # bitsand(bits, int2bits(j)), j < 0, # int2bits(j) < 8 ⊦ lastn(8, bits0 + bitsand(bits, int2bits(j))) = lastn(8, bitsand(bits, int2bits(j))), bitsand(bits, int2bits(j)) = [] |
int2bits(i) = bits0 + bits, # bits = 8, # bitsand(bits, int2bits(j)) < 8, # int2bits(j) < 8, j < 0, 8 ≤ # bits0 + # bitsand(bits, int2bits(j)), # int2bits(j) < # bits0 + # bitsand(bits, int2bits(j)) ⊦ bitsand(bits, int2bits(j)) = [], lastn(8, bits0 + bitsand(bits, int2bits(j))) = lastn(8, bitsand(bits, int2bits(j))), bits0 = []
Used simplifier rules: ⊦ m + n = n + m;% ⊦ (m + n0) + n1 = m + n0 + n1;% ⊦ # bits = 0 ↔ bits = [];% ⊦ m < m + n ↔ n ≠ 0;% ⊦ m < n ∧ n = n0 → m < n0; (forward)% ⊦ m < n ∧ n ≤ n0 → m < n0; (forward)% ⊦ ¬ m ≤ n ↔ n < m;