brompton-computer-guard.scad

   1 // -*- C -*-
   2
   3 arch_height = 24;
   4 arch_width = 75;
   5 end_width = 25;
   6
   7 arch_thick = 5;
   8
   9 // computed
  10
  11 arch_alpha = atan(arch_height / (arch_width/2));
  12 arch_beta = 2*arch_alpha;
  13 echo(arch_alpha,arch_beta);
  14 arch_in_rad = arch_width/2 / sin(arch_beta);
  15 arch_to_chord = arch_in_rad * cos(arch_beta);
  16
  17 //arch_to_chord = (arch_width/2)*(arch_width/2)/arch_height;
  18 //arch_in_rad = arch_to_chord + arch_height;
  19 //arch_in_rad2 = sqrt(arch_to_chord*arch_to_chord +
  20 //                  (arch_width/2)*(arch_width/2));
  21
  22 //echo(arch_in_rad, arch_in_rad2);
  23
  24 module ArchProfile(){
  25   intersection(){
  26     translate([-200,0])
  27       square([400,200]);
  28     translate([0,-arch_to_chord]){
  29       difference(){
  30         circle(arch_in_rad + arch_thick, $fa=0.1);
  31         circle(arch_in_rad, $fa=0.1);
  32       }
  33     }
  34   }
  35   %square([arch_width/2,arch_height]);
  36 }
  37
  38 ArchProfile();