add external constructors for SAut i SL

groups/autfreegroup.jl

@@ -1,9 +1,10 @@
 struct SpecialAutomorphismGroup{N} <: SymmetrizedGroup
     group::AutGroup
+end
 
-    function SpecialAutomorphismGroup(args::Dict)
-        return new{args["SAut"]}(AutGroup(FreeGroup(N), special=true))
-    end
+function SpecialAutomorphismGroup(args::Dict)
+    N = args["SAut"]
+    return SpecialAutomorphismGroup{N}(AutGroup(FreeGroup(N), special=true))
 end
 
 name(G::SpecialAutomorphismGroup{N}) where N = "SAutF$(N)"

groups/speciallinear.jl

@@ -2,20 +2,20 @@ struct SpecialLinearGroup{N} <: SymmetrizedGroup
     group::AbstractAlgebra.Group
     p::Int
     X::Bool
+end
 
-    function SpecialLinearGroup(args::Dict)
-        N = args["SL"]
-        p = args["p"]
-        X = args["X"]
+function SpecialLinearGroup(args::Dict)
+    N = args["SL"]
+    p = args["p"]
+    X = args["X"]
 
-        if p == 0
-            G = MatrixSpace(Nemo.ZZ, N, N)
-        else
-            R = Nemo.NmodRing(UInt(p))
-            G = MatrixSpace(R, N, N)
-        end
-        return new{N}(G, p, X)
+    if p == 0
+        G = MatrixSpace(Nemo.ZZ, N, N)
+    else
+        R = Nemo.NmodRing(UInt(p))
+        G = MatrixSpace(R, N, N)
     end
+    return SpecialLinearGroup{N}(G, p, X)
 end
 
 function name(G::SpecialLinearGroup{N}) where N