From 6a59c53c8f59b46aad324d30b3b1cc2803a909a4 Mon Sep 17 00:00:00 2001
From: kalmarek <kalmar@amu.edu.pl>
Date: Sat, 17 Mar 2018 05:01:21 +0100
Subject: [PATCH] add domain field to AutGroup

---
 src/AutGroup.jl | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/src/AutGroup.jl b/src/AutGroup.jl
index f9b4b9a..bb70ce7 100644
--- a/src/AutGroup.jl
+++ b/src/AutGroup.jl
@@ -32,9 +32,10 @@ end
 
 AutGroupElem = GWord{AutSymbol}
 
-mutable struct AutGroup <: AbstractFPGroup
+mutable struct AutGroup{N} <: AbstractFPGroup
    objectGroup::Group
    gens::Vector{AutSymbol}
+   domain::NTuple{N, FreeGroupElem}
 end
 
 export AutGroupElem, AutGroup
@@ -144,7 +145,7 @@ function AutGroup(G::FreeGroup; special=false)
       append!(S, [flips; syms])
 
    end
-   return AutGroup(G, S)
+   return AutGroup{n}(G, S, NTuple{n, FreeGroupElem}(G.(G.gens)))
 end
 
 ###############################################################################