// Exercicio 5
// Last edited on 2001-07-31 14:04:32 by stolfi

#include "colors.inc"
#include "glass.inc"
background{ color rgb < 1.00, 1.00, 0.5 > }

light_source {
  < 24.00, 50.00, 30.00 >
  color rgb < 1.00, 1.00, 1.00 >
} 

camera {
  location  0.8*<  80.00, 80.00, 80.00 >
  right     < -0.80, 0.00, 0.00 >
  up        <  0.00, 0.60, 0.00 >
  sky       <  0.00, 1.00, 0.00 >
  look_at   <  20.00, 0.00, 0.00 >
} 
   
#declare A1 = <-20,0,0>
#declare A2 = <-20,1,1>
#declare A3 = <-20,1,2>
#declare A4 = <-20,0,4>
#declare A5 = <-12,0,0>
#declare A6 = <-12,0,1>
#declare A7 = <-12,0,2>
#declare A8 = <-12,0,3>
#declare A9 = <-6,0,0>
#declare A10 = <-6,0,2>
#declare A11 = <-6,0,4>
#declare A12 = <-6,0,6>
#declare A13 = <0,0,0>
#declare A14 = <0,0.5,6>
#declare A15 = <0,0.5,9>
#declare A16 = <0,0.5,12>

#declare B1 = <0,0,0>
#declare B2 = <0,0.5,6>
#declare B3 = <0,0.5,9>
#declare B4 = <0,0.5,12>
#declare B5 = <10,0,0>
#declare B6 = <10,1,5>
#declare B7 = <10,1,10>
#declare B8 = <10,0,15>
#declare B9 = <20,0,0>
#declare B10 = <20,1,4>
#declare B11 = <20,1,9>
#declare B12 = <20,0,21>
#declare B13 = <25,0,0>
#declare B14 = <25,1,7>
#declare B15 = <25,1,15>
#declare B16 = <25,0,28>
  
#declare C1 = <25,0,0>
#declare C2 = <25,1,7>
#declare C3 = <25,1,15>
#declare C4 = <25,0,28>
#declare C5 = <31,0,0>
#declare C6 = <31,0,8>
#declare C7 = <31,0,12>
#declare C8 = <31,0,32>
#declare C9 = <40,0,0>
#declare C10 = <40,1,6>
#declare C11 = <40,1,9>
#declare C12 = <40,0,30>
#declare C13 = <54,0,0>
#declare C14 = <54,0,0>
#declare C15 = <54,0,0>
#declare C16 = <54,0,0> 

#declare patchA =
bicubic_patch {
    type 1	
    flatness 0.01
    u_steps 5
    v_steps 5,	
    A1,A2,A3,A4,
    A5,A6,A7,A8,
    A9,A10,A11,A12,
    A13,A14,A15,A16
  }

#declare patchB =
bicubic_patch {
    type 1
    flatness 0.01
    u_steps 5
    v_steps 5,	
    B1,B2,B3,B4,
    B5,B6,B7,B8,
    B9,B10,B11,B12,
    B13,B14,B15,B16
}

#declare patchC =
bicubic_patch {
    type 1
    flatness 0.1
    u_steps 5
    v_steps 5,	
    C1,C2,C3,C4,
    C5,C6,C7,C8,
    C9,C10,C11,C12,
    C13,C14,C15,C16
  }

sphere { A1, 0.1 texture{ pigment{color rgb<1,0,0>}}
        }
sphere { A2, 0.1 texture{ pigment{color rgb<1,0,0>}}
        }
sphere { A3, 0.1 texture{ pigment{color rgb<1,0,0>}}
        }
sphere { A4, 0.1 texture{ pigment{color rgb<1,0,0>}}
        }
sphere { A5, 0.1 texture{ pigment{color rgb<1,0,0>}}
        }
sphere { A6, 0.1 texture{ pigment{color rgb<1,0,0>}}
        }
sphere { A7, 0.1 texture{ pigment{color rgb<1,0,0>}}
        }
sphere { A8, 0.1 texture{ pigment{color rgb<1,0,0>}}
        }
sphere { A9, 0.1 texture{ pigment{color rgb<1,0,0>}}
        }
sphere { A10, 0.1 texture{ pigment{color rgb<1,0,0>}}
        }
sphere { A11, 0.1 texture{ pigment{color rgb<1,0,0>}}
        }
sphere { A12, 0.1 texture{ pigment{color rgb<1,0,0>}}
        }
sphere { A13, 0.1 texture{ pigment{color rgb<1,0,0>}}
        }
sphere { A14, 0.1 texture{ pigment{color rgb<1,0,0>}}
        }
sphere { A15, 0.1 texture{ pigment{color rgb<1,0,0>}}
        }
sphere { A16, 0.1 texture{ pigment{color rgb<1,0,0>}}
        }

object {patchA
        texture { pigment {color rgb<0.5,1,0.5>}}
       scale<1,10,1>
        }
object {patchA
        texture { pigment {color rgb<0.5,1,0.5>}}
        scale<1,10,-1>
       }
object {patchB
        texture { pigment {color rgb<0.5,1,0.5>}}
        scale<1,10,1>
        }
object {patchB
        texture { pigment {color rgb<0.5,1,0.5>}}
        scale<1,10,-1>
        }
object {patchC
        texture { pigment {color rgb<0.5,1,0.5>}} 
        scale<1,10,1>
        }
object {patchC
        texture { pigment {color rgb<0.5,1,0.5>}}
        scale<1,10,-1>
        }
plane {y,-1.5
    pigment {checker Blue}
  }


// cylinder {<0, 0, 0>, <100, 0, 0>, 0.05 pigment { Red } }
// cylinder {<0, 0, 0>, <0, 100, 0>, 0.05 pigment { Green } }
// cylinder {<0, 0, 0>, <0, 0, 100>, 0.05 pigment { Blue } }