// Last edited on DATE TIME by USER
// Processed by remove-cam-lights

#include "eixos.inc"
#include "texturas.inc"
#include "camlight.inc"
#include "retalho.inc"

#declare chao =
  box{ <-20,-20,-1>, <+20,+20,0> }

#declare asa = box{<0,0,0>, <1,5,.25> texture{tx_fosca}
        rotate<0,0,30> translate<1,0,1>}

#local A23= <4,1,1.5>;

#local A32= <4.5,.25,.5>;
#local A33= <4,1,.5>;

#local A31= <A32.x,0,.5>;
#local A21= A31;
#local A22= A32;
#local A42= <A32.x,0,A32.z>;
#local A43= <A33.x,0,A33.z>;

#local A12= <A22.x,0,A22.z>;
#local A13= <A23.x,0,A23.z>;

#local B22= <1,1.5,2>;
#local B23= <2,1.5,2>;

#local B32= <1,2,0>;
#local B33= <2,2,0>;

#local B42= <B32.x,0,B32.z>;
#local B43= <B33.x,0,B33.z>;

#local B12= <B22.x,0,B22.z>;
#local B13= <B23.x,0,B23.z>;

#local C22= <-.5,1.5,2>;
#local C23= <-1,1,2>;
#local C24= <-1.5,.5,2>;

#local C32= <-.5,1.5,.25>;
#local C33= <-1,1,.5>;
#local C34= <-1.5,.5,1.5>;

#local C42= <C32.x,0,C32.z>;
#local C43= <C33.x,0,C33.z>;
#local C44= <C33.x,0,C33.z>;

#local C12= <C22.x,0,C22.z>;
#local C13= <C23.x,0,C23.z>;
#local C14= <C24.x,0,C24.z>;

#local B11= (B12+C12)/2;
#local C11= B11;

#local B21= (B22+C22)/2;
#local C21= B21;

#local B31= (B32+C32)/2;
#local C31= B31;

#local B41= (B42+C42)/2;
#local C41= B41;

#local B14= (B13+A13)/2;
#local A14= B14;

#local B24= (B23+A23)/2;
#local A24= B24;

#local B34=(B33+A33)/2;
#local A34= B34;

#local B44=(B43+A43)/2;
#local A44= B44;

#local A11= (A12+A21)/2;
#local A41= (A31+A42)/2;

#declare parteB =
retalho(B11,B12,B13,B14,
        B21,B22,B23,B24,
        B31,B32,B33,B34,
        B41,B42,B43,B44,
        0.000001,tx_fosca,tx_fosca
        )

#declare parteC =
retalho(C11,C12,C13,C14,
        C21,C22,C23,C24,
        C31,C32,C33,C34,
        C41,C42,C43,C44,
        0.000001,tx_fosca,tx_fosca
        )

#declare parteA =
retalho(A11,A12,A13,A14,
        A21,A22,A23,A24,
        A31,A32,A33,A34,
        A41,A42,A43,A44,
        0.0000002,tx_fosca,tx_fosca
        )

object{ chao  texture{ tx_xadrez } }
object{ eixos(3.00) }

object{parteB}
object{parteC}
object{parteA}

object{parteB scale<1,-1,1>}
object{parteC scale<1,-1,1>}
object{parteA scale<1,-1,1>}
object{asa}
object{asa scale<1,-1,1>}

#declare centro_cena = < 0.00, 0.00, 1.00 >;
#declare raio_cena = 7.0;
#declare dir_camera = < 14, 5, 4.00 >;
#declare dist_camera = 16.0;
#declare intens_luz = 1.00;
camlight(centro_cena, raio_cena, dir_camera, dist_camera , z, intens_luz)