module Math.Test.TestAll where
import Math.Test.TGraph
import Math.Test.TDesign
import Math.Test.TPermutationGroup
import Math.Test.TSubquotients
import Math.Test.TFiniteGeometry
import Math.Test.TNonCommutativeAlgebra
import Math.Test.TField
import Math.Test.TRootSystem
import Math.Test.TCore.TField
import Math.Test.TCore.TUtils
import Math.Test.TAlgebras.TGroupAlgebra
import Math.Test.TAlgebras.TOctonions
import Math.Test.TAlgebras.TTensorAlgebra
import Math.Test.TAlgebras.TTensorProduct
import Math.Test.TCombinatorics.TCombinatorialHopfAlgebra
import Math.Test.TCombinatorics.TDigraph
import Math.Test.TCombinatorics.TFiniteGeometry
import Math.Test.TCombinatorics.TGraphAuts
import Math.Test.TCombinatorics.TIncidenceAlgebra
import Math.Test.TCombinatorics.TMatroid
import Math.Test.TCombinatorics.TPoset
import Math.Test.TCommutativeAlgebra.TPolynomial
import Math.Test.TCommutativeAlgebra.TGroebnerBasis
import Math.Test.TNumberTheory.TPrimeFactor
import Math.Test.TNumberTheory.TQuadraticField
import Math.Test.TProjects.TMiniquaternionGeometry
import Test.QuickCheck
import Test.HUnit
-- legacy tests - should really be converted to HUnit
testall = and
[Math.Test.TGraph.test
,Math.Test.TDesign.test
,Math.Test.TPermutationGroup.test
,Math.Test.TSubquotients.test
,Math.Test.TFiniteGeometry.test
,Math.Test.TField.test
,Math.Test.TRootSystem.test
]
quickCheckAll =
do
-- quickCheck prop_NonCommRingNPoly
quickCheckUtils
quickCheck prop_GroupPerm
quickCheckField
quickCheckTensorProduct
quickCheckGroupAlgebra
quickCheckTensorAlgebra
putStrLn "Testing Octonions..."
quickCheck prop_AlgebraNonAssociative_Octonions
quickCheck prop_InverseLoop_Octonions
putStrLn "Testing miniquaternion geometries..."
quickCheck prop_NearFieldF9
quickCheck prop_NearFieldJ9
quickCheckCombinatorialHopfAlgebra
hunitAll = runTestTT $ TestList [
testlistGroupAlgebra,
testlistCHA,
testlistDigraph,
testlistFiniteGeometry,
testlistGraphAuts,
testlistIncidenceAlgebra,
testlistMatroid,
testlistPoset,
testlistPolynomial,
testlistGroebnerBasis,
testlistPrimeFactor,
testlistQuadraticField
]