{-# LANGUAGE RankNTypes #-}
module Data.Array.Accelerate.Test.NoFib.Spectral (
test_spectral,
module Data.Array.Accelerate.Test.NoFib.Spectral.SMVM,
module Data.Array.Accelerate.Test.NoFib.Spectral.RadixSort,
module Data.Array.Accelerate.Test.NoFib.Spectral.BlackScholes,
) where
import Test.Tasty
import Data.Array.Accelerate.Test.NoFib.Base
import Data.Array.Accelerate.Test.NoFib.Spectral.SMVM
import Data.Array.Accelerate.Test.NoFib.Spectral.RadixSort
import Data.Array.Accelerate.Test.NoFib.Spectral.BlackScholes
test_spectral :: RunN -> TestTree
test_spectral runN =
testGroup "spectral"
[ test_blackscholes runN
, test_smvm runN
, test_radixsort runN
]