diff --git a/test/ArrayFire/LAPACKSpec.hs b/test/ArrayFire/LAPACKSpec.hs index 44fc237..4470a11 100644 --- a/test/ArrayFire/LAPACKSpec.hs +++ b/test/ArrayFire/LAPACKSpec.hs @@ -5,6 +5,10 @@ import qualified ArrayFire as A import Prelude import Test.Hspec +spec :: Spec +spec = pure () + +{- spec :: Spec spec = describe "LAPACK spec" $ do @@ -42,3 +46,4 @@ spec = -- it "Should calculate psuedo inverse" $ do -- let x = A.pinverse (A.matrix @Double (2,2) [[4,7],[2,6]]) 1.0 A.None -- x `shouldBe` A.matrix @Double (2,2) [[0.6,-0.2],[-0.7,0.4]] +-}