Grow and shrink
from sample125.tcl
Adapted from an openprocessing.org demo
Animation
