rename main to compute_orbit_data

OrbitDecomposition.jl

@@ -249,10 +249,7 @@ function Uπ_matrices(P_matrices; orth=orthSVD)
     return U_p_matrices
 end
 
-function main(N::Int)
-   name = "test"
-   # SOutF$(N)_E4
-
+function compute_orbit_data(name::String, N::Int)
    isdir(name) || mkdir(name)
 
    SOutFN = AutGroup(FreeGroup(N), special=true, outer=true)
@@ -302,5 +299,3 @@ function main(N::Int)
 
    save(joinpath(name, "U_pis.jld"), "Uπs", Uπs, "dims", dimensions)
 end
-
-@time main(4)