defaults.spad line 27 [edit on github]
+ : (%, %) -> %
Implements multiplication by repeated addition
double(i, r) multiplies r by i using repeated doubling.
double(i, r)
r
i