| # int2bits(j0) = 17, ~65536 < j0, j0 < ~32768, j0 < 0 ⊦ j0 = 0, s2i(i2s(bits2int(int2bits(j0).rest))) = j0 + 65536 |
⊦ j < ~1 → bits2int(int2bits(j).rest) = j + 2 ^ (n→i(# int2bits(j)) - 1)
j0 < ~1, # int2bits(j0) = 17, ~65536 < j0, j0 < ~32768, j0 < 0 ⊦ j0 = 0, s2i(i2s(j0 + 2 ^ (n→i(# int2bits(j0)) - 1))) = j0 + 65536
Used simplifier rules: lels: ⊦ ¬ i < j ↔ j ≤ i; from specification int-abs%mone-08: ⊦ i < 0 → (~1 ≤ i ↔ i = ~1); from specification int-abs%int2bits-mone-02: ⊦ int2bits(~1) = true '; from specification int2bits%len-02: ⊦ # boolvar ' = 0 +1; from specification list[bitlista] Used terms: j0