| i * i3 * 10 ^ abs(i2) * 10 ^ abs(i4) = i1 * i3 * 10 ^ abs(i0) * 10 ^ abs(i4) ⊦ i3 = 0, mkDecimal(i3, i4) = mkDecimal(0, 0), mkDecimal(i, i0) = mkDecimal(i1, i2) |
i * 10 ^ abs(i2) * 10 ^ abs(i4) = i1 * 10 ^ abs(i0) * 10 ^ abs(i4) ⊦ i3 = 0, mkDecimal(i3, i4) = mkDecimal(0, 0), mkDecimal(i, i0) = mkDecimal(i1, i2)
Used simplifier rules: commutativity: ⊦ i * j = j * i; from specification int-mult%associativity: ⊦ i * j * j0 = (i * j) * j0; from specification int-mult%eq-nonzero: ⊦ i ≠ 0 → (i * j = i * j0 ↔ j = j0); from specification int-mult