refactor

src/matrix/_impl/_m_scaling_impl.scad

@@ -5,7 +5,7 @@ function __m_scaling_to_3_elems_scaling_vect(s) =
 
 function __m_scaling_to_scaling_vect(s) = is_num(s) ? [s, s, s] : __m_scaling_to_3_elems_scaling_vect(s);
 
-function __m_scaling(s) = 
+function _m_scaling_impl(s) = 
     let(v = __m_scaling_to_scaling_vect(s))
     [
         [v[0], 0, 0, 0],

src/matrix/_impl/_m_shearing_impl.scad

@@ -1,4 +1,4 @@
-function __m_shearing(sx, sy, sz) = 
+function _m_shearing_impl(sx, sy, sz) = 
     let(
         sx_along_y = sx[0],
         sx_along_z = sx[1],

src/matrix/m_scaling.scad

@@ -8,6 +8,6 @@
 *
 **/
 
-use <matrix/__comm__/__m_scaling.scad>;
+use <matrix/_impl/_m_scaling_impl.scad>;
 
-function m_scaling(s) = __m_scaling(s);
+function m_scaling(s) = _m_scaling_impl(s);

src/matrix/m_shearing.scad

@@ -8,6 +8,6 @@
 *
 **/
 
-use <matrix/__comm__/__m_shearing.scad>;
+use <matrix/_impl/_m_shearing_impl.scad>;
 
-function m_shearing(sx = [0, 0], sy = [0, 0], sz = [0, 0]) = __m_shearing(sx, sy, sz);
+function m_shearing(sx = [0, 0], sy = [0, 0], sz = [0, 0]) = _m_shearing_impl(sx, sy, sz);