| ¬(# bytes < n + # bytes ∧ 0 ≤ bytes2int(bytes)), 0 ≤ bytes2int(bytes) ⊦ bytes = [], mklist(i2b(0), n + 1) + bytes = (¬ 0 ≤ b2i(bytes.first) ⊃ i2b(~1);i2b(0)) ' + fillsgn(n + # bytes, bytes) |
0 ≤ bytes2int(bytes) ⊦ bytes = [], i2b(0) ' + bytes = (¬ 0 ≤ b2i(bytes.first) ⊃ i2b(~1);i2b(0)) ' + fillsgn(# bytes, bytes)
Used simplifier rules: ⊦ 0 + m = m;% ⊦ mklist(by, 1) = by ';% ⊦ i ≤ j → (¬ ¬ j < i ↔ false);% ⊦ ¬ i ≤ j ↔ j < i;% ⊦ m + n = n + m;% ⊦ (m + n0) + n1 = m + n0 + n1;% ⊦ m + m0 ≤ m ↔ m0 = 0;% ⊦ ¬ m < n ↔ n ≤ m;