3 lines
66 B
Forth
3 lines
66 B
Forth
|
|
: fmultiply ( F: a b -- F: c ) F* ;
|
||
|
|
: multiply ( a b -- c ) * ;
|