20 lines
497 B
OpenSCAD
20 lines
497 B
OpenSCAD
|
|
// Wake up sheeple. Halfspaces are just really BIG cubes!
|
|
include <./math.scad>
|
|
include <./common.scad>
|
|
|
|
module halfspace(vpos, p) {
|
|
// TODO: clean up
|
|
ref = [0,0,-1];
|
|
|
|
if (cross(ref, vpos) == [0,0,0]) {
|
|
translate(p)
|
|
translate(v=[0,0, (ref*vpos) * -inf/2])
|
|
cube(size=[inf, inf, inf], center=true);
|
|
} else {
|
|
translate(p)
|
|
align(a=ref, b = vpos)
|
|
translate(v = [0, 0, -inf/2])
|
|
cube(size = [inf, inf, inf], center = true);
|
|
}
|
|
} |