2018-09-21 18:08:44 +02:00
|
|
|
using Test
|
2021-04-11 18:44:03 +02:00
|
|
|
import AbstractAlgebra
|
2018-07-30 08:30:27 +02:00
|
|
|
using Groups
|
2017-01-23 16:45:24 +01:00
|
|
|
|
2021-06-21 19:14:42 +02:00
|
|
|
import KnuthBendix: Word
|
2018-09-21 18:08:44 +02:00
|
|
|
|
2021-06-21 18:16:04 +02:00
|
|
|
using GroupsCore
|
|
|
|
include(joinpath(pathof(GroupsCore), "..", "..", "test", "conformance_test.jl"))
|
2019-06-30 19:55:56 +02:00
|
|
|
|
2021-06-21 18:16:04 +02:00
|
|
|
@testset "Groups" begin
|
2021-05-24 14:46:54 +02:00
|
|
|
|
2021-06-21 18:16:04 +02:00
|
|
|
@testset "wlmetric_ball" begin
|
|
|
|
M = AbstractAlgebra.MatrixAlgebra(AbstractAlgebra.zz, 3)
|
|
|
|
w = one(M); w[1,2] = 1;
|
|
|
|
r = one(M); r[2,3] = -3;
|
|
|
|
s = one(M); s[1,3] = 2; s[3,2] = -1;
|
2021-05-24 14:46:54 +02:00
|
|
|
|
2021-06-21 18:16:04 +02:00
|
|
|
S = [w,r,s]; S = unique([S; inv.(S)]);
|
|
|
|
_, sizes = Groups.wlmetric_ball(S, radius=4);
|
|
|
|
@test sizes == [7, 33, 141, 561]
|
|
|
|
_, sizes = Groups.wlmetric_ball_serial(S, radius=4);
|
|
|
|
@test sizes == [7, 33, 141, 561]
|
|
|
|
end
|
2021-05-24 15:35:28 +02:00
|
|
|
|
2021-06-21 18:16:04 +02:00
|
|
|
include("free_groups.jl")
|
|
|
|
include("fp_groups.jl")
|
2021-06-10 12:54:27 +02:00
|
|
|
|
2022-04-02 14:21:42 +02:00
|
|
|
include("matrix_groups.jl")
|
2021-06-21 18:16:04 +02:00
|
|
|
include("AutFn.jl")
|
2022-04-02 14:24:01 +02:00
|
|
|
|
|
|
|
include("homomorphisms.jl")
|
|
|
|
|
2021-07-07 10:41:34 +02:00
|
|
|
include("AutSigma_41.jl")
|
2021-08-13 16:20:31 +02:00
|
|
|
include("AutSigma3.jl")
|
2021-06-21 16:39:54 +02:00
|
|
|
|
2021-06-21 18:16:04 +02:00
|
|
|
# if !haskey(ENV, "CI")
|
|
|
|
# include("benchmarks.jl")
|
|
|
|
# end
|
2017-01-23 16:53:33 +01:00
|
|
|
end
|