<segment> ( location forward up left number color radius -- segment )

Vocabulary

jamshred.tunnel

Inputs

location	an object
forward	an object
up	an object
left	an object
number	an object
color	an object
radius	an object

Outputs

segment

an object

Definition

USING: kernel ;

IN: jamshred.tunnel

: <segment>
    ( location forward up left number color radius -- segment )
    \ segment boa ; inline