leftof ( a b x -- ? )

Vocabulary

rosetta-code.raycasting

Inputs

a	an object
b	an object
x	an object

Outputs

?

an object

Definition

USING: kernel math sequences ;

IN: rosetta-code.raycasting

: leftof ( a b x -- ? ) dup [ lincomb ] dip [ first ] bi@ > ;