diff --git a/src/polytransversals.scad b/src/polytransversals.scad new file mode 100644 index 00000000..51f0f3e6 --- /dev/null +++ b/src/polytransversals.scad @@ -0,0 +1,13 @@ +module polytransversals(transversals) { + module two_transversals(trans1, trans2) { + leng_trans2 = len(trans2); + polygon(concat( + trans1, + [for(i = [0:leng_trans2 - 1]) trans2[leng_trans2 - 1 - i]] + )); + } + + for(i = [0:len(transversals) - 2]) { + two_transversals(transversals[i], transversals[i + 1]); + } +} \ No newline at end of file