diff --git a/matlab/Q6_plication.m b/matlab/+pruned_SS/Q6_plication.m
similarity index 100%
rename from matlab/Q6_plication.m
rename to matlab/+pruned_SS/Q6_plication.m
diff --git a/matlab/allVL1.m b/matlab/+pruned_SS/allVL1.m
similarity index 100%
rename from matlab/allVL1.m
rename to matlab/+pruned_SS/allVL1.m
diff --git a/matlab/bivmom.m b/matlab/+pruned_SS/bivmom.m
similarity index 100%
rename from matlab/bivmom.m
rename to matlab/+pruned_SS/bivmom.m
diff --git a/matlab/prodmom.m b/matlab/+pruned_SS/prodmom.m
similarity index 97%
rename from matlab/prodmom.m
rename to matlab/+pruned_SS/prodmom.m
index f54e541d68dde8b5170046baad526e40986493de..ef42f6fe0b674ddb133cefc64965b38062dcdcc4 100644
--- a/matlab/prodmom.m
+++ b/matlab/+pruned_SS/prodmom.m
@@ -73,7 +73,7 @@ if m==2
         return
     end
    rho = V(1,2)/sqrt(V(1,1)*V(2,2));
-   y = V(1,1)^(nu(1)/2)*V(2,2)^(nu(2)/2)*bivmom(nu,rho);
+   y = V(1,1)^(nu(1)/2)*V(2,2)^(nu(2)/2)*pruned_SS.bivmom(nu,rho);
    return  
 end
 %
diff --git a/matlab/prodmom_deriv.m b/matlab/+pruned_SS/prodmom_deriv.m
similarity index 98%
rename from matlab/prodmom_deriv.m
rename to matlab/+pruned_SS/prodmom_deriv.m
index 2a2271c02b8f8041d9141e63f7a87a04d176f82e..7c7cd69706445790652d02a40b43322f6e48fd87 100644
--- a/matlab/prodmom_deriv.m
+++ b/matlab/+pruned_SS/prodmom_deriv.m
@@ -103,13 +103,13 @@ if m==2
     rho = V(1,2)/sqrt(V(1,1)*V(2,2));
     if nargout > 1
         drho = dC(ii(1),ii(2),:);
-        [tmp,dtmp] = bivmom(nu,rho);
+        [tmp,dtmp] = pruned_SS.bivmom(nu,rho);
         dy = (nu(1)/2)*V(1,1)^(nu(1)/2-1)*dV(1,1,:) * V(2,2)^(nu(2)/2) * tmp...
            + V(1,1)^(nu(1)/2) * (nu(2)/2)*V(2,2)^(nu(2)/2-1)*dV(2,2,:) * tmp...
            + V(1,1)^(nu(1)/2) * V(2,2)^(nu(2)/2) * dtmp * drho;
         dy = reshape(dy,1,size(dV,3));
     else
-        tmp = bivmom(nu,rho);
+        tmp = pruned_SS.bivmom(nu,rho);
     end
     y = V(1,1)^(nu(1)/2)*V(2,2)^(nu(2)/2)*tmp;
     return  
diff --git a/matlab/quadruplication.m b/matlab/+pruned_SS/quadruplication.m
similarity index 100%
rename from matlab/quadruplication.m
rename to matlab/+pruned_SS/quadruplication.m
diff --git a/matlab/pruned_state_space_system.m b/matlab/pruned_state_space_system.m
index 9c9005b409f5c27e2a566eb69c1e304dcb922745..85cb783388adb39893537e8cd485d555c158548a 100644
--- a/matlab/pruned_state_space_system.m
+++ b/matlab/pruned_state_space_system.m
@@ -421,8 +421,8 @@ if order > 1
     %Compute unique fourth order product moments of u, i.e. unique(E[kron(kron(kron(u,u),u),u)],'stable')
     u_nbr4    = u_nbr*(u_nbr+1)/2*(u_nbr+2)/3*(u_nbr+3)/4;
     if isempty(QPu)
-        QPu       = quadruplication(u_nbr);
-        COMBOS4   = flipud(allVL1(u_nbr, 4)); %all possible (unique) combinations of powers that sum up to four
+        QPu       = pruned_SS.quadruplication(u_nbr);
+        COMBOS4   = flipud(pruned_SS.allVL1(u_nbr, 4)); %all possible (unique) combinations of powers that sum up to four
     end
     E_u_u_u_u = zeros(u_nbr4,1); %only unique entries
     if compute_derivs && (stderrparam_nbr+corrparam_nbr>0)
@@ -430,9 +430,9 @@ if order > 1
     end
     for j4 = 1:size(COMBOS4,1)
         if compute_derivs && (stderrparam_nbr+corrparam_nbr>0)
-            [E_u_u_u_u(j4), dE_u_u_u_u(j4,:)] = prodmom_deriv(E_uu, 1:u_nbr, COMBOS4(j4,:), dE_uu(:,:,1:(stderrparam_nbr+corrparam_nbr)), dr.derivs.dCorrelation_matrix(:,:,1:(stderrparam_nbr+corrparam_nbr)));
+            [E_u_u_u_u(j4), dE_u_u_u_u(j4,:)] = pruned_SS.prodmom_deriv(E_uu, 1:u_nbr, COMBOS4(j4,:), dE_uu(:,:,1:(stderrparam_nbr+corrparam_nbr)), dr.derivs.dCorrelation_matrix(:,:,1:(stderrparam_nbr+corrparam_nbr)));
         else
-            E_u_u_u_u(j4) = prodmom(E_uu, 1:u_nbr, COMBOS4(j4,:));
+            E_u_u_u_u(j4) = pruned_SS.prodmom(E_uu, 1:u_nbr, COMBOS4(j4,:));
         end
     end
     E_xfxf_uu = kron(E_xfxf,E_uu');
@@ -667,8 +667,8 @@ if order > 1
         % Compute unique sixth-order product moments of u, i.e. unique(E[kron(kron(kron(kron(kron(u,u),u),u),u),u)],'stable')
         u_nbr6        = u_nbr*(u_nbr+1)/2*(u_nbr+2)/3*(u_nbr+3)/4*(u_nbr+4)/5*(u_nbr+5)/6;       
         if isempty(Q6Pu)
-            Q6Pu          = Q6_plication(u_nbr);
-            COMBOS6       = flipud(allVL1(u_nbr, 6)); %all possible (unique) combinations of powers that sum up to six
+            Q6Pu          = pruned_SS.Q6_plication(u_nbr);
+            COMBOS6       = flipud(pruned_SS.allVL1(u_nbr, 6)); %all possible (unique) combinations of powers that sum up to six
         end
         E_u_u_u_u_u_u = zeros(u_nbr6,1); %only unique entries
         if compute_derivs && (stderrparam_nbr+corrparam_nbr>0)
@@ -676,9 +676,9 @@ if order > 1
         end
         for j6 = 1:size(COMBOS6,1)
             if compute_derivs && (stderrparam_nbr+corrparam_nbr>0)
-                [E_u_u_u_u_u_u(j6), dE_u_u_u_u_u_u(j6,:)] = prodmom_deriv(E_uu, 1:u_nbr, COMBOS6(j6,:), dE_uu(:,:,1:(stderrparam_nbr+corrparam_nbr)), dr.derivs.dCorrelation_matrix(:,:,1:(stderrparam_nbr+corrparam_nbr)));
+                [E_u_u_u_u_u_u(j6), dE_u_u_u_u_u_u(j6,:)] = pruned_SS.prodmom_deriv(E_uu, 1:u_nbr, COMBOS6(j6,:), dE_uu(:,:,1:(stderrparam_nbr+corrparam_nbr)), dr.derivs.dCorrelation_matrix(:,:,1:(stderrparam_nbr+corrparam_nbr)));
             else
-                E_u_u_u_u_u_u(j6) = prodmom(E_uu, 1:u_nbr, COMBOS6(j6,:));
+                E_u_u_u_u_u_u(j6) = pruned_SS.prodmom(E_uu, 1:u_nbr, COMBOS6(j6,:));
             end
         end