RosettaCodeData/Task/Function-definition/Factor/function-definition.factor

: multiply ( a b -- a*b ) * ;