68cbe58 · laop · git.iko.soy

on master help sign in

Retrigger CI; Small suggestions of hlint

68cbe58Armando Santos6 years ago

test/Examples/Quantum.hs+1−1

@@ -21,7 +21,7 @@ cnot = kr fstM (fromF xor)

21ccnot :: (Num e, Ord e) => Matrix e ((Bool, Bool), Bool) ((Bool, Bool), Bool)

22ccnot = kr fstM (fromF f)

23 where

24− f = xor . (tp (uncurry (&&)) id)

24+ f = xor . tp (uncurry (&&)) id

25 tp f g (a,b) = (f a, g b)

27had :: Matrix (Complex Double) Bool Bool

test/Examples/Readme.hs−1

@@ -1,7 +1,6 @@

1{-# LANGUAGE GADTs #-}

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE FlexibleContexts #-}

4−{-# LANGUAGE TypeOperators #-}

5{-# LANGUAGE TypeApplications #-}

4{-# LANGUAGE TypeApplications #-}

6{-# LANGUAGE DataKinds #-}

5{-# LANGUAGE DataKinds #-}