// Persistence Of Vision raytracer version 3.0 sample file.
// POV-Ray 3.0 sample data file by Dieter Bayer, Nov. 1994
// This scene shows a number of cylindrical superellipsoids.

#version 3.0
global_settings { assumed_gamma 2.2 }

camera {
  orthographic
  location <0, 0, -10>
  right 15 * 4/3 * x
  up 15 * y
  look_at <0, 0, 0>
}

light_source { <50, 50, -100> color red 0.7 green 0.7 blue 0.7 }
light_source { <0, 0, -10000> color red 0.7 green 0.7 blue 0.7 }

plane { <0, 0, 1>, 2
  pigment { checker color red 0 green 1 blue 0 color red 0 green 0 blue 1 }
  finish { ambient 0.1 diffuse 0.4 }
}

#declare Row1 = +5
#declare Row2 =  0
#declare Row3 = -5
#declare Col1 = -5
#declare Col2 =  0
#declare Col3 = +5

#declare Tex = 
texture {
  pigment { color red 1 green 0 blue 0 } 
  finish { ambient 0.2 diffuse 0.4 phong 0.5 phong_size 5 }
}

superellipsoid { <1.0, 0.9> rotate <-105, 30, 0> translate <Col1, Row1, 0> texture { Tex } }
superellipsoid { <1.0, 0.8> rotate <-105, 30, 0> translate <Col2, Row1, 0> texture { Tex } }
superellipsoid { <1.0, 0.7> rotate <-105, 30, 0> translate <Col3, Row1, 0> texture { Tex } }
superellipsoid { <1.0, 0.6> rotate <-105, 30, 0> translate <Col1, Row2, 0> texture { Tex } }
superellipsoid { <1.0, 0.5> rotate <-105, 30, 0> translate <Col2, Row2, 0> texture { Tex } }
superellipsoid { <1.0, 0.4> rotate <-105, 30, 0> translate <Col3, Row2, 0> texture { Tex } }
superellipsoid { <1.0, 0.3> rotate <-105, 30, 0> translate <Col1, Row3, 0> texture { Tex } }
superellipsoid { <1.0, 0.2> rotate <-105, 0, 0> rotate <0, 30, 0> translate <Col2, Row3, 0> texture { Tex } }
superellipsoid { <1.0, 0.1> rotate <0, 30, 0> rotate <-105, 0, 0> translate <Col3, Row3, 0> texture { Tex } }

