D* ( D1 D2 -- D3 )


Vocabulary
decimals

Inputs
D1an object
D2an object


Outputs
D3an object


Definition
USING: kernel math ;

IN: decimals

: D* ( D1 D2 -- D3 )
guard-decimals [ >decimal< ] bi@ swapd + [ * ] dip <decimal>
;