From fad69acb2acafba95af8d0ad4ca5778fcb290b9e Mon Sep 17 00:00:00 2001
From: Justin Lin <caterpillar@openhome.cc>
Date: Tue, 30 Apr 2019 15:15:07 +0800
Subject: [PATCH] add m_shearing

---
 src/m_shearing.scad | 15 +++++++++++++++
 1 file changed, 15 insertions(+)
 create mode 100644 src/m_shearing.scad

diff --git a/src/m_shearing.scad b/src/m_shearing.scad
new file mode 100644
index 00000000..b4c07005
--- /dev/null
+++ b/src/m_shearing.scad
@@ -0,0 +1,15 @@
+function m_shearing(sx = [0, 0], sy = [0, 0], sz = [0, 0]) = 
+    let(
+        sx_along_y = sx[0],
+        sx_along_z = sx[1],
+        sy_along_x = sy[0],
+        sy_along_z = sy[1],
+        sz_along_x = sz[0],
+        sz_along_y = sz[1]  
+    )
+    [
+        [1, sx_along_y, sx_along_z, 0],
+        [sy_along_x, 1, sy_along_z, 0],
+        [sz_along_x, sz_along_y, 1, 0],
+        [0, 0, 0, 1]
+    ];
\ No newline at end of file