| ¬(i % 10 = 0 ∧ j ≠ 0 ∧ i ≠ 0), ∀ i1, i2, j, j0. i→n(i1) + i→n(i2) < i→n(i) + i→n(i0) → true → (mkDecimal(i1, j) = mkDecimal(i2, j0) ↔ i1 * 10 ^ abs(j0) = i2 * 10 ^ abs(j)) ⊦ i = mkDecimal(i0, j0).int ∧ mkDecimal(i, j).scale = mkDecimal(i0, j0).scale ↔ i * 10 ^ abs(j0) = i0 * 10 ^ abs(j), i0 % 10 = 0 ∧ j0 ≠ 0, i % 10 = 0 ∧ j ≠ 0 |
∀ i1, i2, j, j0. i→n(i1) + i→n(i2) < i→n(i) + i→n(i0) → true → (mkDecimal(i1, j) = mkDecimal(i2, j0) ↔ i1 * 10 ^ abs(j0) = i2 * 10 ^ abs(j)) ⊦ i = mkDecimal(i0, j0).int ∧ mkDecimal(mkDecimal(i0, j0).int, j).scale = mkDecimal(i0, j0).scale ↔ i * 10 ^ abs(j0) = i0 * 10 ^ abs(j), i = 0, i0 % 10 = 0 ∧ j0 ≠ 0, i % 10 = 0 ∧ j ≠ 0, j ≠ 0 ∧ i % 10 = 0
Used simplifier rules: getint-zero: ⊦ mkDecimal(i, j).int = 0 ↔ i = 0;%intvalue-zero: ⊦ mkDecimal(0, j).int = 0;%scale-zero: ⊦ mkDecimal(0, j).scale = 0;%absls: ⊦ ¬ abs(i) < 0; from specification int-abs%pot-zero-01: ⊦ 0 < i → (i ^ j = 0 ↔ j < 0 ∧ 1 < i); from specification int-pot%zero-eq: ⊦ i * j = 0 ↔ i = 0 ∨ j = 0; from specification int-mult%commutativity: ⊦ i * j = j * i; from specification int-mult%associativity: ⊦ i * j * j0 = (i * j) * j0; from specification int-mult%Mult-zero: ⊦ i * 0 = 0; from specification int-mult