// Exemplo de arquivo de descricao de cena para POV-ray
// Last edited on 2000-09-21 20:06:05 by stolfi


#include "colors.inc"
  camera {
    angle 15
    location <0,4, -25>
    look_at <2,2,0>
  }
  light_source { <10, 20, -10> color White }

#declare ponta1 =

difference{

blob {
    threshold .2
    sphere { <-.1,0,0>, 1.1, .4 pigment{Green}}
    cylinder { <.4,0,0>, <1,0,0>, 0.8, .4 texture{ normal {bumps 0.4 scale 0.05} pigment{Yellow}}}
    finish { phong 1 }
  }
sphere {<-.1,0,0>, .3 pigment{Orange}}
}

#declare ponta2 =

blob {
    threshold .2
    sphere { <-.1,0,0>, .7, 1 pigment{Yellow}}
    cylinder { <.5,0,0>, <1,0,0>, .8, .4     texture {normal { bumps 0.4 scale 0.05 }  pigment{ Green}}}
//    finish { phong 1 }
  }

#declare disco =

  sphere { <0, 0, 0>, 0.55
	scale <0.7,1,1>
    texture {
      normal { bumps 0.4 scale 0.05 }
      finish { phong 1}
    }
  }
#declare cabo =
	cylinder {<0,0,0>, <.3,0,0>, .05 pigment{Brown}}

#declare fruto =
merge
{
	object {ponta1}
	object {ponta2 scale<.8,.8,.8> rotate <0,0,210> translate<2.5,0.7,0>}
	object {disco rotate<0,0,6>translate <0.8,0,0> pigment{Yellow} }
	object {disco scale<0.95,.95,.95> rotate<0,0,12> translate <1.2,0.1,0> pigment{Green}}
	object {disco scale<0.9,.9,.9> rotate<0,0,18> translate <1.6,0.25,0> pigment{Yellow}}
	object {disco scale<0.8,.8,.8> rotate<0,0,24>translate <2,0.45,0> pigment{Green}}
	object {cabo rotate<0,0,30> translate <3,0.8,0>}
}

union
{
	object {fruto}
	difference{
	 	object {fruto translate<0,2.5,0>}
 	 	box {<-2,0,-3>,<0,4,4> pigment { color rgb<1,1,1,1>}}
		rotate <0,-45,0>
	}
}