Random Shapes
from sample113.tcl
random shapes based on Perlin-noise variations
See also