| ¬(i % 10 = 0 ∧ j ≠ 0 ∧ i ≠ 0), ∀ i0, j. i→n(i0) < i→n(i) → true → mkDecimal(~ i0, j) = ~ mkDecimal(i0, j) ⊦ mkDecimal(~ i, j) = mkDecimal(~ i, mkDecimal(i, j).scale), i % 10 = 0 ∧ j ≠ 0 |
∀ i0, j. i→n(i0) < i→n(i) → true → mkDecimal(~ i0, j) = ~ mkDecimal(i0, j) ⊦ mkDecimal(~ i, j) = mkDecimal(~ i, mkDecimal(i, j).scale), i = 0, i % 10 = 0 ∧ j ≠ 0, j ≠ 0 ∧ i % 10 = 0
Used simplifier rules: eq-zero: ⊦ mkDecimal(i, j) = mkDecimal(0, j0) ↔ i = 0; from specification decimal%scale-zero: ⊦ mkDecimal(0, j).scale = 0; from specification decimal