kalmar/Groups.jl
1
0
Fork 0
mirror of https://github.com/kalmarek/Groups.jl.git synced 2024-11-19 06:30:29 +01:00
Code Issues Releases Wiki Activity

the new definition of FPGroup <: Group

Browse Source
This commit is contained in:
kalmar 2017-05-11 18:16:21 +02:00
parent de6f6bc52d
commit 6a29797557
1 changed files with 12 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
src/FPGroups.jl
View File

@ -7,22 +7,24 @@ end
typealias FPGroupElem GWord{FPSymbol}
type FPGroup <: Group
gens::Vector{FPSymbol}
rels::Vector{FPGroupElem}
# order::Vector{T}
# fastmult_table::Array{Int,2}
function FPGroup{T<:GSymbol}(gens::Vector{T}, rels::Vector{GWord{T}})
G = new(gens, rels)
G.gens = gens
rels = [G(r) for r in rels]
G.rels = rels
return G
end
end
# FPSymbol(x::String, G::Group) = FPSymbol(x,1,G)
# FPSymbol(s::GSymbol, G::Group) = FPSymbol(s.gen, s.pow, G)
immutable FPGroup <: Group
gens::Vector{FPSymbol}
rels::Vector{FPGroupElem}
# order::Vector{T}
# fast_multable::Array{Int,2}
function FPGroup{T<:GSymbol}(gens::Vector{T}, rels::GWord{T})
G = new()
gens = [FPSymbol{G}(g.gen, G) for g in gens]
rels = []
end
end
FPGroup() = FPGroup(Vector{FPSymbol}(), Vector{GWord{FPSymbol}}())