| j % 2 = 0, uint2bits((j / 2) % 2 ^ i0) = sgn(false ' + lastn(i→n(i0), uint2bits(j / 2).rest)), mklist(false, # lastn(i→n(i0), uint2bits(j / 2).rest)) = lastn(i→n(i0), uint2bits(j / 2).rest), 0 < i0, 0 < j, 2 ^ i0 * 2 < j, # uint2bits(j / 2).rest < i→n(i0), 0 < (j / 2) % 2 ^ i0, ∀ j0, i. i→n(j0) < i→n(j) → 0 ≤ i ∧ 2 ^ i < j0 → uint2bits(j0 % 2 ^ i) = sgn(false ' + lastn(i→n(i), uint2bits(j0).rest)) ⊦ i0 = 0, ~1 = i0, j = 1 |
j = i1 * 2 + j1 ∧ 0 ≤ j1 ∧ j1 < 2 ∧ 0 < 2 ∧ 0 ≤ j, j1 = 0, uint2bits(i1 % 2 ^ i0) = sgn(false ' + lastn(i→n(i0), uint2bits(i1).rest)), mklist(false, # lastn(i→n(i0), uint2bits(i1).rest)) = lastn(i→n(i0), uint2bits(i1).rest), 0 < i0, 0 < j, 2 ^ i0 * 2 < j, # uint2bits(i1).rest < i→n(i0), 0 < i1 % 2 ^ i0, ∀ j0, i. i→n(j0) < i→n(j) → 0 ≤ i ∧ 2 ^ i < j0 → uint2bits(j0 % 2 ^ i) = sgn(false ' + lastn(i→n(i), uint2bits(j0).rest)) ⊦ i0 = 0, ~1 = i0, j = 1
Used simplifier rules: ⊦ ¬ i ≤ j ↔ j < i;% ⊦ i < j → ¬ j < i;%⊦ 0 < j ∧ 0 ≤ i → (i0 = i / j ∧ j0 = i % j ↔ i = i0 * j + j0 ∧ 0 ≤ j0 ∧ j0 < j); (elim) Used terms: j, 2, i1, j1