camera {location <-16,4,0>
        look_at  <0,0,0>}

light_source {<-4,12,0> rgb <1,1,1>}
light_source {<-4,-12,0> rgb <1,1,1>}
light_source {<-4,2,-10> rgb <1,1,1>}
light_source {<-4,2,100> rgb <1,1,1>}


#declare rseed = seed(643568734);

//+++++++++ red blood cell declaration ++++++++++++++++++++++++++++++++++++

#declare red_cell = object{
lathe {
cubic_spline
12,
<0.000, 0.410>,
<0.000, 0.410>,
<1.200, 0.335>,
<2.475, 0.035>,
<3.300, 0.185>,
<3.600, 0.635>,
<3.600, 1.235>,
<3.300, 1.685>,
<2.400, 1.835>,
<1.200, 1.535>,
<0.000, 1.460>,
<0.000, 1.460>

pigment {rgb <1,0,0>}
finish {phong 0.3 ambient 0.2 }}
};

//+++++++++++ random placing of 20 blood cells +++++++++++++++


#declare i = 0;

#while (i < 20)
  object{ red_cell 
     translate <rand(rseed)*10,rand(rseed)*10, rand(rseed)*10>
	 rotate    <360*rand(rseed),360*rand(rseed),360*rand(rseed)>}
  #declare i = i + 1;
#end;