// TWIST / A Candy '02.10
// By Tsutomu HIGO  E-mail: nj2t-hg@asahi-net.or.jp

#version 3.5;
global_settings {
  max_trace_level 5
  assumed_gamma 2.2
  }

#include "functions.inc"

isosurface {
  function {
    (cos(-pi*y/4)*x-sin(-pi*y/4)*z)*(cos(-pi*y/4)*x-sin(-pi*y/4)*z)+y*y/2
    +(sin(-pi*y/4)*x+cos(-pi*y/4)*z)*(sin(-pi*y/4)*x+cos(-pi*y/4)*z)*4-25
    }
  threshold 0
  contained_by { box {<-6, -10, -6>, <6, 10, 6>} }
  max_gradient 100
  texture {
    pigment { color rgbt <1,0.5,0.25,0.4> }
    finish {
      ambient 0.5
      reflection 0.5
      diffuse 0.3
      phong 0.3
      specular 1
      brilliance 1.5
      }
    }
  rotate x*60 rotate y*30
  no_shadow
  }

camera {
  location <100, 40, -100>
  angle 6
  look_at <0, 0, 0>
  }

light_source { <-1000, 1000, -1500> color rgb <1, 0.5, 0.8> }