// INT / Green '03.07
// By Tsutomu HIGO  URL: http://www.asahi-net.or.jp/~nj2t-hg/

#version 3.5;
global_settings {
  max_trace_level 3
  assumed_gamma 2.2
  }

camera {
  location <-3, 5, -6>
  look_at <0, -2, 0>
  angle 90
  }

light_source {<80, 75, -90> color rgb <1, 1, 1>}

isosurface {
  #declare R=1;
  function {
    (pow(x+0.15*sin(0.6*x+0.6*z)-x/(abs(x)+0.000001)*R*int(abs(x/R)+0.5),2)
    +pow(z+0.15*sin(0.6*x+0.6*z)-z/(abs(z)+0.000001)*R*int(abs(z/R)+0.5),2)
    +pow(y+0.2+1.8*cos(0.4*pow(x*x+z*z,0.5)),2)-0.04*cos(pi*pow(x*x+z*z,2)+pi))
    *(y+1*cos(0.4*pow(x*x+z*z,0.5)))
    -0.01
    }
  threshold 0
  max_gradient 20
  contained_by {box {<-8, -1.5, -9>, <10, 2.4, 10>}}
  open
  texture {
    pigment {color rgb <0.4, 0.8, 0.4>}
    finish {
      ambient 0.1
      diffuse 1
      reflection 0.2
      specular 2
      phong 1
      brilliance 1
      }
    }
  no_shadow
  }

background {color rgb <0.5, 0.8, 1>}