
axfin=!item $axes of $finish_list
axfin=$(f_$axfin)
axeslen=1.4
axesend=1.45
coneend=1.35
axesrad=$0.015
charpos=-$axeslen
charwid=0.02
charsiz=0.12
charsix=0.08
conerad=$[$axesrad*3]
axesray=union {\
 cylinder {<-$axeslen,0,0> <$axeslen,0,0> $axesrad}\
 cylinder {<0,-$axeslen,0> <0,$axeslen,0> $axesrad}\
 cylinder {<0,0,-$axeslen> <0,0,$axeslen> $axesrad}\
 cone {<$axesend,0,0> 0 <$coneend,0,0> $conerad}\
 cone {<0,$axesend,0> 0 <0,$coneend,0> $conerad}\
 cone {<0,0,$axesend> 0 <0,0,$coneend> $conerad}\
 polygon {5 <$charpos,$charsix-$charwid,$charsiz> \
	<$charpos,$charsix+$charwid,$charsiz> \
	<$charpos,-$charsix+$charwid,-$charsiz> \
	<$charpos,-$charsix-$charwid,-$charsiz> \
	<$charpos,$charsix-$charwid,$charsiz> } \
 polygon {5 <$charpos,-$charsix-$charwid,$charsiz> \
	<$charpos,-$charsix+$charwid,$charsiz> \
	<$charpos,$charsix+$charwid,-$charsiz> \
	<$charpos,$charsix-$charwid,-$charsiz> \
	<$charpos,-$charsix-$charwid,$charsiz> } \
 polygon {10 <$charsix+$charwid,$charpos,$charsiz> \
	<$charsix-$charwid,$charpos,$charsiz> \
	<0,$charpos,$charwid*0.5> \
	<-$charsix+$charwid,$charpos,$charsiz> \
	<-$charsix-$charwid,$charpos,$charsiz> \
	<-$charwid*0.9,$charpos,-$charwid*1.5> \
	<-$charwid*0.9,$charpos,-$charsiz> \
	<$charwid*0.9,$charpos,-$charsiz> \
	<$charwid*0.9,$charpos,-$charwid*1.5> \
	<$charsix+$charwid,$charpos,$charsiz> } \
 pigment {color $c_white} finish {$axfin} $transform }

