// RONDO / Rondo03 '02.09
// By Tsutomu HIGO  E-mail: nj2t-hg@asahi-net.or.jp

#version 3.5;
global_settings {
  max_trace_level 3
  assumed_gamma 2.2
  }

#include "functions.inc"

union{
  #declare I=0; #while (I<36)
    isosurface {
      function {
        (z-3*sin(0.5*y))*(z-3*sin(0.5*y))
        +(x-0.2*sin(3*pow(y,0.6)))*(x-0.2*sin(3*pow(y,0.6)))
        -0.11+0.09*pow(y,0.1+0.005*sin(6*pi*I/36))
        }
      threshold 0
      contained_by { box {<-0.4, 0, -3.1>, <0.4, 10, 3.2>} }
      max_gradient 10
      rotate x*-90
      translate y*3.2
      rotate <0, 0, I*10>
      }
  #declare I=I+1; #end
  texture {
    pigment {color rgb <0.9, 0.95, 1>}
    finish {
      ambient 0.35
      diffuse 0.7
      reflection 0
      brilliance 0.7
      }
    }
  rotate x*70
  no_shadow
  }

camera {
  location <0, 0, -18>
  angle 45
  look_at <0, 3.5, 0>
  }

light_source { <500,500,-1500> color rgb 1 }

background { color rgb <0.05, 0.1, 0.2> }