| ⊦ mkDecimal(dec_i.int * 10 ^ mkDecimal(0, j).scale + mkDecimal(0, j).int * 10 ^ dec_i.scale, dec_i.scale + mkDecimal(0, j).scale) = dec_i |
⊦ mkDecimal(dec_i.int, dec_i.scale) = dec_i
Used simplifier rules: add-c: ⊦ i + j = j + i; from specification int-basic2%add-a: ⊦ i + j + i0 = (i + j) + i0; from specification int-basic2%add-zero: ⊦ i + 0 = i; from specification int-basic2%Mult-zero: ⊦ i * 0 = 0; from specification int-mult%intvalue-zero: ⊦ mkDecimal(0, j).int = 0; from specification decimal%commutativity: ⊦ i * j = j * i; from specification int-mult%associativity: ⊦ i * j * j0 = (i * j) * j0; from specification int-mult%one: ⊦ 1 * i = i; from specification int-mult%scale-zero: ⊦ mkDecimal(0, j).scale = 0; from specification decimal