half-way ( p1 p2 -- p3 )

Vocabulary

jamshred.oint

Inputs

p1	an object
p2	an object

Outputs

p3

an object

Definition

USING: kernel math.vectors ;

IN: jamshred.oint

: half-way ( p1 p2 -- p3 ) over v- 2 v/n v+ ;