eval-curve ( base-values control-points -- value )

Vocabulary

nurbs

Inputs

base-values	an object
control-points	an object

Outputs

value

an object

Definition

USING: math.vectors math.vectors.homogeneous sequences ;

IN: nurbs

: eval-curve ( base-values control-points -- value )
    [ n*v ] 2map { 0.0 0.0 0.0 } [ v+ ] binary-reduce h>v ;