// http://xahlee.org/3d/index.html

// illustrating conics sections
// 2008-02-07

#include "colors.inc"

#declare redBulb = sphere { <0,0,0>, .1 texture {pigment{color Red} finish {ambient .8 diffuse .6}} }
#declare blueBulb = sphere { <0,0,0>, .1 texture {pigment{color Blue} finish {ambient .8 diffuse .6}} }
#declare greenBulb = sphere { <0,0,0>, .1 texture {pigment{color Green} finish {ambient .8 diffuse .6}} }

light_source { <0,-2,-3> color White looks_like { redBulb } } // above ball
//light_source { <0,1.3,-2> color White looks_like { greenBulb } } // level with ball
light_source { <0,1.1,-1> color White looks_like { blueBulb } } // below ball

//global_settings { ambient_light rgb <.5,.5,.5> }
camera { location <5,1,-3>*1.5 look_at <0,-.5,0> sky <0,0,-1>}

sphere {< 0,0,-1>, 1 texture{pigment{color Gray} } finish{ reflection 1 roughness .8} }
//sphere {< 0,0,-1>, 1 texture{pigment{color Red filter .6 transmit .8} } interior{ior 2.4} }
//sphere {< 0,0,-1>, 1 texture{pigment{color Red filter .6 transmit .8} finish{ reflection 1} } }

plane { <0,0,-1>, 0
  pigment {
    checker color White, color Gray
  }
}