| # bits0 ≠ 0, bits2uint(true ') * 2 ^ n→i(# bits0) + bits2uint(bits0) = 2 ^ (1 + n→i(# bits0)) ⊦ |
bits2uint(bits0) + 2 ^ n→i(# bits0) = 2 ^ (1 + n→i(# bits0)) ⊦ bits0 = []
Used simplifier rules: bits2uint-one-03: ⊦ bits2uint(true ') = 1;% ⊦ # bits = 0 ↔ bits = [];% ⊦ i * j = j * i;% ⊦ i * j * j0 = (i * j) * j0;% ⊦ 1 * i = i;