| ⊦ band(j, 2 ^ n→i(# int2bits(j)) - 1) = bits2uint(int2bits(j)) |
⊦ ¬ false ∈ int2bits(i0).rest ∧ abs(j) ≤ 2 ^ n→i(# int2bits(i0) - 2) ∧ 0 < i0 → band(j, i0) = bits2uint(fillsgn(# int2bits(i0) - 1, int2bits(j)))
¬ ( ¬ false ∈ int2bits(2 ^ n→i(# int2bits(j)) - 1).rest ∧ abs(j) ≤ 2 ^ n→i(# int2bits(2 ^ n→i(# int2bits(j)) - 1) - 2) ∧ 0 < 2 ^ n→i(# int2bits(j)) - 1) ⊦ band(j, 2 ^ n→i(# int2bits(j)) - 1) = bits2uint(int2bits(j))
Used simplifier rules: ⊦ 0 ≤ n→i(n);%0 ≤ i ⊦ int2bits(2 ^ i - 1) = false ' + mklist(true, i→n(i));% ⊦ i→n(n→i(n)) = n;% ⊦ #(bits + bits0) = # bits + # bits0;% ⊦ # boolvar ' = 0 +1;% ⊦ # mklist(boolvar, n) = n;% ⊦ (bits + bits0) + bits1 = bits + bits0 + bits1;% ⊦ n ≤ m → m + n0 - n = (m - n) + n0;% ⊦ 0 + m = m;% ⊦ (m + n0) + n1 = m + n0 + n1;% ⊦ m + n = n + m;% ⊦ fillsgn(# bits, bits) = bits; Used terms: 2 ^ n→i(# int2bits(j)) - 1, j