| isSquare(dec0 * dec0) ⊦ mkDecimal(sqrt((dec0 * dec0).int), (dec0 * dec0).scale / 2) * mkDecimal(sqrt((dec0 * dec0).int), (dec0 * dec0).scale / 2) = dec0 * dec0 |
⊦ mkDecimal(sqrt((dec0 * dec0).int), (dec0 * dec0).scale / 2) * mkDecimal(sqrt((dec0 * dec0).int), (dec0 * dec0).scale / 2) = dec0 * dec0
Used simplifier rules: isSquare-square: ⊦ isSquare(dec * dec);%mult-c: ⊦ dec_i * dec_j = dec_j * dec_i; from specification decimal-simple-ops%mult-a: ⊦ dec0 * dec1 * dec2 = (dec0 * dec1) * dec2; from specification decimal-simple-ops