From 98df554624976f60fe6cc1fa92a68411d50c0ff8 Mon Sep 17 00:00:00 2001
From: kalmarek <kalmar@amu.edu.pl>
Date: Thu, 4 Jan 2018 10:48:54 +0100
Subject: [PATCH] add leading "o" to groupname in Orbit.jl

---
 Orbit.jl   | 2 +-
 SAutFNs.jl | 2 +-
 SLNs.jl    | 8 ++++----
 3 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/Orbit.jl b/Orbit.jl
index c5accc2..1dce4cd 100644
--- a/Orbit.jl
+++ b/Orbit.jl
@@ -20,7 +20,7 @@ function main(GROUP, parsed_args)
    G, S = GROUP.generatingset(parsed_args)
    autS = GROUP.autS(parsed_args)
 
-   name = "$(name)_r$radius"
+   name = "o$(name)_r$radius"
    isdir(name) || mkdir(name)
 
    logger = PropertyT.setup_logging(joinpath(name, "$(upper_bound)"))
diff --git a/SAutFNs.jl b/SAutFNs.jl
index 32e0c6a..eac4f1f 100644
--- a/SAutFNs.jl
+++ b/SAutFNs.jl
@@ -75,6 +75,6 @@ function groupname(parsed_args)
    return groupname(N), N
 end
 
-groupname(N::Int) = "oSAutF$(N)"
+groupname(N::Int) = "SAutF$(N)"
 
 end # of module SAutFNs
diff --git a/SLNs.jl b/SLNs.jl
index d288505..2302294 100644
--- a/SLNs.jl
+++ b/SLNs.jl
@@ -108,15 +108,15 @@ function groupname(parsed_args)
    return groupname(N, p, X), N
 end
 
-function groupname(N, p=0, X=false)
+function groupname(N::Int, p::Int=0, X::Bool=false)
     if p == 0
        if X
-          name = "oSL$(N)Z⟨X⟩"
+          name = "SL$(N)Z⟨X⟩"
        else
-          name = "oSL$(N)Z"
+          name = "SL$(N)Z"
        end
     else
-       name = "oSL$(N)_$p"
+       name = "SL$(N)_$p"
     end
     return name
 end