wine-vacuum-adapter.scad

   1 // -*- C -*-
   2
   3 india_nom = 27.0;
   4 india_slop = 0.63;
   5
   6 middia_nom = 31.0;
   7 middia_slop = 0.10;
   8
   9 outdia = 44.0;
  10
  11 htop = 5;
  12 hbot = 7;
  13
  14 $fa=3;
  15 $fs=0.1;
  16
  17 // calculated
  18
  19 india_use = india_nom + india_slop;
  20 middia_use = middia_nom - middia_slop;
  21
  22 echo("MIN WALL", (middia_use - india_use)/2);
  23
  24 module Plan() {
  25   polygon([[ india_use/2,    -hbot ],
  26            [ outdia/2,       -hbot ],
  27            [ outdia/2,       0     ],
  28            [ middia_use/2,   0     ],
  29            [ middia_use/2,   htop  ],
  30            [ india_use/2,    htop  ]]);
  31 }
  32
  33 module Adapter(){
  34   rotate_extrude(convexity=5)
  35     Plan();
  36 }
  37
  38 Adapter();