// INQUIRE / HOLE '99.10
// By Tsutomu HIGO  E-mail: nj2t-hg@asahi-net.or.jp

#version 3.1
global_settings { assumed_gamma 2.2 }

#declare B = 2.2;
/*00x4       01x3y      02x3  z    03x3       04x2 y2 
  05x2y z    06x2y      07x2  z2   08x2  z    09x2    
  10x y3     11x y2z    12xy2      13x y z2   14x y z 
  16x y      16x   z3   17x   z2   18x   z    19x     
  21  y4     21  y3z    22 y3      23  y2z2   24  y2z 
  25  y2     26  y z3   27 y z2    28  y z    29  y   
  30    z4   31    z3   32   z2    33    z    34      */
quartic { <1,0,0,0,2,0,0,2,0,42, 0,0,0,0,0,0,0,0,0,0, 1,0,0,2,0,-58,B,0,0,0, 1,0,-58,50*B,441>
  bounded_by { box {<-100, -100, -100> <100, 100, 100>} }             
  pigment {crackle
    color_map{
      [0 color rgbt <1,0,0,0>]
      [0.01 color rgbt <0,1,0,0.2>]
      [1 color rgbt <1,0.9,0.7,0>]
      }
    rotate <30,90,75>
    translate <30,100,0>
    scale 8
    }
  no_shadow
  scale 20
  rotate <60,90,0>
  }

camera {
  location <15, 100, 50>
  look_at <-30, 0, 0>
  angle 140
  }

light_source { <-120, 380, -60> color rgb <1,1,1> }

background { color rgb <5,0,0> }