*
* * ( a b -- a*b )

return the multiply of the two args

core ordinary primitive