| ⊦ even(mkDecimal(i * i, abs(i0) + abs(i0)).scale) |
⊦ even(mkDecimal(i * i, 2 * abs(i0)).scale)
Used simplifier rules: add-c: ⊦ i + j = j + i; from specification int-basic2%add-a: ⊦ i + j + i0 = (i + j) + i0; from specification int-basic2%add-mult-two: ⊦ i + i = 2 * i; from specification int-mult