move-f ( edge: b-edge offset: point -- )

Vocabulary

euler.operators

Inputs

edge	a b-edge
offset	a point

Outputs

None

Definition

USING: accessors game.models.half-edge kernel math.vectors typed
;

IN: euler.operators

TYPED: move-f ( edge: b-edge offset: point -- )
    [ v+ ] curry [ [ vertex>> ] ] dip
    [ change-position drop ] curry compose each-face-edge ;