constructors

This commit is contained in:
kalmar 2017-05-11 18:16:51 +02:00
parent 6a29797557
commit 2d72393292
1 changed files with 4 additions and 2 deletions

View File

@ -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}}())