#include "colors.inc"
#include "textures.inc"

camera {
location <2,7, -6>
look_at <0,-2,0>
angle 55}


light_source { <10,40,-2> color 1 }

plane {y,-2 pigment {Aquamarine}}

#macro Curva (S)
#declare X = (S*2-1)*3;
#declare Y = 1*sin(2*X);
#declare Z = 0;
<X,Y,Z>
#end

#declare M = 100;

#declare J = 0;
#while(J<M)
#declare S = J/(M-1);

#declare P = Curva (S);

sphere {P,0.1 texture {Silver_Metal}}

#declare J=J+1;
#end

#macro Asse (Dir, Col, R)
cylinder{<0,0,0>, 2*Dir, R pigment{Col} }
#end

Asse (x, Red, 0.02)
Asse (y, Green, 0.02)
Asse (z, Blue, 0.02)