linear-solution ( pt pt -- x )

Vocabulary

math.points

Inputs

pt	an object
pt	an object

Outputs

x

an object

Definition

USING: kernel math sequences ;

IN: math.points

: linear-solution ( pt pt -- x )
    [ drop first2 ] [ slope ] 2bi / - ;