| ¬((i * 10 ^ (j - 1) * 10) % 10 = 0 ∧ i * 10 ^ (j - 1) * 10 ≠ 0), 0 ≤ j, 0 < j, ∀ j0, i. i→n(j0) < i→n(j) → 0 ≤ j0 → maxScale(i * 10 ^ j0) = j0 ∨ i % 10 = 0 ⊦ i % 10 = 0, maxScale(i * 10 ^ (j - 1) * 10) = j |
i * 10 ^ (j - 1) = 0, 0 ≤ j, 0 < j, ∀ j0, i. i→n(j0) < i→n(j) → 0 ≤ j0 → maxScale(i * 10 ^ j0) = j0 ∨ i % 10 = 0 ⊦ i % 10 = 0, maxScale(i * 10 ^ (j - 1) * 10) = j
Used simplifier rules: zero-neq-01: ⊦ 0 < i → (i * j = 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%mod-zero-num: i0 % j = 0, j ≠ 0 ⊦ (i * (* i0)) % (* j) = 0; from specification int-div