#
# Arguments to gensup1a.sh:
# 1:name 2:base_material 3:top_material
#

genworm $2 {$1}a "0" "0.1+1.5*t" "1-.5*sin(2.9*(t))" "0.10-0.04*t" 12 | xform -ry 0
genworm $2 {$1}a "0" "0.1+1.5*t" "1-.5*sin(2.9*(t))" "0.10-0.04*t" 12 | xform -ry 120
genworm $2 {$1}a "0" "0.1+1.5*t" "1-.5*sin(2.9*(t))" "0.10-0.04*t" 12 | xform -ry 240

genworm $2 {$1}t "0.35*cos(2*PI*t)+0.15*sin(4*PI*(t+0.25))" "0" "0.35*sin(2*PI*t)+0.15*cos(4*PI*(t+0.25))" "0.07" 36 | xform -t 0 0.95 0

echo $3 sphere {$1}ball
echo 0
echo 0
echo 4 0 2.64 0 1.3