openscad/dotSCAD
1
0
Fork 0
mirror of https://github.com/JustinSDK/dotSCAD.git synced 2025-08-16 19:54:29 +02:00
Code Issues Releases Wiki Activity

add m_shearing

Browse Source
This commit is contained in:
Justin Lin
2019-04-30 15:15:07 +08:00
parent f60d1558ce
commit fad69acb2a
1 changed files with 15 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
src/m_shearing.scad Normal file
View File

@@ -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]
];