chiark
/
gitweb
/
~ianmdlvl
/
reprap-play.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
poster-tube-lid: fix/tidy
[reprap-play.git]
/
warptest3.scad
1
// -*- C -*-
2
3
dy= 145;
4
dx= 65;
5
6
h1= 8;
7
h2= 14;
8
ratio = 0.8;
9
10
module Plan(){
11
polygon([[ -dx/2, 0 ],
12
[ 0, dy/2 ],
13
[ dx/2, 0 ],
14
[ 0, -dy/2 ]]);
15
}
16
17
module Solid(){
18
rotate([0,0, -45]) {
19
hull(){
20
linear_extrude(height= h1) {
21
Plan();
22
}
23
linear_extrude(height= h2) {
24
scale(ratio) Plan();
25
}
26
}
27
}
28
}
29
30
Solid();