| abs(dec_i.scale + dec_j.scale) < maxScale(dec_i.int * 10 ^ dec_j.scale + dec_j.int * 10 ^ dec_i.scale) ⊦ dec_i.scale = dec_j.scale, 0 = max(dec_i.scale, dec_j.scale) |
⊦ 0 ≤ j ∧ 0 ≤ j0 → i * 10 ^ j + i0 * 10 ^ j0 = (i * 10 ^ (j - min(j, j0)) + i0 * 10 ^ (j0 - min(j, j0))) * 10 ^ min(j, j0)
0 ≤ dec_j.scale ∧ 0 ≤ dec_i.scale, abs(dec_i.scale + dec_j.scale) < maxScale ( (dec_i.int * 10 ^ (dec_j.scale - min(dec_j.scale, dec_i.scale)) + dec_j.int * 10 ^ (dec_i.scale - min(dec_j.scale, dec_i.scale))) * 10 ^ min(dec_j.scale, dec_i.scale)) ⊦ dec_i.scale = dec_j.scale, 0 = max(dec_i.scale, dec_j.scale)
Used simplifier rules: lels-01: ⊦ ¬ i ≤ j ↔ j < i; from specification int-abs%scale-not-neg: ⊦ ¬ dec.scale < 0; from specification decimal Used terms: dec_i.scale, dec_j.int, dec_j.scale, dec_i.int