attachment:gridhex1.pov of IRfilter

   1 // gridhex1.pov
   2 // 2013 Aug 28
   3 
   4 // hex grid in XZ plane, dimensions microns
   5 
   6 #include "colors.inc"
   7 #include "textures.inc"
   8 
   9 #declare  spc = 3.0 ;
  10 #declare  wid = 0.3 ;
  11 #declare  thk = 0.5 ;
  12 #declare  nmx = 1.0 ;
  13 #declare  nmz = 2.0 ;
  14 
  15 #declare  dx  = spc * 0.75 ;
  16 #declare  dz  = spc * sqrt( 3.0 ) / 4.0 ;
  17 #declare  hz  = dz   - wid/2.0       ;
  18 #declare  hx0 = 0.50*spc - wid/sqrt(3.0) ;
  19 #declare  hx1 = 0.25*spc - wid/sqrt(3.0) ;
  20 
  21 #declare  x0 = 0.99*0.50*spc ;
  22 #declare  x1 = 0.99*0.25*spc ;
  23 #declare  z1 = 0.99*dz ;
  24 
  25 light_source { < 1000, 6000, 1000> color rgb 1.0 }
  26 # camera { angle 30.0  location <5,20,-7> look_at <0.5*dx,0,-0.1*dz> sky z  }
  27 
  28 // hole cut from plane
  29 #declare hexhole = prism{ conic_sweep linear_spline 1, 0, 7,
  30     < x0,0>, < x1,z1>, < -x1,z1>, < -x0,0>, < -x1, -z1>, < x1,-z1>, < x0,0>
  31     scale < 1, 4, 1 >
  32     translate < 0, -3.4, 0 >
  33 }
  34 
  35 difference {
  36   box { < -29, thk, -29 >, <29,-1,29 > }
  37   union { 
  38     #declare nx = -nmx ;
  39     #while(  nx <  nmx + 1 ) 
  40       #declare nz = -nmz ;
  41       #while(  nz <  nmz + 1 ) 
  42          object { hexhole translate < (2*nx+0)*dx , 0, (2*nz+0)*dz > }
  43          object { hexhole translate < (2*nx+1)*dx , 0, (2*nz+1)*dz > }
  44          #declare nz = nz + 1 ;
  45        #end
  46        #declare nx = nx + 1 ;
  47      #end
  48   } 
  49   pigment { White }
  50   // texture { Aluminum }
  51 }
  52 box { < -29, 0, -29 >, <29,-5,29 >   pigment { Gray10 } }