//Dependencias
#declare bz_scale = 0.15;
#declare bz_name = "Asa Sujera"
#include "bz-things.inc"

//Cores
#declare cor_metalico = <0.4, 0.31, 0.25>;
#declare cor_cristal = <0.98, 0.98, 0.98, 0.9>;

#declare amarelo = 
  texture {
    pigment { color rgb < 1.00, 0.80, 0.10 > }
    finish { diffuse 0.5 specular 0.5 roughness 0.005 ambient 0.1 }
}

//Texturas
#declare tx_metalico = 
   texture {
     pigment { rgb cor_metalico }
     finish {
       ambient 0.05 diffuse 0.05 
       reflection cor_metalico
       specular 0.20 roughness 0.05
     }
   }
   
#declare tx_cristal = 
   texture {
     finish {
       ambient 0 diffuse 0 reflection 0.5
       refraction 0.85 ior 1.5 phong 0.3 phong_size 60 
       specular 1 roughness 0.001
     }
     pigment { color rgbf cor_cristal filter 1}
   }


////////////////////////////////////////
#declare superficie_asa =
#declare B11=<0,0,3>; #declare B12=<1,0,3>; //
#declare B13=<2,0,3>; #declare B14=<3,0,3>; // row 1

#declare B21=<0,-1,2>; #declare B22=<1,-1,2>; //
#declare B23=<2,-1,2>; #declare B24=<2,-1,2>; // row 2

#declare B31=<0,0,1>; #declare B32=<1,0,1>; //
#declare B33=<2,0,1>; #declare B34=<4,0,1>; // row 3

#declare B41=<0,0,0>; #declare B42=<1,0,0>; //
#declare B43=<2,0,0>; #declare B44=<3,0,0>; // row 4

bicubic_patch {
   type 1 flatness 0.001
   u_steps 4 v_steps 4
   uv_vectors
   <0,0> <1,0> <1,1> <0,1>
   B11, B12, B13, B14
   B21, B22, B23, B24
   B31, B32, B33, B34
   B41, B42, B43, B44
   uv_mapping
   no_shadow
}

////////////Trecho para mostrar os traços da superfície
/*#declare Points=array[16]{
   B11, B12, B13, B14
   B21, B22, B23, B24
   B31, B32, B33, B34
   B41, B42, B43, B44
}
#declare I=0;
#while (I<16)
   sphere {
      Points[I],0.1 
      no_shadow 
      pigment{
         #if (I=0|I=3|I=12|I=15)
            color rgb <1,0,0>
         #else
            color rgb <0,1,1>
         #end
      }
   }
   #declare I=I+1;
#end  
*/

// Aqui está a cena, finalmente:  

union {
  
  //object {bz_axes}
  object {bz_checker_bg}  

  //Parte esquerda
  object { //Parte superior
    superficie_asa
    texture {bz_tx_B}
  } 
  object {                //parte inferior
    superficie_asa
    scale <0,-1,0>
    texture {bz_tx_A}
  }
  
  //Parte direita
  object {//parte superior
    superficie_asa
    scale <-1,-1,0>
    texture {bz_tx_G}
  }
  object {//Parte inferior
    superficie_asa
    scale <-1,0,0>
    texture {bz_tx_F}
  }
 

}