diff --git a/src/FPGroups.jl b/src/FPGroups.jl index 47e4e70..8d90af1 100644 --- a/src/FPGroups.jl +++ b/src/FPGroups.jl @@ -21,10 +21,12 @@ type FPGroup <: Group end end -# FPSymbol(x::String, G::Group) = FPSymbol(x,1,G) -# FPSymbol(s::GSymbol, G::Group) = FPSymbol(s.gen, s.pow, G) +FPSymbol(s::String) = FPSymbol(s,1) + +FPGroup(a::Vector{String}) = FPGroup([FPSymbol(i) for i in a], FPGroupElem[]) + end FPGroup() = FPGroup(Vector{FPSymbol}(), Vector{GWord{FPSymbol}}())