iterate-system ( GADGET -- )


Vocabulary
L-system

Inputs
GADGETan object


Outputs
None

Definition
USING: accessors math ;

IN: L-system

:: iterate-system ( GADGET -- )
GADGET pedestal>> 0.5 + GADGET pedestal<< ;