From 5374999967ee546070ffa668a4a63d7917359302 Mon Sep 17 00:00:00 2001
From: Justin Lin <justin.sdk@gmail.com>
Date: Wed, 22 Sep 2021 16:39:04 +0800
Subject: [PATCH] add tetrahedron

---
 src/experimental/geom_tetrahedron.scad | 14 ++++++++++++++
 src/experimental/tetrahedron.scad      |  6 ++++++
 2 files changed, 20 insertions(+)
 create mode 100644 src/experimental/geom_tetrahedron.scad
 create mode 100644 src/experimental/tetrahedron.scad

diff --git a/src/experimental/geom_tetrahedron.scad b/src/experimental/geom_tetrahedron.scad
new file mode 100644
index 00000000..3e010475
--- /dev/null
+++ b/src/experimental/geom_tetrahedron.scad
@@ -0,0 +1,14 @@
+use <experimental/_impl/_geom_platonic_polyhedra.scad>;
+
+function geom_tetrahedron(radius, detail = 0, quick_mode = true) =
+    let(
+        t = (1 + sqrt(5)) / 2 ,
+        tetrahedron_points = [
+			[1, 1, 1], 	[-1, -1, 1], [-1, 1, -1], [1, -1, -1]
+		],
+        tetrahedron_faces = [
+			[0, 1, 2], [2, 3, 0], [0, 3, 1], [1, 3, 2]
+		]
+    )
+    _geom_platonic_polyhedra(tetrahedron_points, tetrahedron_faces, radius, detail, quick_mode);
+    
\ No newline at end of file
diff --git a/src/experimental/tetrahedron.scad b/src/experimental/tetrahedron.scad
new file mode 100644
index 00000000..e0096b60
--- /dev/null
+++ b/src/experimental/tetrahedron.scad
@@ -0,0 +1,6 @@
+use <experimental/geom_tetrahedron.scad>;
+
+module tetrahedron(radius, detail = 0, quick_mode = true) {
+	points_faces = geom_tetrahedron(radius, detail, quick_mode);
+    polyhedron(points_faces[0], points_faces[1]);
+} 
\ No newline at end of file