// Graphic Gallery CYBERBUST / POLARS No.2 '06.07
// by Tsutomu HIGO  URL: http://www.asahi-net.or.jp/~nj2t-hg/

#version 3.6;
global_settings {
  max_trace_level 6
  assumed_gamma 2.2
  }

camera {
  location <5, 16, -30>
  angle 44
  look_at <18, -19, -5>
  }

light_source { <200, 100, -300> color rgb <1.5, 0.5, 0.5> }

isosurface {
  function { pow(cos(3*atan(z/x))-x/2,2)+pow(sin(3*atan(z/x))
    -z/2,2)+pow(y,2)- 0.1*(1+cos(6*atan(z/x))) }
  contained_by { box { <1, -1, -3> < 3,  1,  3> } }
  accuracy 0.01
  max_gradient 3
  scale 10
  texture { pigment { color rgbt <0.7, 0.7, 0.5, 0.8> } }
  finish {
    ambient 0.5
    diffuse 0.3
    reflection 1
    specular 0.8
    phong 0.5
    brilliance 1
    }
  no_shadow
  rotate y*60
  }

background { color rgb <0.001, 0.01, 0.05> }