diff --git a/src/m_scaling.scad b/src/m_scaling.scad
index 8bfe1f40..d362d7e0 100644
--- a/src/m_scaling.scad
+++ b/src/m_scaling.scad
@@ -1,5 +1,12 @@
+function _to_vect(s) =
+     len(s) == 3 ? s : (
+         len(s) == 2 ? [s[0], s[1], 1] : (
+             len(s) == 1 ? [s[0], 1, 1] : [s, s, s]
+         ) 
+     );
+
 function m_scaling(s) = 
-    let(v = len(s) == 3 ? s : [s, s, s])
+    let(v = _to_vect(s))
     [
         [v[0], 0, 0, 0],
         [0, v[1], 0, 0],