#!/bin/awk -f

BEGIN	{
	KY = 3.31
	print "/* DO NOT EDIT BY HAND, BASTARD !*/"
	print "#declare Sonic = object\n{"
	print "union {"
	}

# --------------------------------------------

	{
	IDX = $1 * 0.42
	R = 0.5 + 0.45*sin(IDX)
	G = 0.1
	B = 0.5 + 0.45*cos(IDX)
	color = sprintf("pigment { color rgb <%f, %f, %f> }", R, G, B)
	printf "sphere { <%f, %f, %f>, R_Sonic*2.3  %s}\n",
			  $2, $3*KY, $4, color
	printf "cylinder { <%f, %f, %f>, <%f, %f, %f>, R_Sonic %s}\n",
			  $2, $3*KY, $4,  $5, $6*KY, $7, color
	printf "sphere { <%f, %f, %f>, R_Sonic*1.9 %s}\n",
			  $5, $6*KY, $7, color
	}

# --------------------------------------------

END	{
	print  "}   /* end of union */"
	print  "}   /* end of object */"
	}