1. include "colors.inc"
2. include "textures.inc"
3. include "shapes.inc"
4. include "functions.inc"

 global_settings {
  assumed_gamma 1.5
  noise_generator 2

}

camera {

 location <0,0, -3>
 look_at <0,0,0>

}

1. declare normal_function= function {

// f_granite(x*3,y*3,z*3)/6 //*f_granite(x*10,y*10,z*10)/6 // *f_granite(x*30,y*30,z*30)/6

0.1+

f_wrinkles(x*3,y*3,z*3)/2 +f_granite(x*2,y*2,z*2)/6 +f_granite(x,y,z)/5 +f_granite(x*10,y*10,z*10)/10 +f_agate(x*100,y*100,z*100)/20

+f_wrinkles(x*1000,y*1000,z*1000)/40 

}

sphere { <0, 0, 0>, 1 // rotate <0,0,180> pigment{

function {normal_function(x,y,z) } //granite //wrinkles

//turbulence 0.1 scale 1
        color_map{

[0.000 color rgb <0,0,0>]

       [0.3 color rgb <.3,.3,.3>]
       [0.7 color rgb <1,0,0*1.5>]

[1.000 color rgb <1,1/2,0>*3] }

   }

normal { //granite

 function {normal_function(x,y,z)}

-0.1 //turbulence 0.2 scale 2 }

finish {

ambient 0.3 }

}

light_source { <100,0,-100>*1000*1000*100 color rgb <1,1,1> }