/* --------------------------
Entry: 0004
WWW: http://artcomp1.tripod.com
Title: Protoplasm
Author: Charles McChesney
---------------------------*/

// Protoplasm
// date   April 9, 2004
//--------------------------------------------------------------------------
#version 3.5;
global_settings {  assumed_gamma 1.0 }
//--------------------------------------------------------------------------
#declare fraccol = 
   material  
   {   
      texture
      {      
         pigment
         {
            pigment_pattern
            {
                  julia <0.0, 0.0> , 25 
                  exponent 2
                  exterior 1 , 1.0 
                  interior 0 , 1.0 
                  color_map
                  {
                     [ 0.0     rgbft <0.866667, 0.439216, 0.376471, 0.208333, 0.208333> ]
                     [ 1.0     rgbft <0.980392, 0.937255, 0.447059, 0.145833, 0.166667> ]
                  }
            }
            pigment_map
            {
               [0.0   
                  gradient z
                  color_map
                  {
                     [ 0.0     rgbft <1.0, 1.0, 0.501961, 0.0, 0.0> ]
                     [ 1.0     rgbft <1.0, 0.501961, 0.501961, 0.0, 0.0> ]
                  }
               ]
               [1.0   
                  agate
                  agate_turb 1.0
                  color_map
                  {
                     [ 0.0     rgbft <0.227451, 0.980392, 0.286275, 0.552067, 0.531233> ]
                     [ 1.0     rgbft <0.956863, 0.2, 0.34902, 0.3229, 0.364567> ]
                  }
               ]
            }
         }      
         normal
         {
            julia <0.0, 0.0> , 25 , 0.5 
            exponent 2
            exterior 1 , 1.0 
            interior 0 , 1.0 
         }      
         finish
         {
            ambient 0.479833
            brilliance 1.578667
            phong 0.4748
            phong_size 13.906667
            specular 0.2374
            conserve_energy
            reflection
            {
               0.1 , 0.5
               fresnel  on
               falloff  1.0
               exponent 1.0
               metallic 1.0
            }
            irid
            {
               0.2
               thickness 0.5
               turbulence <1.0, 1.0, 1.0>               
            }  } }
        interior
      {
         ior 1.223
         caustics 1.0
         dispersion 1.0
         dispersion_samples  7
         fade_distance 10.0
         fade_power 2.0
         fade_color rgbft <0.956863, 0.17647, 0.407843, 0.979, 3.54>
      }}
      
   
camera {     // diagonal view
                            location  <0 , 2 ,-1>
                            look_at   <5 , .2 , 0.0>}
// sun ---------------------------------------------------------------------
light_source{<0,25,-25> color rgb <1,1,1>}
// sky ---------------------------------------------------------------------
plane{<0,1,0>,1 hollow  
       texture{pigment{ bozo turbulence 0.1 scale 4.50 translate<5,0,0>
                        color_map { [0.05 rgb <0.20, 0.40, 1.0>]
                                    [0.6 rgb <1,1,1,.3> ]
                                    [1.0 rgb <0.4,0.4,0.4,.1>]}
                       }
               finish {ambient 1 diffuse 0} }      
       scale 10}
//------------------------------
fog{distance 1000 color rgb<.1,.9,.5>}
// sea ---------------------------------------------------------------------
plane{<0,1,0>, 0 
       texture{pigment {color rgb <0.94, 0.93, 0.80> }
               normal {crackle 0.2 scale 1/4 turbulence 0.5 } 
               finish {ambient 0.15 diffuse 0.6 reflection 0.70}}}
object{julia_fractal {
  <-0.63,0.20,-0.53,-.8>
   quaternion
   cube
  // TYPE: sqr | cube | exp | reciprocal | sin | asin | sinh | asinh | cos | acos |
       //       cosh | acosh | tan | atan | tanh | atanh | log | pwr( X_Val, Y_Val )
  max_iteration 6.5
  precision 40
  slice  <0,0,0,1>, -.4
 
material{fraccol }
  
   rotate <60,20,0>
    translate <4.5,1.3,0>
    } }