build devShells.x86_64-linux.ghc967
1740.12 s
[extra] [ 8 of 22] Compiling Data.Version.Extra ( src/Data/Version/Extra.hs, dist/build/Data/Version/Extra.p_o )
1740.25 s
[extra] [ 9 of 22] Compiling Data.List.NonEmpty.Extra ( src/Data/List/NonEmpty/Extra.hs, dist/build/Data/List/NonEmpty/Extra.p_o )
1740.33 s
[extra] [10 of 22] Compiling Data.Either.Extra ( src/Data/Either/Extra.hs, dist/build/Data/Either/Extra.p_o )
1740.33 s
[extra] [11 of 22] Compiling Control.Exception.Extra ( src/Control/Exception/Extra.hs, dist/build/Control/Exception/Extra.p_o )
1740.33 s
[extra] [12 of 22] Compiling Control.Monad.Extra ( src/Control/Monad/Extra.hs, dist/build/Control/Monad/Extra.p_o )
1740.47 s
[haskell-language-server] [1 of 2] Compiling Ide.Plugin.GHC ( plugins/hls-gadt-plugin/src/Ide/Plugin/GHC.hs, dist/build/hls-gadt-plugin/Ide/Plugin/GHC.p_o )
1740.59 s
[extra] [13 of 22] Compiling Data.Foldable.Extra ( src/Data/Foldable/Extra.hs, dist/build/Data/Foldable/Extra.p_o )
1740.75 s
[extra] [14 of 22] Compiling Control.Concurrent.Extra ( src/Control/Concurrent/Extra.hs, dist/build/Control/Concurrent/Extra.p_o )
1740.89 s
[extra] [15 of 22] Compiling System.Directory.Extra ( src/System/Directory/Extra.hs, dist/build/System/Directory/Extra.p_o )
1740.89 s
[extra] [16 of 22] Compiling System.Environment.Extra ( src/System/Environment/Extra.hs, dist/build/System/Environment/Extra.p_o )
1740.89 s
[extra] [17 of 22] Compiling System.IO.Extra ( src/System/IO/Extra.hs, dist/build/System/IO/Extra.p_o )
1741.12 s
[extra] [18 of 22] Compiling System.Info.Extra ( src/System/Info/Extra.hs, dist/build/System/Info/Extra.p_o )
1741.12 s
[extra] [19 of 22] Compiling System.Process.Extra ( src/System/Process/Extra.hs, dist/build/System/Process/Extra.p_o )
1741.23 s
[extra] [20 of 22] Compiling System.Time.Extra ( src/System/Time/Extra.hs, dist/build/System/Time/Extra.p_o )
1741.23 s
[extra] [21 of 22] Compiling Extra ( src/Extra.hs, dist/build/Extra.p_o )
1741.28 s
[haskell-language-server] [2 of 2] Compiling Ide.Plugin.GADT ( plugins/hls-gadt-plugin/src/Ide/Plugin/GADT.hs, dist/build/hls-gadt-plugin/Ide/Plugin/GADT.p_o )
1741.36 s
[extra] [22 of 22] Compiling Text.Read.Extra ( src/Text/Read/Extra.hs, dist/build/Text/Read/Extra.p_o )
1742.48 s
[extra] Preprocessing test suite 'extra-test' for extra-1.8.1..
1742.48 s
[extra] Building test suite 'extra-test' for extra-1.8.1..
1742.54 s
[extra] [1 of 4] Compiling TestUtil ( test/TestUtil.hs, dist/build/extra-test/extra-test-tmp/TestUtil.o )
1742.83 s
[extra] [2 of 4] Compiling TestGen ( test/TestGen.hs, dist/build/extra-test/extra-test-tmp/TestGen.o )
1744.26 s
[extra] [3 of 4] Compiling TestCustom ( test/TestCustom.hs, dist/build/extra-test/extra-test-tmp/TestCustom.o )
1744.26 s
[extra] [4 of 4] Compiling Test ( test/Test.hs, dist/build/extra-test/extra-test-tmp/Test.o )
1744.51 s
[extra] [5 of 5] Linking dist/build/extra-test/extra-test
1745.17 s
[extra] Phase: checkPhase
1745.19 s
[extra] Running 1 test suites...
1745.19 s
[extra] Test suite extra-test: RUNNING...
1745.20 s
[extra] withTempFile
1745.20 s
[extra] +++ OK, passed 100 tests.
1745.20 s
[extra] captureOutput
1745.20 s
[extra] +++ OK, passed 100 tests.
1745.20 s
[extra] \(x :: IO Int) -> void (once x) == pure ()
1745.23 s
[extra] +++ OK, passed 100 tests.
1745.23 s
[extra] \(x :: IO Int) -> join (once x) == x
1745.25 s
[extra] +++ OK, passed 100 tests.
1745.25 s
[extra] \(x :: IO Int) -> (do y <- once x; y; y) == x
1745.27 s
[extra] +++ OK, passed 100 tests.
1745.27 s
[extra] \(x :: IO Int) -> (do y <- once x; y ||| y) == x
1745.30 s
[extra] +++ OK, passed 100 tests.
1745.30 s
[extra] \(x :: IO Int) -> join (onceFork x) == x
1745.33 s
[extra] +++ OK, passed 100 tests.
1745.33 s
[extra] \(x :: IO Int) -> (do a <- onceFork x; a; a) == x
1745.35 s
[extra] +++ OK, passed 100 tests.
1745.35 s
[extra] stringException "test" == pure "test"
1745.35 s
[extra] +++ OK, passed 100 tests.
1745.35 s
[extra] stringException ("test" ++ undefined) == pure "test<Exception>"
1745.35 s
[extra] +++ OK, passed 100 tests.
1745.35 s
[extra] stringException ("test" ++ undefined ++ "hello") == pure "test<Exception>"
1745.35 s
[extra] +++ OK, passed 100 tests.
1745.35 s
[extra] stringException ['t','e','s','t',undefined] == pure "test<Exception>"
1745.36 s
[extra] +++ OK, passed 100 tests.
1745.36 s
[extra] ignore (print 1) == print 1
1745.36 s
[extra] +++ OK, passed 100 tests.
1745.36 s
[extra] ignore (fail "die") == pure ()
1745.36 s
[extra] +++ OK, passed 100 tests.
1745.36 s
[extra] catch (errorIO "Hello") (\(ErrorCall x) -> pure x) == pure "Hello"
1745.36 s
[extra] +++ OK, passed 100 tests.
1745.36 s
[extra] seq (errorIO "foo") (print 1) == print 1
1745.36 s
[extra] +++ OK, passed 100 tests.
1745.36 s
[extra] catch (assertIO True >> pure 1) (\(x :: AssertionFailed) -> pure 2) == pure 1
1745.36 s
[extra] +++ OK, passed 100 tests.
1745.36 s
[extra] seq (assertIO False) (print 1) == print 1
1745.36 s
[extra] +++ OK, passed 100 tests.
1745.36 s
[extra] retry 1 (print "x") == print "x"
1745.36 s
[extra] +++ OK, passed 100 tests.
1745.36 s
[extra] retry 3 (fail "die") == fail "die"
1745.36 s
[extra] +++ OK, passed 100 tests.
1745.36 s
[extra] whenJust Nothing print == pure ()
1745.36 s
[extra] +++ OK, passed 100 tests.
1745.36 s
[extra] whenJust (Just 1) print == print 1
1745.36 s
[extra] +++ OK, passed 100 tests.
1745.36 s
[extra] pureIf @Maybe True 5 == Just 5
1745.36 s
[extra] +++ OK, passed 100 tests.
1745.36 s
[extra] pureIf @Maybe False 5 == Nothing
1745.36 s
[extra] +++ OK, passed 100 tests.
1745.36 s
[extra] pureIf @[] True 5 == [5]
1745.36 s
[extra] +++ OK, passed 100 tests.
1745.36 s
[extra] pureIf @[] False 5 == []
1745.36 s
[extra] +++ OK, passed 100 tests.
1745.36 s
[extra] whenMaybe True (print 1) == fmap Just (print 1)
1745.36 s
[extra] +++ OK, passed 100 tests.
1745.36 s
[extra] whenMaybe False (print 1) == pure Nothing
1745.36 s
[extra] +++ OK, passed 100 tests.
1745.36 s
[extra] \(x :: Maybe ()) -> unit x == x
1745.36 s
[extra] +++ OK, passed 100 tests.
1745.36 s
[extra] guarded even 2 == [2]
1745.36 s
[extra] +++ OK, passed 100 tests.
1745.36 s
[extra] guarded odd 2 == Nothing
1745.36 s
[extra] +++ OK, passed 100 tests.
1745.36 s
[extra] guarded (not.null) "My Name" == Just "My Name"
1745.36 s
[extra] +++ OK, passed 100 tests.
1745.36 s
[extra] guardedA (return . even) 42 == Just [42]
1745.36 s
[extra] +++ OK, passed 100 tests.
1745.36 s
[extra] guardedA (return . odd) 42 == Just []
1745.36 s
[extra] +++ OK, passed 100 tests.
1745.36 s
[extra] guardedA (const Nothing) 42 == (Nothing :: Maybe [Int])
1745.36 s
[extra] +++ OK, passed 100 tests.
1745.36 s
[extra] fold1M (\x y -> Just x) [] == undefined
1745.36 s
[extra] +++ OK, passed 100 tests.
1745.36 s
[extra] fold1M (\x y -> Just $ x + y) [1, 2, 3] == Just 6
1745.36 s
[extra] +++ OK, passed 100 tests.
1745.36 s
[extra] partitionM (Just . even) [1,2,3] == Just ([2], [1,3])
1745.36 s
[extra] +++ OK, passed 100 tests.
1745.36 s
[extra] partitionM (const Nothing) [1,2,3] == Nothing
1745.36 s
[extra] +++ OK, passed 100 tests.
1745.36 s
[extra] loop (\x -> if x < 10 then Left $ x * 2 else Right $ show x) 1 == "16"
1745.36 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] Just True ||^ undefined == Just True
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] Just False ||^ Just True == Just True
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] Just False ||^ Just False == Just False
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] Just False &&^ undefined == Just False
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] Just True &&^ Just True == Just True
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] Just True &&^ Just False == Just False
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] anyM Just [False,True ,undefined] == Just True
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] anyM Just [False,False,undefined] == undefined
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] \(f :: Int -> Maybe Bool) xs -> anyM f xs == orM (map f xs)
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] allM Just [True,False,undefined] == Just False
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] allM Just [True,True ,undefined] == undefined
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] \(f :: Int -> Maybe Bool) xs -> anyM f xs == orM (map f xs)
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] orM [Just False,Just True ,undefined] == Just True
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] orM [Just False,Just False,undefined] == undefined
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] \xs -> Just (or xs) == orM (map Just xs)
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] andM [Just True,Just False,undefined] == Just False
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] andM [Just True,Just True ,undefined] == undefined
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] \xs -> Just (and xs) == andM (map Just xs)
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] findM (Just . isUpper) "teST" == Just (Just 'S')
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] findM (Just . isUpper) "test" == Just Nothing
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] findM (Just . const True) ["x",undefined] == Just (Just "x")
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] fromLeft 1 (Left 3) == 3
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] fromLeft 1 (Right "foo") == 1
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] fromRight 1 (Right 3) == 3
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] fromRight 1 (Left "foo") == 1
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] \x -> fromLeft' (Left x) == x
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] \x -> fromLeft' (Right x) == undefined
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] \x -> fromRight' (Right x) == x
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] \x -> fromRight' (Left x) == undefined
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] \x -> fromEither (Left x ) == x
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] \x -> fromEither (Right x) == x
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] \a b -> maybeToEither a (Just b) == Right b
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] \a -> maybeToEither a Nothing == Left a
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] \x -> eitherToMaybe (Left x) == Nothing
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] \x -> eitherToMaybe (Right x) == Just x
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] mapLeft show (Left 1) == Left "1"
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] mapLeft show (Right True) == Right True
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] mapRight show (Left 1) == Left 1
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] mapRight show (Right True) == Right "True"
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] \xs -> repeatedly (splitAt 3) xs == chunksOf 3 xs
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] \xs -> repeatedly word1 (trim xs) == words xs
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] \xs -> repeatedly line1 xs == lines xs
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] disjoint [1,2,3] [4,5] == True
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] disjoint [1,2,3] [4,1] == False
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] disjointOrd [1,2,3] [4,5] == True
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] disjointOrd [1,2,3] [4,1] == False
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] disjointOrdBy (compare `on` (`mod` 7)) [1,2,3] [4,5] == True
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] disjointOrdBy (compare `on` (`mod` 7)) [1,2,3] [4,8] == False
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] anySame [1,1,2] == True
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] anySame [1,2,3] == False
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] anySame (1:2:1:undefined) == True
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.37 s
[extra] anySame [] == False
1745.37 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] \xs -> anySame xs == (length (nub xs) < length xs)
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] allSame [1,1,2] == False
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] allSame [1,1,1] == True
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] allSame [1] == True
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] allSame [] == True
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] allSame (1:1:2:undefined) == False
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] \xs -> allSame xs == (length (nub xs) <= 1)
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] headDef 1 [] == 1
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] headDef 1 [2,3,4] == 2
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] \x xs -> headDef x xs == fromMaybe x (listToMaybe xs)
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] lastDef 1 [] == 1
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] lastDef 1 [2,3,4] == 4
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] \x xs -> lastDef x xs == last (x:xs)
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] [2,3,4] !? 1 == Just 3
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] [2,3,4] !? (-1) == Nothing
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] [] !? 0 == Nothing
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] notNull [] == False
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] notNull [1] == True
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] \xs -> notNull xs == not (null xs)
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] list 1 (\v _ -> v - 2) [5,6,7] == 3
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] list 1 (\v _ -> v - 2) [] == 1
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] \nil cons xs -> maybe nil (uncurry cons) (uncons xs) == list nil cons xs
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] unsnoc "test" == Just ("tes",'t')
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] unsnoc "" == Nothing
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] \xs -> unsnoc xs == if null xs then Nothing else Just (init xs, last xs)
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] cons 't' "est" == "test"
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] \x xs -> uncons (cons x xs) == Just (x,xs)
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] snoc "tes" 't' == "test"
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] \xs x -> unsnoc (snoc xs x) == Just (xs,x)
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] enumerate == [False, True]
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] takeEnd 3 "hello" == "llo"
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] takeEnd 5 "bye" == "bye"
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] takeEnd (-1) "bye" == ""
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] \i xs -> takeEnd i xs `isSuffixOf` xs
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] \i xs -> length (takeEnd i xs) == min (max 0 i) (length xs)
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] dropEnd 3 "hello" == "he"
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] dropEnd 5 "bye" == ""
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] dropEnd (-1) "bye" == "bye"
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] \i xs -> dropEnd i xs `isPrefixOf` xs
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] \i xs -> length (dropEnd i xs) == max 0 (length xs - max 0 i)
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] \i -> take 3 (dropEnd 5 [i..]) == take 3 [i..]
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] splitAtEnd 3 "hello" == ("he","llo")
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] splitAtEnd 3 "he" == ("", "he")
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] \i xs -> uncurry (++) (splitAt i xs) == xs
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] \i xs -> splitAtEnd i xs == (dropEnd i xs, takeEnd i xs)
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] \i xs -> zip [i..] xs == zipFrom i xs
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] zipFrom False [1..3] == [(False,1),(True, 2)]
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] \i xs -> zipWithFrom (,) i xs == zipFrom i xs
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] concatUnzip [("a","AB"),("bc","C")] == ("abc","ABC")
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] concatUnzip3 [("a","AB",""),("bc","C","123")] == ("abc","ABC","123")
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] takeWhileEnd even [2,3,4,6] == [4,6]
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] trim " hello " == "hello"
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] trimStart " hello " == "hello "
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] trimEnd " hello " == " hello"
1745.38 s
[extra] +++ OK, passed 100 tests.
1745.38 s
[extra] \s -> trim s == trimEnd (trimStart s)
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] lower "This is A TEST" == "this is a test"
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] lower "" == ""
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] upper "This is A TEST" == "THIS IS A TEST"
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] upper "" == ""
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] word1 "" == ("", "")
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] word1 "keyword rest of string" == ("keyword","rest of string")
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] word1 " keyword\n rest of string" == ("keyword","rest of string")
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] \s -> fst (word1 s) == concat (take 1 $ words s)
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] \s -> words (snd $ word1 s) == drop 1 (words s)
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] line1 "" == ("", "")
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] line1 "test" == ("test","")
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] line1 "test\n" == ("test","")
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] line1 "test\nrest" == ("test","rest")
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] line1 "test\nrest\nmore" == ("test","rest\nmore")
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] escapeHTML "this is a test" == "this is a test"
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] escapeHTML "<b>\"g&t\"</n>" == "<b>"g&t"</n>"
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] escapeHTML "t'was another test" == "t'was another test"
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] \xs -> unescapeHTML (escapeHTML xs) == xs
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] escapeJSON "this is a test" == "this is a test"
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] escapeJSON "\ttab\nnewline\\" == "\\ttab\\nnewline\\\\"
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] escapeJSON "\ESC[0mHello" == "\\u001b[0mHello"
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] \xs -> unescapeJSON (escapeJSON xs) == xs
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] groupOn abs [1,-1,2] == [[1,-1], [2]]
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] groupOnKey abs [1,-1,2] == [(1, [1,-1]), (2, [2])]
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] maximumOn id [] == undefined
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] maximumOn length ["test","extra","a"] == "extra"
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] minimumOn id [] == undefined
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] minimumOn length ["test","extra","a"] == "a"
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] groupSort [(1,'t'),(3,'t'),(2,'e'),(2,'s')] == [(1,"t"),(2,"es"),(3,"t")]
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] \xs -> map fst (groupSort xs) == sort (nub (map fst xs))
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] \xs -> concatMap snd (groupSort xs) == map snd (sortOn fst xs)
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] groupSortOn length ["test","of","sized","item"] == [["of"],["test","item"],["sized"]]
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] groupSortBy (compare `on` length) ["test","of","sized","item"] == [["of"],["test","item"],["sized"]]
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] sum' [1, 2, 3] == 6
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] sumOn' read ["1", "2", "3"] == 6
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] product' [1, 2, 4] == 8
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] productOn' read ["1", "2", "4"] == 8
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] merge "ace" "bd" == "abcde"
1745.39 s
[extra] +++ OK, passed 100 tests.
1745.39 s
[extra] \xs ys -> merge (sort xs) (sort ys) == sort (xs ++ ys)
1745.40 s
[extra] +++ OK, passed 100 tests.
1745.40 s
[extra] replace "el" "_" "Hello Bella" == "H_lo B_la"
1745.40 s
[extra] +++ OK, passed 100 tests.
1745.40 s
[extra] replace "el" "e" "Hello" == "Helo"
1745.40 s
[extra] +++ OK, passed 100 tests.
1745.40 s
[extra] replace "" "x" "Hello" == "xHxexlxlxox"
1745.40 s
[extra] +++ OK, passed 100 tests.
1745.40 s
[extra] replace "" "x" "" == "x"
1745.40 s
[extra] +++ OK, passed 100 tests.
1745.40 s
[extra] \xs ys -> replace xs xs ys == ys
1745.40 s
[extra] +++ OK, passed 100 tests.
1745.40 s
[extra] breakEnd isLower "youRE" == ("you","RE")
1745.40 s
[extra] +++ OK, passed 100 tests.
1745.40 s
[extra] breakEnd isLower "youre" == ("youre","")
1745.40 s
[extra] +++ OK, passed 100 tests.
1745.40 s
[extra] breakEnd isLower "YOURE" == ("","YOURE")
1745.40 s
[extra] +++ OK, passed 100 tests.
1745.40 s
[extra] \f xs -> breakEnd (not . f) xs == spanEnd f xs
1745.40 s
[extra] +++ OK, passed 100 tests.
1745.40 s
[extra] spanEnd isUpper "youRE" == ("you","RE")
1745.40 s
[extra] +++ OK, passed 100 tests.
1745.40 s
[extra] spanEnd (not . isSpace) "x y z" == ("x y ","z")
1745.40 s
[extra] +++ OK, passed 100 tests.
1745.40 s
[extra] \f xs -> uncurry (++) (spanEnd f xs) == xs
1745.40 s
[extra] +++ OK, passed 100 tests.
1745.40 s
[extra] \f xs -> spanEnd f xs == swap (both reverse (span f (reverse xs)))
1745.40 s
[extra] +++ OK, passed 100 tests.
1745.40 s
[extra] wordsBy (== ':') "::xyz:abc::123::" == ["xyz","abc","123"]
1745.40 s
[extra] +++ OK, passed 100 tests.
1745.40 s
[extra] \s -> wordsBy isSpace s == words s
1745.40 s
[extra] +++ OK, passed 100 tests.
1745.40 s
[extra] linesBy (== ':') "::xyz:abc::123::" == ["","","xyz","abc","","123",""]
1745.40 s
[extra] +++ OK, passed 100 tests.
1745.40 s
[extra] \s -> linesBy (== '\n') s == lines s
1745.40 s
[extra] +++ OK, passed 100 tests.
1745.40 s
[extra] linesBy (== ';') "my;list;here;" == ["my","list","here"]
1745.40 s
[extra] +++ OK, passed 100 tests.
1745.40 s
[extra] firstJust id [Nothing,Just 3] == Just 3
1745.40 s
[extra] +++ OK, passed 100 tests.
1745.40 s
[extra] firstJust id [Nothing,Nothing] == Nothing
1745.40 s
[extra] +++ OK, passed 100 tests.
1745.40 s
[extra] drop1 "" == ""
1745.40 s
[extra] +++ OK, passed 100 tests.
1745.40 s
[extra] drop1 "test" == "est"
1745.40 s
[extra] +++ OK, passed 100 tests.
1745.40 s
[extra] \xs -> drop 1 xs == drop1 xs
1745.40 s
[extra] +++ OK, passed 100 tests.
1745.40 s
[extra] dropEnd1 "" == ""
1745.40 s
[extra] +++ OK, passed 100 tests.
1745.40 s
[extra] dropEnd1 "test" == "tes"
1745.40 s
[extra] +++ OK, passed 100 tests.
1745.40 s
[extra] \xs -> dropEnd 1 xs == dropEnd1 xs
1745.40 s
[extra] +++ OK, passed 100 tests.
1745.40 s
[extra] mconcatMap Sum [1,2,3] == Sum 6
1745.40 s
[extra] +++ OK, passed 100 tests.
1745.40 s
[extra] \f xs -> mconcatMap f xs == concatMap f xs
1745.41 s
[extra] +++ OK, passed 100 tests.
1745.41 s
[extra] breakOn "::" "a::b::c" == ("a", "::b::c")
1745.41 s
[extra] +++ OK, passed 100 tests.
1745.41 s
[extra] breakOn "/" "foobar" == ("foobar", "")
1745.41 s
[extra] +++ OK, passed 100 tests.
1745.41 s
[extra] \needle haystack -> let (prefix,match) = breakOn needle haystack in prefix ++ match == haystack
1745.41 s
[extra] +++ OK, passed 100 tests.
1745.41 s
[extra] breakOnEnd "::" "a::b::c" == ("a::b::", "c")
1745.41 s
[extra] +++ OK, passed 100 tests.
1745.41 s
[extra] splitOn "\r\n" "a\r\nb\r\nd\r\ne" == ["a","b","d","e"]
1745.41 s
[extra] +++ OK, passed 100 tests.
1745.41 s
[extra] splitOn "aaa" "aaaXaaaXaaaXaaa" == ["","X","X","X",""]
1745.41 s
[extra] +++ OK, passed 100 tests.
1745.41 s
[extra] splitOn "x" "x" == ["",""]
1745.41 s
[extra] +++ OK, passed 100 tests.
1745.41 s
[extra] splitOn "x" "" == [""]
1745.41 s
[extra] +++ OK, passed 100 tests.
1745.41 s
[extra] \s x -> s /= "" ==> intercalate s (splitOn s x) == x
1745.41 s
[extra] +++ OK, passed 100 tests; 15 discarded.
1745.41 s
[extra] \c x -> splitOn [c] x == split (==c) x
1745.42 s
[extra] +++ OK, passed 100 tests.
1745.42 s
[extra] split (== 'a') "aabbaca" == ["","","bb","c",""]
1745.42 s
[extra] +++ OK, passed 100 tests.
1745.42 s
[extra] split (== 'a') "" == [""]
1745.42 s
[extra] +++ OK, passed 100 tests.
1745.42 s
[extra] split (== ':') "::xyz:abc::123::" == ["","","xyz","abc","","123","",""]
1745.42 s
[extra] +++ OK, passed 100 tests.
1745.42 s
[extra] split (== ',') "my,list,here" == ["my","list","here"]
1745.42 s
[extra] +++ OK, passed 100 tests.
1745.42 s
[extra] dropWhileEnd isSpace "ab cde " == "ab cde"
1745.42 s
[extra] +++ OK, passed 100 tests.
1745.42 s
[extra] dropWhileEnd' isSpace "ab cde " == "ab cde"
1745.42 s
[extra] +++ OK, passed 100 tests.
1745.42 s
[extra] last (dropWhileEnd even [undefined,3]) == undefined
1745.42 s
[extra] +++ OK, passed 100 tests.
1745.42 s
[extra] last (dropWhileEnd' even [undefined,3]) == 3
1745.42 s
[extra] +++ OK, passed 100 tests.
1745.42 s
[extra] head (dropWhileEnd even (3:undefined)) == 3
1745.42 s
[extra] +++ OK, passed 100 tests.
1745.42 s
[extra] head (dropWhileEnd' even (3:undefined)) == undefined
1745.42 s
[extra] +++ OK, passed 100 tests.
1745.42 s
[extra] dropPrefix "Mr. " "Mr. Men" == "Men"
1745.42 s
[extra] +++ OK, passed 100 tests.
1745.42 s
[extra] dropPrefix "Mr. " "Dr. Men" == "Dr. Men"
1745.42 s
[extra] +++ OK, passed 100 tests.
1745.42 s
[extra] dropSuffix "!" "Hello World!" == "Hello World"
1745.42 s
[extra] +++ OK, passed 100 tests.
1745.42 s
[extra] dropSuffix "!" "Hello World!!" == "Hello World!"
1745.42 s
[extra] +++ OK, passed 100 tests.
1745.42 s
[extra] dropSuffix "!" "Hello World." == "Hello World."
1745.42 s
[extra] +++ OK, passed 100 tests.
1745.42 s
[extra] stripSuffix "bar" "foobar" == Just "foo"
1745.42 s
[extra] +++ OK, passed 100 tests.
1745.42 s
[extra] stripSuffix "" "baz" == Just "baz"
1745.42 s
[extra] +++ OK, passed 100 tests.
1745.42 s
[extra] stripSuffix "foo" "quux" == Nothing
1745.42 s
[extra] +++ OK, passed 100 tests.
1745.42 s
[extra] stripInfix "::" "a::b::c" == Just ("a", "b::c")
1745.42 s
[extra] +++ OK, passed 100 tests.
1745.42 s
[extra] stripInfix "/" "foobar" == Nothing
1745.42 s
[extra] +++ OK, passed 100 tests.
1745.42 s
[extra] stripInfixEnd "::" "a::b::c" == Just ("a::b", "c")
1745.42 s
[extra] +++ OK, passed 100 tests.
1745.42 s
[extra] chunksOf 3 "my test" == ["my ","tes","t"]
1745.42 s
[extra] +++ OK, passed 100 tests.
1745.42 s
[extra] chunksOf 3 "mytest" == ["myt","est"]
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] chunksOf 8 "" == []
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] chunksOf 0 "test" == undefined
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] nubSort "this is a test" == " aehist"
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] \xs -> nubSort xs == nub (sort xs)
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] nubSortOn length ["a","test","of","this"] == ["a","of","test"]
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] nubSortBy (compare `on` length) ["a","test","of","this"] == ["a","of","test"]
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] nubOrd "this is a test" == "this ae"
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] nubOrd (take 4 ("this" ++ undefined)) == "this"
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] \xs -> nubOrd xs == nub xs
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] nubOrdOn length ["a","test","of","this"] == ["a","test","of"]
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] nubOrdBy (compare `on` length) ["a","test","of","this"] == ["a","test","of"]
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] zipWithLongest (,) "a" "xyz" == [(Just 'a', Just 'x'), (Nothing, Just 'y'), (Nothing, Just 'z')]
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] zipWithLongest (,) "a" "x" == [(Just 'a', Just 'x')]
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] zipWithLongest (,) "" "x" == [(Nothing, Just 'x')]
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] comparingLength [1,2,3] [False] == GT
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] comparingLength [1,2] "ab" == EQ
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] \(xs :: [Int]) (ys :: [Int]) -> comparingLength xs ys == Data.Ord.comparing length xs ys
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] comparingLength [1,2] (1:2:3:undefined) == LT
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] comparingLength (1:2:3:undefined) [1,2] == GT
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] mwhen True "test" == "test"
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] mwhen False "test" == ""
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] first succ (1,"test") == (2,"test")
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] second reverse (1,"test") == (1,"tset")
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] firstM (\x -> [x-1, x+1]) (1,"test") == [(0,"test"),(2,"test")]
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] secondM (\x -> [reverse x, x]) (1,"test") == [(1,"tset"),(1,"test")]
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] (succ *** reverse) (1,"test") == (2,"tset")
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] (succ &&& pred) 1 == (2,0)
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] dupe 12 == (12, 12)
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] both succ (1,2) == (2,3)
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] first3 succ (1,1,1) == (2,1,1)
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] second3 succ (1,1,1) == (1,2,1)
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] third3 succ (1,1,1) == (1,1,2)
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] \x -> readVersion (showVersion x) == x
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] readVersion "hello" == undefined
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] showDP 4 pi == "3.1416"
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] showDP 0 pi == "3"
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] showDP 2 3 == "3.00"
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] withTempDir $ \dir -> do writeFile (dir </> "foo.txt") ""; withCurrentDirectory dir $ doesFileExist "foo.txt"
1745.43 s
[extra] +++ OK, passed 100 tests.
1745.43 s
[extra] withTempDir $ \dir -> do writeFile (dir </> "test.txt") ""; (== [dir </> "test.txt"]) <$> listContents dir
1745.44 s
[extra] +++ OK, passed 100 tests.
1745.44 s
[extra] listTest listContents ["bar.txt","foo/baz.txt","zoo"] ["bar.txt","foo","zoo"]
1745.44 s
[extra] +++ OK, passed 100 tests.
1745.44 s
[extra] listTest listDirectories ["bar.txt","foo/baz.txt","zoo"] ["foo"]
1745.44 s
[extra] +++ OK, passed 100 tests.
1745.44 s
[extra] listTest listFiles ["bar.txt","foo/baz.txt","zoo"] ["bar.txt","zoo"]
1745.44 s
[extra] +++ OK, passed 100 tests.
1745.44 s
[extra] listTest listFilesRecursive ["bar.txt","zoo","foo" </> "baz.txt"] ["bar.txt","zoo","foo" </> "baz.txt"]
1745.44 s
[extra] +++ OK, passed 100 tests.
1745.44 s
[extra] listTest (listFilesInside $ pure . not . isPrefixOf "." . takeFileName) ["bar.txt","foo" </> "baz.txt",".foo" </> "baz2.txt", "zoo"] ["bar.txt","zoo","foo" </> "baz.txt"]
1745.44 s
[extra] +++ OK, passed 100 tests.
1745.44 s
[extra] listTest (listFilesInside $ const $ pure False) ["bar.txt"] []
1745.44 s
[extra] +++ OK, passed 100 tests.
1745.44 s
[extra] isWindows == (os == "mingw32")
1745.44 s
[extra] +++ OK, passed 100 tests.
1745.44 s
[extra] \(filter isHexDigit -> s) -> fmap (== s) $ withTempFile $ \file -> do writeFile file s; readFile' file
1745.46 s
[extra] +++ OK, passed 100 tests.
1745.46 s
[extra] \s -> withTempFile $ \file -> do writeFileUTF8 file s; fmap (== s) $ readFileUTF8' file
1745.47 s
[extra] +++ OK, passed 100 tests.
1745.63 s
[extra] \(ASCIIString s) -> withTempFile $ \file -> do writeFileBinary file s; fmap (== s) $ readFileBinary' file
1745.63 s
[extra] +++ OK, passed 100 tests.
1745.63 s
[extra] captureOutput (print 1) == pure ("1\n",())
1745.63 s
[extra] +++ OK, passed 100 tests.
1745.63 s
[extra] withTempFile doesFileExist == pure True
1745.63 s
[extra] +++ OK, passed 100 tests.
1745.63 s
[extra] (doesFileExist =<< withTempFile pure) == pure False
1745.63 s
[extra] +++ OK, passed 100 tests.
1745.63 s
[extra] withTempFile readFile' == pure ""
1745.63 s
[extra] +++ OK, passed 100 tests.
1745.63 s
[extra] withTempDir doesDirectoryExist == pure True
1745.63 s
[extra] +++ OK, passed 100 tests.
1745.63 s
[extra] (doesDirectoryExist =<< withTempDir pure) == pure False
1745.63 s
[extra] +++ OK, passed 100 tests.
1745.63 s
[extra] withTempDir listFiles == pure []
1745.63 s
[extra] +++ OK, passed 100 tests.
1745.63 s
[extra] fileEq "does_not_exist1" "does_not_exist2" == undefined
1745.63 s
[extra] +++ OK, passed 100 tests.
1745.63 s
[extra] fileEq "does_not_exist" "does_not_exist" == undefined
1745.63 s
[extra] +++ OK, passed 100 tests.
1745.63 s
[extra] withTempFile $ \f1 -> fileEq "does_not_exist" f1 == undefined
1745.63 s
[extra] +++ OK, passed 100 tests.
1745.63 s
[extra] withTempFile $ \f1 -> withTempFile $ \f2 -> fileEq f1 f2
1745.63 s
[extra] +++ OK, passed 100 tests.
1745.63 s
[extra] withTempFile $ \f1 -> withTempFile $ \f2 -> writeFile f1 "a" >> writeFile f2 "a" >> fileEq f1 f2
1745.63 s
[extra] +++ OK, passed 100 tests.
1745.63 s
[extra] withTempFile $ \f1 -> withTempFile $ \f2 -> writeFile f1 "a" >> writeFile f2 "b" >> notM (fileEq f1 f2)
1745.63 s
[extra] +++ OK, passed 100 tests.
1745.63 s
[extra] fmap (round . fst) (duration $ sleep 1) == pure 1
1746.49 s
[extra] +++ OK, passed 100 tests.
1746.49 s
[extra] timeout (-3) (print 1) == pure Nothing
1746.49 s
[extra] +++ OK, passed 100 tests.
1746.49 s
[extra] timeout 0.1 (print 1) == fmap Just (print 1)
1746.49 s
[extra] +++ OK, passed 100 tests.
1746.49 s
[extra] do (t, _) <- duration $ timeout 0.1 $ sleep 1000; print t; pure $ t < 1
1746.59 s
[extra] 0.10022230600000001
1746.59 s
[extra] +++ OK, passed 100 tests.
1746.59 s
[extra] timeout 0.1 (sleep 2 >> print 1) == pure Nothing
1746.69 s
[extra] +++ OK, passed 100 tests.
1746.69 s
[extra] showDuration 3.435 == "3.44s"
1746.69 s
[extra] +++ OK, passed 100 tests.
1746.69 s
[extra] showDuration 623.8 == "10m24s"
1746.69 s
[extra] +++ OK, passed 100 tests.
1746.69 s
[extra] showDuration 62003.8 == "17h13m"
1746.69 s
[extra] +++ OK, passed 100 tests.
1746.69 s
[extra] showDuration 1e8 == "27777h47m"
1746.69 s
[extra] +++ OK, passed 100 tests.
1746.69 s
[extra] do f <- offsetTime; xs <- replicateM 10 f; pure $ xs == sort xs
1746.69 s
[extra] +++ OK, passed 100 tests.
1746.70 s
[extra] do (a,_) <- duration $ sleep 1; pure $ a >= 1 && a <= 1.5
1747.70 s
[extra] +++ OK, passed 100 tests.
1747.70 s
[extra] Extra export
1747.70 s
[extra] +++ OK, passed 100 tests.
1747.70 s
[extra] withTempFile
1747.70 s
[extra] ....done
1747.70 s
[extra] withTempDir
1747.72 s
[extra] ....done
1747.72 s
[extra] retry
1747.72 s
[extra] +++ OK, passed 100 tests.
1747.72 s
[extra] barrier
1747.72 s
[extra] Success (325 tests)
1747.75 s
[extra] Test suite extra-test: PASS
1747.75 s
[extra] Test suite logged to: dist/test/extra-1.8.1-extra-test.log
1747.75 s
[extra] 1 of 1 test suites (1 of 1 test cases) passed.
1747.77 s
[extra] Phase: haddockPhase
1747.90 s
[extra] Preprocessing library for extra-1.8.1..
1747.91 s
[extra] Running Haddock on library for extra-1.8.1..
1747.97 s
[extra] Warning: --source-* options are ignored when --hyperlinked-source is enabled.
1748.58 s
[extra] 100% ( 6 / 6) in 'Data.IORef.Extra'
1748.64 s
[extra] 100% ( 4 / 4) in 'Data.Monoid.Extra'
1748.66 s
[extra] Warning: 'Arrow' is out of scope.
1748.66 s
[extra] If you qualify the identifier, haddock can try to link it anyway.
1748.66 s
[extra] 100% ( 22 / 22) in 'Data.Tuple.Extra'
1748.78 s
[extra] 100% ( 2 / 2) in 'Data.Typeable.Extra'
1748.80 s
[extra] 100% ( 7 / 7) in 'Numeric.Extra'
1749.06 s
[extra] Warning: '(:)' is out of scope.
1749.06 s
[extra] If you qualify the identifier, haddock can try to link it anyway.
1749.06 s
[extra] Warning: 'firstJustM' is out of scope.
1749.06 s
[extra] If you qualify the identifier, haddock can try to link it anyway.
1749.07 s
[extra] 100% ( 85 / 85) in 'Data.List.Extra'
1749.25 s
[extra] 100% ( 3 / 3) in 'Data.Version.Extra'
1749.36 s
[extra] Warning: 'length' is ambiguous. It is defined
1749.36 s
[extra] * in ‘Data.Foldable’
1749.36 s
[extra] * in ‘Data.List.NonEmpty’
1749.36 s
[extra] You may be able to disambiguate the identifier by qualifying it or
1749.36 s
[extra] by specifying the type/value namespace explicitly.
1749.36 s
[extra] Defaulting to the one defined in ‘Data.Foldable’
1749.36 s
[extra] 100% ( 23 / 23) in 'Data.List.NonEmpty.Extra'
1749.46 s
[extra] Warning: 'fromJust' is out of scope.
1749.46 s
[extra] If you qualify the identifier, haddock can try to link it anyway.
1749.46 s
[extra] 100% ( 11 / 11) in 'Data.Either.Extra'
1749.49 s
[extra] 100% ( 21 / 21) in 'Control.Exception.Extra'
1749.51 s
[extra] Warning: 'partition' is out of scope.
1749.51 s
[extra] If you qualify the identifier, haddock can try to link it anyway.
1749.51 s
[extra] Warning: 'mconcatMap' is out of scope.
1749.51 s
[extra] If you qualify the identifier, haddock can try to link it anyway.
1749.51 s
[extra] Warning: 'find' is out of scope.
1749.51 s
[extra] If you qualify the identifier, haddock can try to link it anyway.
1749.51 s
[extra] 100% ( 40 / 40) in 'Control.Monad.Extra'
1749.54 s
[extra] 92% ( 13 / 14) in 'Data.Foldable.Extra'
1749.54 s
[extra] Missing documentation for:
1749.54 s
[extra] Module header
1749.56 s
[extra] 100% ( 27 / 27) in 'Control.Concurrent.Extra'
1749.63 s
[extra] 100% ( 8 / 8) in 'System.Directory.Extra'
1749.63 s
[extra] 100% ( 2 / 2) in 'System.Environment.Extra'
1749.63 s
[haskell-language-server] Preprocessing library 'hls-alternate-number-format-plugin' for haskell-language-server-2.12.0.0..
1749.63 s
[haskell-language-server] Building library 'hls-alternate-number-format-plugin' for haskell-language-server-2.12.0.0..
1749.66 s
[extra] 100% ( 26 / 26) in 'System.IO.Extra'
1749.68 s
[extra] 100% ( 4 / 4) in 'System.Info.Extra'
1749.68 s
[extra] 100% ( 5 / 5) in 'System.Process.Extra'
1749.69 s
[extra] 100% ( 8 / 8) in 'System.Time.Extra'
1749.75 s
[extra] 100% (270 /270) in 'Extra'
1749.80 s
[haskell-language-server] [1 of 3] Compiling Ide.Plugin.Literals ( plugins/hls-alternate-number-format-plugin/src/Ide/Plugin/Literals.hs, dist/build/hls-alternate-number-format-plugin/Ide/Plugin/Literals.o, dist/build/hls-alternate-number-format-plugin/Ide/Plugin/Literals.dyn_o )
1749.81 s
[extra] 100% ( 2 / 2) in 'Text.Read.Extra'
1750.90 s
[haskell-language-server] [2 of 3] Compiling Ide.Plugin.Conversion ( plugins/hls-alternate-number-format-plugin/src/Ide/Plugin/Conversion.hs, dist/build/hls-alternate-number-format-plugin/Ide/Plugin/Conversion.o, dist/build/hls-alternate-number-format-plugin/Ide/Plugin/Conversion.dyn_o )
1751.44 s
[haskell-language-server] [3 of 3] Compiling Ide.Plugin.AlternateNumberFormat ( plugins/hls-alternate-number-format-plugin/src/Ide/Plugin/AlternateNumberFormat.hs, dist/build/hls-alternate-number-format-plugin/Ide/Plugin/AlternateNumberFormat.o, dist/build/hls-alternate-number-format-plugin/Ide/Plugin/AlternateNumberFormat.dyn_o )
1752.49 s
[extra] Documentation created: dist/doc/html/extra/, dist/doc/html/extra/extra.txt
1752.54 s
[extra] Preprocessing test suite 'extra-test' for extra-1.8.1..
1752.55 s
[extra] Phase: installPhase
1752.61 s
[extra] Installing library in /nix/store/rf03mfps4q6lyfg6w6i86nq8jhfdrbhn-extra-1.8.1/lib/ghc-9.6.7/lib/x86_64-linux-ghc-9.6.7/extra-1.8.1-mqL7YRifC8HhGrjpGYIL3
1752.70 s
[haskell-language-server] [1 of 3] Compiling Ide.Plugin.Literals ( plugins/hls-alternate-number-format-plugin/src/Ide/Plugin/Literals.hs, dist/build/hls-alternate-number-format-plugin/Ide/Plugin/Literals.p_o )
1753.03 s
[extra] Phase: fixupPhase
1753.05 s
[extra] shrinking RPATHs of ELF executables and libraries in /nix/store/rf03mfps4q6lyfg6w6i86nq8jhfdrbhn-extra-1.8.1
1753.06 s
[extra] shrinking /nix/store/rf03mfps4q6lyfg6w6i86nq8jhfdrbhn-extra-1.8.1/lib/ghc-9.6.7/lib/x86_64-linux-ghc-9.6.7/libHSextra-1.8.1-mqL7YRifC8HhGrjpGYIL3-ghc9.6.7.so
1753.07 s
[extra] checking for references to /build/ in /nix/store/rf03mfps4q6lyfg6w6i86nq8jhfdrbhn-extra-1.8.1...
1753.10 s
[extra] patching script interpreter paths in /nix/store/rf03mfps4q6lyfg6w6i86nq8jhfdrbhn-extra-1.8.1
1753.11 s
[extra] stripping (with command strip and flags -S -p) in /nix/store/rf03mfps4q6lyfg6w6i86nq8jhfdrbhn-extra-1.8.1/lib
1753.21 s
[extra] shrinking RPATHs of ELF executables and libraries in /nix/store/64asrs9sb1pv96n1f4cqms2wwxbs9mvf-extra-1.8.1-doc
1753.22 s
[extra] checking for references to /build/ in /nix/store/64asrs9sb1pv96n1f4cqms2wwxbs9mvf-extra-1.8.1-doc...
1753.25 s
[extra] patching script interpreter paths in /nix/store/64asrs9sb1pv96n1f4cqms2wwxbs9mvf-extra-1.8.1-doc
1753.37 s
[post-build-hook] Uploading to cachix cache "sellout": /nix/store/64asrs9sb1pv96n1f4cqms2wwxbs9mvf-extra-1.8.1-doc /nix/store/rf03mfps4q6lyfg6w6i86nq8jhfdrbhn-extra-1.8.1
1753.92 s
[post-build-hook] Nothing to push - all store paths are already on Cachix.
1753.94 s
[post-build-hook] Uploading to the NixCI cache: /nix/store/64asrs9sb1pv96n1f4cqms2wwxbs9mvf-extra-1.8.1-doc /nix/store/rf03mfps4q6lyfg6w6i86nq8jhfdrbhn-extra-1.8.1
1753.99 s
[post-build-hook] warning: 'warn-short-path-literals' is deprecated, use 'lint-short-path-literals = ignore' instead
1754.08 s
[post-build-hook] copying 1 paths...
1754.08 s
[post-build-hook] copying path '/nix/store/rf03mfps4q6lyfg6w6i86nq8jhfdrbhn-extra-1.8.1' to 'https://cache.nix-ci.com'...
1755.31 s
[post-build-hook] warning: 'warn-short-path-literals' is deprecated, use 'lint-short-path-literals = ignore' instead
1755.45 s
[post-build-hook] copying 0 paths...
1755.47 s
Progress: 52 of 58 built (1 building), 1121 of 1121 downloaded from cache
1755.53 s
Building algebraic-graphs
1755.53 s
[haskell-language-server] [2 of 3] Compiling Ide.Plugin.Conversion ( plugins/hls-alternate-number-format-plugin/src/Ide/Plugin/Conversion.hs, dist/build/hls-alternate-number-format-plugin/Ide/Plugin/Conversion.p_o )
1755.53 s
[haskell-language-server] [3 of 3] Compiling Ide.Plugin.AlternateNumberFormat ( plugins/hls-alternate-number-format-plugin/src/Ide/Plugin/AlternateNumberFormat.hs, dist/build/hls-alternate-number-format-plugin/Ide/Plugin/AlternateNumberFormat.p_o )
1755.62 s
[algebraic-graphs] Phase: setupCompilerEnvironmentPhase
1755.62 s
[algebraic-graphs] Build with /nix/store/i84a5gvqc16hhlcx2wjzvvfdg2ylshpr-ghc-9.6.7.
1755.75 s
[algebraic-graphs] Phase: unpackPhase
1755.75 s
[algebraic-graphs] unpacking source archive /nix/store/gfjyfw1hcshbfclk91difmkphwib8nbd-algebraic-graphs-0.7.tar.gz
1755.76 s
[algebraic-graphs] source root is algebraic-graphs-0.7
1755.77 s
[algebraic-graphs] setting SOURCE_DATE_EPOCH to timestamp 1655769405 of file "algebraic-graphs-0.7/test/Data/Graph/Test/Typed.hs"
1755.77 s
[algebraic-graphs] Phase: patchPhase
1755.78 s
[algebraic-graphs] Replace Cabal file with edited version from mirror://hackage/algebraic-graphs-0.7/revision/3.cabal.
1755.78 s
[algebraic-graphs] applying patch /nix/store/fgaciccwb2z0jmfhs30a1vq03azpd9qd-algebraic-graphs-0.7-allow-inspection-testing-0.6.patch
1755.78 s
[algebraic-graphs] patching file algebraic-graphs.cabal
1755.79 s
[algebraic-graphs] Phase: compileBuildDriverPhase
1755.79 s
[algebraic-graphs] setupCompileFlags: -package-db=/build/tmp.zpJ4OvSX3k/setup-package.conf.d -threaded
1755.84 s
[algebraic-graphs] [1 of 2] Compiling Main ( Setup.hs, /build/tmp.zpJ4OvSX3k/Main.o )
1755.89 s
[algebraic-graphs] [2 of 2] Linking Setup
1757.01 s
[algebraic-graphs] Phase: updateAutotoolsGnuConfigScriptsPhase
1757.02 s
[algebraic-graphs] Phase: configurePhase
1757.03 s
[algebraic-graphs] configureFlags: --verbose --prefix=/nix/store/3r02b52yhkzffsdhwz01dywki8bn9v6i-algebraic-graphs-0.7 --libdir=$prefix/lib/$compiler/lib --libsubdir=$abi/$libname --docdir=/nix/store/ak449r7dq796x3xizfgl3vr4adgaxsaw-algebraic-graphs-0.7-doc/share/doc/algebraic-graphs-0.7 --with-gcc=gcc --package-db=/build/tmp.zpJ4OvSX3k/package.conf.d --ghc-option=-j16 --ghc-option=+RTS --ghc-option=-A64M --ghc-option=-RTS --enable-library-profiling --profiling-detail=exported-functions --disable-profiling --enable-shared --disable-coverage --enable-static --disable-executable-dynamic --enable-tests --disable-benchmarks --enable-library-vanilla --disable-library-for-ghci --enable-split-sections --enable-library-stripping --enable-executable-stripping --ghc-option=-haddock --extra-lib-dirs=/nix/store/xp8g8298vbm4k9ipj14xf1r4rh899hr4-ncurses-6.5/lib --extra-lib-dirs=/nix/store/wxm6pczq28ppr7ffwclsl6njbzzr48zf-libffi-3.5.2/lib --extra-lib-dirs=/nix/store/3f0hp921ncxr249f5lmspc8silkqr8f7-elfutils-0.194/lib --extra-lib-dirs=/nix/store/km81slwkcc82dbwywl10gpffjb78g6ni-gmp-with-cxx-6.3.0/lib --extra-lib-dirs=/nix/store/fvsl0b39y6ns2z66gfvc2raca3b5wr18-numactl-2.0.18/lib --extra-lib-dirs=/nix/store/i84a5gvqc16hhlcx2wjzvvfdg2ylshpr-ghc-9.6.7/lib
1757.08 s
[algebraic-graphs] Using Parsec parser
1757.08 s
[algebraic-graphs] Configuring algebraic-graphs-0.7...
1757.35 s
[algebraic-graphs] Dependency array >=0.4 && <0.6: using array-0.5.8.0
1757.35 s
[algebraic-graphs] Dependency base >=4.11 && <5: using base-4.18.3.0
1757.35 s
[algebraic-graphs] Dependency containers >=0.5.5.1 && <0.8: using containers-0.6.7
1757.35 s
[algebraic-graphs] Dependency deepseq >=1.3.0.1 && <1.6: using deepseq-1.4.8.1
1757.35 s
[algebraic-graphs] Dependency transformers >=0.4 && <0.7: using transformers-0.6.1.0
1757.35 s
[algebraic-graphs] Dependency QuickCheck >=2.14 && <2.16: using QuickCheck-2.15.0.1
1757.35 s
[algebraic-graphs] Dependency algebraic-graphs: using algebraic-graphs-0.7
1757.35 s
[algebraic-graphs] Dependency array >=0.4 && <0.6: using array-0.5.8.0
1757.35 s
[algebraic-graphs] Dependency base >=4.11 && <5: using base-4.18.3.0
1757.35 s
[algebraic-graphs] Dependency containers >=0.5.5.1 && <0.8: using containers-0.6.7
1757.35 s
[algebraic-graphs] Dependency deepseq >=1.3.0.1 && <1.6: using deepseq-1.4.8.1
1757.35 s
[algebraic-graphs] Dependency extra >=1.4 && <2: using extra-1.8.1
1757.35 s
[algebraic-graphs] Dependency inspection-testing >=0.4.2.2 && <0.7: using
1757.35 s
[algebraic-graphs] inspection-testing-0.6.2
1757.35 s
[algebraic-graphs] Dependency transformers >=0.4 && <0.7: using transformers-0.6.1.0
1757.68 s
[algebraic-graphs] Source component graph:
1757.68 s
[algebraic-graphs] component lib
1757.68 s
[algebraic-graphs] component test:main dependency lib
1757.68 s
[algebraic-graphs] Configured component graph:
1757.68 s
[algebraic-graphs] component algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE
1757.68 s
[algebraic-graphs] include array-0.5.8.0
1757.68 s
[algebraic-graphs] include base-4.18.3.0
1757.68 s
[algebraic-graphs] include containers-0.6.7
1757.68 s
[algebraic-graphs] include deepseq-1.4.8.1
1757.68 s
[algebraic-graphs] include transformers-0.6.1.0
1757.68 s
[algebraic-graphs] component algebraic-graphs-0.7-Hb7qr09bMx9JHq5kA09kif-main
1757.68 s
[algebraic-graphs] include QuickCheck-2.15.0.1-8TOXA7GkEi42wTg0ODsItP
1757.68 s
[algebraic-graphs] include algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE
1757.68 s
[algebraic-graphs] include array-0.5.8.0
1757.68 s
[algebraic-graphs] include base-4.18.3.0
1757.68 s
[algebraic-graphs] include containers-0.6.7
1757.68 s
[algebraic-graphs] include deepseq-1.4.8.1
1757.68 s
[algebraic-graphs] include extra-1.8.1-mqL7YRifC8HhGrjpGYIL3
1757.68 s
[algebraic-graphs] include inspection-testing-0.6.2-3QX2depSWaUFw922pdySLQ
1757.68 s
[algebraic-graphs] include transformers-0.6.1.0
1757.68 s
[algebraic-graphs] Linked component graph:
1757.68 s
[algebraic-graphs] unit algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE
1757.68 s
[algebraic-graphs] include array-0.5.8.0
1757.68 s
[algebraic-graphs] include base-4.18.3.0
1757.68 s
[algebraic-graphs] include containers-0.6.7
1757.68 s
[algebraic-graphs] include deepseq-1.4.8.1
1757.68 s
[algebraic-graphs] include transformers-0.6.1.0
1757.68 s
[algebraic-graphs] Algebra.Graph=algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE:Algebra.Graph,Algebra.Graph.Acyclic.AdjacencyMap=algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE:Algebra.Graph.Acyclic.AdjacencyMap,Algebra.Graph.AdjacencyIntMap=algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE:Algebra.Graph.AdjacencyIntMap,Algebra.Graph.AdjacencyIntMap.Algorithm=algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE:Algebra.Graph.AdjacencyIntMap.Algorithm,Algebra.Graph.AdjacencyMap=algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE:Algebra.Graph.AdjacencyMap,Algebra.Graph.AdjacencyMap.Algorithm=algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE:Algebra.Graph.AdjacencyMap.Algorithm,Algebra.Graph.Bipartite.AdjacencyMap=algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE:Algebra.Graph.Bipartite.AdjacencyMap,Algebra.Graph.Bipartite.AdjacencyMap.Algorithm=algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE:Algebra.Graph.Bipartite.AdjacencyMap.Algorithm,Algebra.Graph.Class=algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE:Algebra.Graph.Class,Algebra.Graph.Example.Todo=algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE:Algebra.Graph.Example.Todo,Algebra.Graph.Export=algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE:Algebra.Graph.Export,Algebra.Graph.Export.Dot=algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE:Algebra.Graph.Export.Dot,Algebra.Graph.HigherKinded.Class=algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE:Algebra.Graph.HigherKinded.Class,Algebra.Graph.Internal=algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE:Algebra.Graph.Internal,Algebra.Graph.Label=algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE:Algebra.Graph.Label,Algebra.Graph.Labelled=algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE:Algebra.Graph.Labelled,Algebra.Graph.Labelled.AdjacencyMap=algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE:Algebra.Graph.Labelled.AdjacencyMap,Algebra.Graph.Labelled.Example.Automaton=algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE:Algebra.Graph.Labelled.Example.Automaton,Algebra.Graph.Labelled.Example.Network=algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE:Algebra.Graph.Labelled.Example.Network,Algebra.Graph.NonEmpty=algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE:Algebra.Graph.NonEmpty,Algebra.Graph.NonEmpty.AdjacencyMap=algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE:Algebra.Graph.NonEmpty.AdjacencyMap,Algebra.Graph.Relation=algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE:Algebra.Graph.Relation,Algebra.Graph.Relation.Preorder=algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE:Algebra.Graph.Relation.Preorder,Algebra.Graph.Relation.Reflexive=algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE:Algebra.Graph.Relation.Reflexive,Algebra.Graph.Relation.Symmetric=algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE:Algebra.Graph.Relation.Symmetric,Algebra.Graph.Relation.Transitive=algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE:Algebra.Graph.Relation.Transitive,Algebra.Graph.ToGraph=algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE:Algebra.Graph.ToGraph,Algebra.Graph.Undirected=algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE:Algebra.Graph.Undirected,Data.Graph.Typed=algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE:Data.Graph.Typed
1757.68 s
[algebraic-graphs] unit algebraic-graphs-0.7-Hb7qr09bMx9JHq5kA09kif-main
1757.68 s
[algebraic-graphs] include QuickCheck-2.15.0.1-8TOXA7GkEi42wTg0ODsItP
1757.68 s
[algebraic-graphs] include algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE
1757.68 s
[algebraic-graphs] include array-0.5.8.0
1757.68 s
[algebraic-graphs] include base-4.18.3.0
1757.68 s
[algebraic-graphs] include containers-0.6.7
1757.68 s
[algebraic-graphs] include deepseq-1.4.8.1
1757.68 s
[algebraic-graphs] include extra-1.8.1-mqL7YRifC8HhGrjpGYIL3
1757.68 s
[algebraic-graphs] include inspection-testing-0.6.2-3QX2depSWaUFw922pdySLQ
1757.68 s
[algebraic-graphs] include transformers-0.6.1.0
1757.69 s
[algebraic-graphs] Ready component graph:
1757.69 s
[algebraic-graphs] definite algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE
1757.69 s
[algebraic-graphs] depends array-0.5.8.0
1757.69 s
[algebraic-graphs] depends base-4.18.3.0
1757.69 s
[algebraic-graphs] depends containers-0.6.7
1757.69 s
[algebraic-graphs] depends deepseq-1.4.8.1
1757.69 s
[algebraic-graphs] depends transformers-0.6.1.0
1757.69 s
[algebraic-graphs] definite algebraic-graphs-0.7-Hb7qr09bMx9JHq5kA09kif-main
1757.69 s
[algebraic-graphs] depends QuickCheck-2.15.0.1-8TOXA7GkEi42wTg0ODsItP
1757.69 s
[algebraic-graphs] depends algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE
1757.69 s
[algebraic-graphs] depends array-0.5.8.0
1757.69 s
[algebraic-graphs] depends base-4.18.3.0
1757.69 s
[algebraic-graphs] depends containers-0.6.7
1757.69 s
[algebraic-graphs] depends deepseq-1.4.8.1
1757.69 s
[algebraic-graphs] depends extra-1.8.1-mqL7YRifC8HhGrjpGYIL3
1757.69 s
[algebraic-graphs] depends inspection-testing-0.6.2-3QX2depSWaUFw922pdySLQ
1757.69 s
[algebraic-graphs] depends transformers-0.6.1.0
1757.69 s
[algebraic-graphs] Using Cabal-3.10.3.0 compiled by ghc-9.6
1757.69 s
[algebraic-graphs] Using compiler: ghc-9.6.7
1757.69 s
[algebraic-graphs] Using install prefix:
1757.69 s
[algebraic-graphs] /nix/store/3r02b52yhkzffsdhwz01dywki8bn9v6i-algebraic-graphs-0.7
1757.69 s
[algebraic-graphs] Executables installed in:
1757.69 s
[algebraic-graphs] /nix/store/3r02b52yhkzffsdhwz01dywki8bn9v6i-algebraic-graphs-0.7/bin
1757.69 s
[algebraic-graphs] Libraries installed in:
1757.69 s
[algebraic-graphs] /nix/store/3r02b52yhkzffsdhwz01dywki8bn9v6i-algebraic-graphs-0.7/lib/ghc-9.6.7/lib/x86_64-linux-ghc-9.6.7/algebraic-graphs-0.7-DAzqSe4OEaY2UL8NUkdChE
1757.69 s
[algebraic-graphs] Dynamic Libraries installed in:
1757.69 s
[algebraic-graphs] /nix/store/3r02b52yhkzffsdhwz01dywki8bn9v6i-algebraic-graphs-0.7/lib/ghc-9.6.7/lib/x86_64-linux-ghc-9.6.7
1757.69 s
[algebraic-graphs] Private executables installed in:
1757.69 s
[algebraic-graphs] /nix/store/3r02b52yhkzffsdhwz01dywki8bn9v6i-algebraic-graphs-0.7/libexec/x86_64-linux-ghc-9.6.7/algebraic-graphs-0.7
1757.69 s
[algebraic-graphs] Data files installed in:
1757.69 s
[algebraic-graphs] /nix/store/3r02b52yhkzffsdhwz01dywki8bn9v6i-algebraic-graphs-0.7/share/x86_64-linux-ghc-9.6.7/algebraic-graphs-0.7
1757.69 s
[algebraic-graphs] Documentation installed in:
1757.69 s
[algebraic-graphs] /nix/store/ak449r7dq796x3xizfgl3vr4adgaxsaw-algebraic-graphs-0.7-doc/share/doc/algebraic-graphs-0.7
1757.69 s
[algebraic-graphs] Configuration files installed in:
1757.69 s
[algebraic-graphs] /nix/store/3r02b52yhkzffsdhwz01dywki8bn9v6i-algebraic-graphs-0.7/etc
1757.69 s
[algebraic-graphs] No alex found
1757.69 s
[algebraic-graphs] Using ar found on system at:
1757.69 s
[algebraic-graphs] /nix/store/rinxh4y0akcin90l05j0zr1r3wahl34d-binutils-wrapper-2.44/bin/ar
1757.69 s
[algebraic-graphs] No c2hs found
1757.69 s
[algebraic-graphs] No cpphs found
1757.69 s
[algebraic-graphs] No doctest found
1757.69 s
[algebraic-graphs] Using gcc version 14.3.0 given by user at:
1757.69 s
[algebraic-graphs] /nix/store/0j1ajvl2qwwb9n5a91hzd0j98fk9fa3k-gcc-wrapper-14.3.0/bin/gcc
1757.69 s
[algebraic-graphs] Using ghc version 9.6.7 found on system at:
1757.69 s
[algebraic-graphs] /nix/store/i84a5gvqc16hhlcx2wjzvvfdg2ylshpr-ghc-9.6.7/bin/ghc
1757.69 s
[algebraic-graphs] Using ghc-pkg version 9.6.7 found on system at:
1757.69 s
[algebraic-graphs] /nix/store/i84a5gvqc16hhlcx2wjzvvfdg2ylshpr-ghc-9.6.7/bin/ghc-pkg-9.6.7
1757.69 s
[algebraic-graphs] No ghcjs found
1757.69 s
[algebraic-graphs] No ghcjs-pkg found
1757.69 s
[algebraic-graphs] No greencard found
1757.69 s
[algebraic-graphs] Using haddock version 2.29.2 found on system at:
1757.69 s
[algebraic-graphs] /nix/store/i84a5gvqc16hhlcx2wjzvvfdg2ylshpr-ghc-9.6.7/bin/haddock-ghc-9.6.7
1757.69 s
[algebraic-graphs] No happy found
1757.69 s
[algebraic-graphs] Using haskell-suite found on system at: haskell-suite-dummy-location
1757.69 s
[algebraic-graphs] Using haskell-suite-pkg found on system at: haskell-suite-pkg-dummy-location
1757.69 s
[algebraic-graphs] No hmake found
1757.69 s
[algebraic-graphs] Using hpc version 0.68 found on system at:
1757.69 s
[algebraic-graphs] /nix/store/i84a5gvqc16hhlcx2wjzvvfdg2ylshpr-ghc-9.6.7/bin/hpc-ghc-9.6.7
1757.69 s
[algebraic-graphs] Using hsc2hs version 0.68.9 found on system at:
1757.69 s
[algebraic-graphs] /nix/store/i84a5gvqc16hhlcx2wjzvvfdg2ylshpr-ghc-9.6.7/bin/hsc2hs-ghc-9.6.7
1757.69 s
[algebraic-graphs] Using hscolour version 1.25 found on system at:
1757.69 s
[algebraic-graphs] /nix/store/na3h6k2pdvfb6kjn5dhiqi3z5l8cfdqx-hscolour-1.25/bin/HsColour
1757.69 s
[algebraic-graphs] No jhc found
1757.69 s
[algebraic-graphs] Using ld found on system at:
1757.69 s
[algebraic-graphs] /nix/store/rinxh4y0akcin90l05j0zr1r3wahl34d-binutils-wrapper-2.44/bin/ld.gold
1757.69 s
[algebraic-graphs] No pkg-config found
1757.69 s
[algebraic-graphs] Using runghc version 9.6.7 found on system at:
1757.69 s
[algebraic-graphs] /nix/store/i84a5gvqc16hhlcx2wjzvvfdg2ylshpr-ghc-9.6.7/bin/runghc-9.6.7
1757.69 s
[algebraic-graphs] Using strip version 2.44 found on system at:
1757.69 s
[algebraic-graphs] /nix/store/0j1ajvl2qwwb9n5a91hzd0j98fk9fa3k-gcc-wrapper-14.3.0/bin/strip
1757.69 s
[algebraic-graphs] Using tar found on system at:
1757.69 s
[algebraic-graphs] /nix/store/i8hncwf8234flnbgi2z19bzy4hjwhss1-gnutar-1.35/bin/tar
1757.69 s
[algebraic-graphs] No uhc found
1757.82 s
[algebraic-graphs] Phase: buildPhase
1757.90 s
[algebraic-graphs] Preprocessing library for algebraic-graphs-0.7..
1757.91 s
[algebraic-graphs] Building library for algebraic-graphs-0.7..
1758.01 s
[algebraic-graphs] [ 1 of 29] Compiling Algebra.Graph.AdjacencyMap ( src/Algebra/Graph/AdjacencyMap.hs, dist/build/Algebra/Graph/AdjacencyMap.o, dist/build/Algebra/Graph/AdjacencyMap.dyn_o )
1758.89 s
[algebraic-graphs] [ 2 of 29] Compiling Algebra.Graph.AdjacencyIntMap ( src/Algebra/Graph/AdjacencyIntMap.hs, dist/build/Algebra/Graph/AdjacencyIntMap.o, dist/build/Algebra/Graph/AdjacencyIntMap.dyn_o )
1759.46 s
[algebraic-graphs] [ 3 of 29] Compiling Algebra.Graph.AdjacencyIntMap.Algorithm ( src/Algebra/Graph/AdjacencyIntMap/Algorithm.hs, dist/build/Algebra/Graph/AdjacencyIntMap/Algorithm.o, dist/build/Algebra/Graph/AdjacencyIntMap/Algorithm.dyn_o )
1759.72 s
[algebraic-graphs] [ 4 of 29] Compiling Algebra.Graph.Internal ( src/Algebra/Graph/Internal.hs, dist/build/Algebra/Graph/Internal.o, dist/build/Algebra/Graph/Internal.dyn_o )
1759.72 s
[algebraic-graphs] [ 5 of 29] Compiling Algebra.Graph ( src/Algebra/Graph.hs, dist/build/Algebra/Graph.o, dist/build/Algebra/Graph.dyn_o )
1760.75 s
[algebraic-graphs] [ 6 of 29] Compiling Algebra.Graph.HigherKinded.Class ( src/Algebra/Graph/HigherKinded/Class.hs, dist/build/Algebra/Graph/HigherKinded/Class.o, dist/build/Algebra/Graph/HigherKinded/Class.dyn_o )
1761.00 s
[algebraic-graphs] [ 7 of 29] Compiling Algebra.Graph.Bipartite.AdjacencyMap ( src/Algebra/Graph/Bipartite/AdjacencyMap.hs, dist/build/Algebra/Graph/Bipartite/AdjacencyMap.o, dist/build/Algebra/Graph/Bipartite/AdjacencyMap.dyn_o )
1761.33 s
[haskell-language-server] Preprocessing library 'hls-qualify-imported-names-plugin' for haskell-language-server-2.12.0.0..
1761.33 s
[haskell-language-server] Building library 'hls-qualify-imported-names-plugin' for haskell-language-server-2.12.0.0..
1761.48 s
[haskell-language-server] [1 of 1] Compiling Ide.Plugin.QualifyImportedNames ( plugins/hls-qualify-imported-names-plugin/src/Ide/Plugin/QualifyImportedNames.hs, dist/build/hls-qualify-imported-names-plugin/Ide/Plugin/QualifyImportedNames.o, dist/build/hls-qualify-imported-names-plugin/Ide/Plugin/QualifyImportedNames.dyn_o )
1761.53 s
[algebraic-graphs] [ 8 of 29] Compiling Algebra.Graph.Bipartite.AdjacencyMap.Algorithm ( src/Algebra/Graph/Bipartite/AdjacencyMap/Algorithm.hs, dist/build/Algebra/Graph/Bipartite/AdjacencyMap/Algorithm.o, dist/build/Algebra/Graph/Bipartite/AdjacencyMap/Algorithm.dyn_o )
1762.23 s
[algebraic-graphs] [ 9 of 29] Compiling Algebra.Graph.Label ( src/Algebra/Graph/Label.hs, dist/build/Algebra/Graph/Label.o, dist/build/Algebra/Graph/Label.dyn_o )
1762.30 s
[algebraic-graphs] [10 of 29] Compiling Algebra.Graph.NonEmpty.AdjacencyMap ( src/Algebra/Graph/NonEmpty/AdjacencyMap.hs, dist/build/Algebra/Graph/NonEmpty/AdjacencyMap.o, dist/build/Algebra/Graph/NonEmpty/AdjacencyMap.dyn_o )
1762.30 s
[algebraic-graphs] [11 of 29] Compiling Algebra.Graph.AdjacencyMap.Algorithm ( src/Algebra/Graph/AdjacencyMap/Algorithm.hs, dist/build/Algebra/Graph/AdjacencyMap/Algorithm.o, dist/build/Algebra/Graph/AdjacencyMap/Algorithm.dyn_o )
1762.30 s
[algebraic-graphs] [12 of 29] Compiling Algebra.Graph.Acyclic.AdjacencyMap ( src/Algebra/Graph/Acyclic/AdjacencyMap.hs, dist/build/Algebra/Graph/Acyclic/AdjacencyMap.o, dist/build/Algebra/Graph/Acyclic/AdjacencyMap.dyn_o )
1762.30 s
[algebraic-graphs] [13 of 29] Compiling Algebra.Graph.ToGraph ( src/Algebra/Graph/ToGraph.hs, dist/build/Algebra/Graph/ToGraph.o, dist/build/Algebra/Graph/ToGraph.dyn_o )
1762.30 s
[algebraic-graphs]
1762.30 s
[algebraic-graphs] src/Algebra/Graph/ToGraph.hs:171:32: warning : [ GHC-58520 ] [ -Wtype-equality-requires-operators ]
1762.30 s
[algebraic-graphs] The use of ‘~’ without TypeOperators
1762.30 s
[algebraic-graphs] will become an error in a future GHC release.
1762.30 s
[algebraic-graphs] Suggested fix: Perhaps you intended to use TypeOperators
1762.30 s
[algebraic-graphs] |
1762.30 s
[algebraic-graphs] 171 | vertexIntSet :: ToVertex t ~ Int => t -> IntSet
1762.30 s
[algebraic-graphs] | ^
1762.30 s
[algebraic-graphs]
1762.30 s
[algebraic-graphs] src/Algebra/Graph/ToGraph.hs:197:29: warning : [ GHC-58520 ] [ -Wtype-equality-requires-operators ]
1762.30 s
[algebraic-graphs] The use of ‘~’ without TypeOperators
1762.30 s
[algebraic-graphs] will become an error in a future GHC release.
1762.30 s
[algebraic-graphs] Suggested fix: Perhaps you intended to use TypeOperators
1762.30 s
[algebraic-graphs] |
1762.30 s
[algebraic-graphs] 197 | preIntSet :: ToVertex t ~ Int => Int -> t -> IntSet
1762.30 s
[algebraic-graphs] | ^
1762.30 s
[algebraic-graphs]
1762.30 s
[algebraic-graphs] src/Algebra/Graph/ToGraph.hs:215:30: warning : [ GHC-58520 ] [ -Wtype-equality-requires-operators ]
1762.30 s
[algebraic-graphs] The use of ‘~’ without TypeOperators
1762.30 s
[algebraic-graphs] will become an error in a future GHC release.
1762.30 s
[algebraic-graphs] Suggested fix: Perhaps you intended to use TypeOperators
1762.30 s
[algebraic-graphs] |
1762.30 s
[algebraic-graphs] 215 | postIntSet :: ToVertex t ~ Int => Int -> t -> IntSet
1762.30 s
[algebraic-graphs] | ^
1762.30 s
[algebraic-graphs]
1762.30 s
[algebraic-graphs] src/Algebra/Graph/ToGraph.hs:303:37: warning : [ GHC-58520 ] [ -Wtype-equality-requires-operators ]
1762.30 s
[algebraic-graphs] The use of ‘~’ without TypeOperators
1762.30 s
[algebraic-graphs] will become an error in a future GHC release.
1762.30 s
[algebraic-graphs] Suggested fix: Perhaps you intended to use TypeOperators
1762.30 s
[algebraic-graphs] |
1762.30 s
[algebraic-graphs] 303 | toAdjacencyIntMap :: ToVertex t ~ Int => t -> AIM.AdjacencyIntMap
1762.30 s
[algebraic-graphs] | ^
1762.30 s
[algebraic-graphs]
1762.30 s
[algebraic-graphs] src/Algebra/Graph/ToGraph.hs:312:46: warning : [ GHC-58520 ] [ -Wtype-equality-requires-operators ]
1762.30 s
[algebraic-graphs] The use of ‘~’ without TypeOperators
1762.30 s
[algebraic-graphs] will become an error in a future GHC release.
1762.30 s
[algebraic-graphs] Suggested fix: Perhaps you intended to use TypeOperators
1762.30 s
[algebraic-graphs] |
1762.30 s
[algebraic-graphs] 312 | toAdjacencyIntMapTranspose :: ToVertex t ~ Int => t -> AIM.AdjacencyIntMap
1762.30 s
[algebraic-graphs] | ^
1762.30 s
[algebraic-graphs]
1762.30 s
[algebraic-graphs] src/Algebra/Graph/ToGraph.hs:452:43: warning : [ GHC-58520 ] [ -Wtype-equality-requires-operators ]
1762.30 s
[algebraic-graphs] The use of ‘~’ without TypeOperators
1762.30 s
[algebraic-graphs] will become an error in a future GHC release.
1762.30 s
[algebraic-graphs] Suggested fix: Perhaps you intended to use TypeOperators
1762.30 s
[algebraic-graphs] |
1762.30 s
[algebraic-graphs] 452 | adjacencyIntMap :: (ToGraph t, ToVertex t ~ Int) => t -> IntMap IntSet
1762.30 s
[algebraic-graphs] | ^
1762.30 s
[algebraic-graphs]
1762.30 s
[algebraic-graphs] src/Algebra/Graph/ToGraph.hs:471:52: warning : [ GHC-58520 ] [ -Wtype-equality-requires-operators ]
1762.30 s
[algebraic-graphs] The use of ‘~’ without TypeOperators
1762.30 s
[algebraic-graphs] will become an error in a future GHC release.
1762.30 s
[algebraic-graphs] Suggested fix: Perhaps you intended to use TypeOperators
1762.30 s
[algebraic-graphs] |
1762.30 s
[algebraic-graphs] 471 | adjacencyIntMapTranspose :: (ToGraph t, ToVertex t ~ Int) => t -> IntMap IntSet
1762.30 s
[algebraic-graphs] | ^
1762.30 s
[algebraic-graphs] [14 of 29] Compiling Algebra.Graph.Relation ( src/Algebra/Graph/Relation.hs, dist/build/Algebra/Graph/Relation.o, dist/build/Algebra/Graph/Relation.dyn_o )
1762.30 s
[algebraic-graphs] [15 of 29] Compiling Algebra.Graph.Relation.Symmetric ( src/Algebra/Graph/Relation/Symmetric.hs, dist/build/Algebra/Graph/Relation/Symmetric.o, dist/build/Algebra/Graph/Relation/Symmetric.dyn_o )
1762.74 s
[algebraic-graphs] [16 of 29] Compiling Algebra.Graph.NonEmpty ( src/Algebra/Graph/NonEmpty.hs, dist/build/Algebra/Graph/NonEmpty.o, dist/build/Algebra/Graph/NonEmpty.dyn_o )
1762.75 s
[algebraic-graphs] [17 of 29] Compiling Algebra.Graph.Labelled.AdjacencyMap ( src/Algebra/Graph/Labelled/AdjacencyMap.hs, dist/build/Algebra/Graph/Labelled/AdjacencyMap.o, dist/build/Algebra/Graph/Labelled/AdjacencyMap.dyn_o )
1762.75 s
[algebraic-graphs] [18 of 29] Compiling Algebra.Graph.Labelled ( src/Algebra/Graph/Labelled.hs, dist/build/Algebra/Graph/Labelled.o, dist/build/Algebra/Graph/Labelled.dyn_o )
1762.94 s
[algebraic-graphs] [19 of 29] Compiling Algebra.Graph.Labelled.Example.Network ( src/Algebra/Graph/Labelled/Example/Network.hs, dist/build/Algebra/Graph/Labelled/Example/Network.o, dist/build/Algebra/Graph/Labelled/Example/Network.dyn_o )
1763.07 s
[algebraic-graphs] [20 of 29] Compiling Algebra.Graph.Labelled.Example.Automaton ( src/Algebra/Graph/Labelled/Example/Automaton.hs, dist/build/Algebra/Graph/Labelled/Example/Automaton.o, dist/build/Algebra/Graph/Labelled/Example/Automaton.dyn_o )
1763.24 s
[algebraic-graphs] [21 of 29] Compiling Algebra.Graph.Export ( src/Algebra/Graph/Export.hs, dist/build/Algebra/Graph/Export.o, dist/build/Algebra/Graph/Export.dyn_o )
1763.24 s
[algebraic-graphs]
1763.24 s
[algebraic-graphs] src/Algebra/Graph/Export.hs:185:41: warning : [ GHC-58520 ] [ -Wtype-equality-requires-operators ]
1763.24 s
[algebraic-graphs] The use of ‘~’ without TypeOperators
1763.24 s
[algebraic-graphs] will become an error in a future GHC release.
1763.24 s
[algebraic-graphs] Suggested fix: Perhaps you intended to use TypeOperators
1763.24 s
[algebraic-graphs] |
1763.24 s
[algebraic-graphs] 185 | export :: (Ord a, ToGraph g, ToVertex g ~ a) => (a -> Doc s) -> (a -> a -> Doc s) -> g -> Doc s
1763.24 s
[algebraic-graphs] | ^
1763.24 s
[algebraic-graphs] [22 of 29] Compiling Algebra.Graph.Export.Dot ( src/Algebra/Graph/Export/Dot.hs, dist/build/Algebra/Graph/Export/Dot.o, dist/build/Algebra/Graph/Export/Dot.dyn_o )
1763.24 s
[algebraic-graphs]
1763.24 s
[algebraic-graphs] src/Algebra/Graph/Export/Dot.hs:121:63: warning : [ GHC-58520 ] [ -Wtype-equality-requires-operators ]
1763.24 s
[algebraic-graphs] The use of ‘~’ without TypeOperators
1763.24 s
[algebraic-graphs] will become an error in a future GHC release.
1763.24 s
[algebraic-graphs] Suggested fix: Perhaps you intended to use TypeOperators
1763.24 s
[algebraic-graphs] |
1763.24 s
[algebraic-graphs] 121 | export :: (IsString s, Monoid s, Ord a, ToGraph g, ToVertex g ~ a) => Style a s -> g -> s
1763.24 s
[algebraic-graphs] | ^
1763.24 s
[algebraic-graphs]
1763.24 s
[algebraic-graphs] src/Algebra/Graph/Export/Dot.hs:165:78: warning : [ GHC-58520 ] [ -Wtype-equality-requires-operators ]
1763.24 s
[algebraic-graphs] The use of ‘~’ without TypeOperators
1763.24 s
[algebraic-graphs] will become an error in a future GHC release.
1763.24 s
[algebraic-graphs] Suggested fix: Perhaps you intended to use TypeOperators
1763.24 s
[algebraic-graphs] |
1763.24 s
[algebraic-graphs] 165 | exportAsIs :: (IsString s, Monoid s, Ord (ToVertex g), ToGraph g, ToVertex g ~ s) => g -> s
1763.24 s
[algebraic-graphs] | ^
1763.24 s
[algebraic-graphs] [23 of 29] Compiling Algebra.Graph.Undirected ( src/Algebra/Graph/Undirected.hs, dist/build/Algebra/Graph/Undirected.o, dist/build/Algebra/Graph/Undirected.dyn_o )
1763.24 s
[algebraic-graphs] [24 of 29] Compiling Algebra.Graph.Class ( src/Algebra/Graph/Class.hs, dist/build/Algebra/Graph/Class.o, dist/build/Algebra/Graph/Class.dyn_o )
1763.26 s
[algebraic-graphs] [25 of 29] Compiling Algebra.Graph.Relation.Transitive ( src/Algebra/Graph/Relation/Transitive.hs, dist/build/Algebra/Graph/Relation/Transitive.o, dist/build/Algebra/Graph/Relation/Transitive.dyn_o )
1763.34 s
[algebraic-graphs] [26 of 29] Compiling Algebra.Graph.Relation.Reflexive ( src/Algebra/Graph/Relation/Reflexive.hs, dist/build/Algebra/Graph/Relation/Reflexive.o, dist/build/Algebra/Graph/Relation/Reflexive.dyn_o )
1763.34 s
[algebraic-graphs] [27 of 29] Compiling Algebra.Graph.Relation.Preorder ( src/Algebra/Graph/Relation/Preorder.hs, dist/build/Algebra/Graph/Relation/Preorder.o, dist/build/Algebra/Graph/Relation/Preorder.dyn_o )
1763.35 s
[algebraic-graphs] [28 of 29] Compiling Algebra.Graph.Example.Todo ( src/Algebra/Graph/Example/Todo.hs, dist/build/Algebra/Graph/Example/Todo.o, dist/build/Algebra/Graph/Example/Todo.dyn_o )
1763.39 s
[algebraic-graphs] [29 of 29] Compiling Data.Graph.Typed ( src/Data/Graph/Typed.hs, dist/build/Data/Graph/Typed.o, dist/build/Data/Graph/Typed.dyn_o )
1763.49 s
[haskell-language-server] [1 of 1] Compiling Ide.Plugin.QualifyImportedNames ( plugins/hls-qualify-imported-names-plugin/src/Ide/Plugin/QualifyImportedNames.hs, dist/build/hls-qualify-imported-names-plugin/Ide/Plugin/QualifyImportedNames.p_o )
1763.65 s
[algebraic-graphs] [ 1 of 29] Compiling Algebra.Graph.AdjacencyMap ( src/Algebra/Graph/AdjacencyMap.hs, dist/build/Algebra/Graph/AdjacencyMap.p_o )
1764.46 s
[algebraic-graphs] [ 2 of 29] Compiling Algebra.Graph.AdjacencyIntMap ( src/Algebra/Graph/AdjacencyIntMap.hs, dist/build/Algebra/Graph/AdjacencyIntMap.p_o )
1764.98 s
[algebraic-graphs] [ 3 of 29] Compiling Algebra.Graph.AdjacencyIntMap.Algorithm ( src/Algebra/Graph/AdjacencyIntMap/Algorithm.hs, dist/build/Algebra/Graph/AdjacencyIntMap/Algorithm.p_o )
1765.28 s
[algebraic-graphs] [ 4 of 29] Compiling Algebra.Graph.Internal ( src/Algebra/Graph/Internal.hs, dist/build/Algebra/Graph/Internal.p_o )
1765.28 s
[algebraic-graphs] [ 5 of 29] Compiling Algebra.Graph ( src/Algebra/Graph.hs, dist/build/Algebra/Graph.p_o )
1766.24 s
[algebraic-graphs] [ 6 of 29] Compiling Algebra.Graph.HigherKinded.Class ( src/Algebra/Graph/HigherKinded/Class.hs, dist/build/Algebra/Graph/HigherKinded/Class.p_o )
1766.57 s
[algebraic-graphs] [ 7 of 29] Compiling Algebra.Graph.Bipartite.AdjacencyMap ( src/Algebra/Graph/Bipartite/AdjacencyMap.hs, dist/build/Algebra/Graph/Bipartite/AdjacencyMap.p_o )
1766.91 s
[algebraic-graphs] [ 8 of 29] Compiling Algebra.Graph.Bipartite.AdjacencyMap.Algorithm ( src/Algebra/Graph/Bipartite/AdjacencyMap/Algorithm.hs, dist/build/Algebra/Graph/Bipartite/AdjacencyMap/Algorithm.p_o )
1768.00 s
[algebraic-graphs] [ 9 of 29] Compiling Algebra.Graph.Label ( src/Algebra/Graph/Label.hs, dist/build/Algebra/Graph/Label.p_o )
1768.00 s
[algebraic-graphs] [10 of 29] Compiling Algebra.Graph.NonEmpty.AdjacencyMap ( src/Algebra/Graph/NonEmpty/AdjacencyMap.hs, dist/build/Algebra/Graph/NonEmpty/AdjacencyMap.p_o )
1768.07 s
[algebraic-graphs] [11 of 29] Compiling Algebra.Graph.AdjacencyMap.Algorithm ( src/Algebra/Graph/AdjacencyMap/Algorithm.hs, dist/build/Algebra/Graph/AdjacencyMap/Algorithm.p_o )
1768.07 s
[algebraic-graphs] [12 of 29] Compiling Algebra.Graph.Acyclic.AdjacencyMap ( src/Algebra/Graph/Acyclic/AdjacencyMap.hs, dist/build/Algebra/Graph/Acyclic/AdjacencyMap.p_o )
1768.07 s
[algebraic-graphs] [13 of 29] Compiling Algebra.Graph.ToGraph ( src/Algebra/Graph/ToGraph.hs, dist/build/Algebra/Graph/ToGraph.p_o )
1768.07 s
[algebraic-graphs]
1768.07 s
[algebraic-graphs] src/Algebra/Graph/ToGraph.hs:171:32: warning : [ GHC-58520 ] [ -Wtype-equality-requires-operators ]
1768.07 s
[algebraic-graphs] The use of ‘~’ without TypeOperators
1768.07 s
[algebraic-graphs] will become an error in a future GHC release.
1768.07 s
[algebraic-graphs] Suggested fix: Perhaps you intended to use TypeOperators
1768.07 s
[algebraic-graphs] |
1768.07 s
[algebraic-graphs] 171 | vertexIntSet :: ToVertex t ~ Int => t -> IntSet
1768.07 s
[algebraic-graphs] | ^
1768.07 s
[algebraic-graphs]
1768.07 s
[algebraic-graphs] src/Algebra/Graph/ToGraph.hs:197:29: warning : [ GHC-58520 ] [ -Wtype-equality-requires-operators ]
1768.07 s
[algebraic-graphs] The use of ‘~’ without TypeOperators
1768.07 s
[algebraic-graphs] will become an error in a future GHC release.
1768.07 s
[algebraic-graphs] Suggested fix: Perhaps you intended to use TypeOperators
1768.07 s
[algebraic-graphs] |
1768.07 s
[algebraic-graphs] 197 | preIntSet :: ToVertex t ~ Int => Int -> t -> IntSet
1768.07 s
[algebraic-graphs] | ^
1768.07 s
[algebraic-graphs]
1768.07 s
[algebraic-graphs] src/Algebra/Graph/ToGraph.hs:215:30: warning : [ GHC-58520 ] [ -Wtype-equality-requires-operators ]
1768.07 s
[algebraic-graphs] The use of ‘~’ without TypeOperators
1768.07 s
[algebraic-graphs] will become an error in a future GHC release.
1768.07 s
[algebraic-graphs] Suggested fix: Perhaps you intended to use TypeOperators
1768.07 s
[algebraic-graphs] |
1768.07 s
[algebraic-graphs] 215 | postIntSet :: ToVertex t ~ Int => Int -> t -> IntSet
1768.07 s
[algebraic-graphs] | ^
1768.07 s
[algebraic-graphs]
1768.07 s
[algebraic-graphs] src/Algebra/Graph/ToGraph.hs:303:37: warning : [ GHC-58520 ] [ -Wtype-equality-requires-operators ]
1768.07 s
[algebraic-graphs] The use of ‘~’ without TypeOperators
1768.07 s
[algebraic-graphs] will become an error in a future GHC release.
1768.07 s
[algebraic-graphs] Suggested fix: Perhaps you intended to use TypeOperators
1768.08 s
[algebraic-graphs] |
1768.08 s
[algebraic-graphs] 303 | toAdjacencyIntMap :: ToVertex t ~ Int => t -> AIM.AdjacencyIntMap
1768.08 s
[algebraic-graphs] | ^
1768.08 s
[algebraic-graphs]
1768.08 s
[algebraic-graphs] src/Algebra/Graph/ToGraph.hs:312:46: warning : [ GHC-58520 ] [ -Wtype-equality-requires-operators ]
1768.08 s
[algebraic-graphs] The use of ‘~’ without TypeOperators
1768.08 s
[algebraic-graphs] will become an error in a future GHC release.
1768.08 s
[algebraic-graphs] Suggested fix: Perhaps you intended to use TypeOperators
1768.08 s
[algebraic-graphs] |
1768.08 s
[algebraic-graphs] 312 | toAdjacencyIntMapTranspose :: ToVertex t ~ Int => t -> AIM.AdjacencyIntMap
1768.08 s
[algebraic-graphs] | ^
1768.08 s
[algebraic-graphs]
1768.08 s
[algebraic-graphs] src/Algebra/Graph/ToGraph.hs:452:43: warning : [ GHC-58520 ] [ -Wtype-equality-requires-operators ]
1768.08 s
[algebraic-graphs] The use of ‘~’ without TypeOperators
1768.08 s
[algebraic-graphs] will become an error in a future GHC release.
1768.08 s
[algebraic-graphs] Suggested fix: Perhaps you intended to use TypeOperators
1768.08 s
[algebraic-graphs] |
1768.08 s
[algebraic-graphs] 452 | adjacencyIntMap :: (ToGraph t, ToVertex t ~ Int) => t -> IntMap IntSet
1768.08 s
[algebraic-graphs] | ^
1768.08 s
[algebraic-graphs]
1768.08 s
[algebraic-graphs] src/Algebra/Graph/ToGraph.hs:471:52: warning : [ GHC-58520 ] [ -Wtype-equality-requires-operators ]
1768.08 s
[algebraic-graphs] The use of ‘~’ without TypeOperators
1768.08 s
[algebraic-graphs] will become an error in a future GHC release.
1768.08 s
[algebraic-graphs] Suggested fix: Perhaps you intended to use TypeOperators
1768.08 s
[algebraic-graphs] |
1768.08 s
[algebraic-graphs] 471 | adjacencyIntMapTranspose :: (ToGraph t, ToVertex t ~ Int) => t -> IntMap IntSet
1768.08 s
[algebraic-graphs] | ^
1768.08 s
[algebraic-graphs] [14 of 29] Compiling Algebra.Graph.Relation ( src/Algebra/Graph/Relation.hs, dist/build/Algebra/Graph/Relation.p_o )
1768.08 s
[algebraic-graphs] [15 of 29] Compiling Algebra.Graph.Relation.Symmetric ( src/Algebra/Graph/Relation/Symmetric.hs, dist/build/Algebra/Graph/Relation/Symmetric.p_o )
1768.41 s
[algebraic-graphs] [16 of 29] Compiling Algebra.Graph.NonEmpty ( src/Algebra/Graph/NonEmpty.hs, dist/build/Algebra/Graph/NonEmpty.p_o )
1768.41 s
[algebraic-graphs] [17 of 29] Compiling Algebra.Graph.Labelled.AdjacencyMap ( src/Algebra/Graph/Labelled/AdjacencyMap.hs, dist/build/Algebra/Graph/Labelled/AdjacencyMap.p_o )
1768.41 s
[algebraic-graphs] [18 of 29] Compiling Algebra.Graph.Labelled ( src/Algebra/Graph/Labelled.hs, dist/build/Algebra/Graph/Labelled.p_o )
1768.79 s
[algebraic-graphs] [19 of 29] Compiling Algebra.Graph.Labelled.Example.Network ( src/Algebra/Graph/Labelled/Example/Network.hs, dist/build/Algebra/Graph/Labelled/Example/Network.p_o )
1769.01 s
[algebraic-graphs] [20 of 29] Compiling Algebra.Graph.Labelled.Example.Automaton ( src/Algebra/Graph/Labelled/Example/Automaton.hs, dist/build/Algebra/Graph/Labelled/Example/Automaton.p_o )
1769.15 s
[algebraic-graphs] [21 of 29] Compiling Algebra.Graph.Export ( src/Algebra/Graph/Export.hs, dist/build/Algebra/Graph/Export.p_o )
1769.15 s
[algebraic-graphs]
1769.15 s
[algebraic-graphs] src/Algebra/Graph/Export.hs:185:41: warning : [ GHC-58520 ] [ -Wtype-equality-requires-operators ]
1769.15 s
[algebraic-graphs] The use of ‘~’ without TypeOperators
1769.15 s
[algebraic-graphs] will become an error in a future GHC release.
1769.15 s
[algebraic-graphs] Suggested fix: Perhaps you intended to use TypeOperators
1769.15 s
[algebraic-graphs] |
1769.15 s
[algebraic-graphs] 185 | export :: (Ord a, ToGraph g, ToVertex g ~ a) => (a -> Doc s) -> (a -> a -> Doc s) -> g -> Doc s
1769.15 s
[algebraic-graphs] | ^
1769.15 s
[algebraic-graphs] [22 of 29] Compiling Algebra.Graph.Export.Dot ( src/Algebra/Graph/Export/Dot.hs, dist/build/Algebra/Graph/Export/Dot.p_o )
1769.15 s
[algebraic-graphs]
1769.15 s
[algebraic-graphs] src/Algebra/Graph/Export/Dot.hs:121:63: warning : [ GHC-58520 ] [ -Wtype-equality-requires-operators ]
1769.15 s
[algebraic-graphs] The use of ‘~’ without TypeOperators
1769.15 s
[algebraic-graphs] will become an error in a future GHC release.
1769.15 s
[algebraic-graphs] Suggested fix: Perhaps you intended to use TypeOperators
1769.15 s
[algebraic-graphs] |
1769.15 s
[algebraic-graphs] 121 | export :: (IsString s, Monoid s, Ord a, ToGraph g, ToVertex g ~ a) => Style a s -> g -> s
1769.15 s
[algebraic-graphs] | ^
1769.15 s
[algebraic-graphs]
1769.15 s
[algebraic-graphs] src/Algebra/Graph/Export/Dot.hs:165:78: warning : [ GHC-58520 ] [ -Wtype-equality-requires-operators ]
1769.15 s
[algebraic-graphs] The use of ‘~’ without TypeOperators
1769.15 s
[algebraic-graphs] will become an error in a future GHC release.
1769.15 s
[algebraic-graphs] Suggested fix: Perhaps you intended to use TypeOperators
1769.15 s
[algebraic-graphs] |
1769.15 s
[algebraic-graphs] 165 | exportAsIs :: (IsString s, Monoid s, Ord (ToVertex g), ToGraph g, ToVertex g ~ s) => g -> s
1769.15 s
[algebraic-graphs] | ^
1769.15 s
[algebraic-graphs] [23 of 29] Compiling Algebra.Graph.Undirected ( src/Algebra/Graph/Undirected.hs, dist/build/Algebra/Graph/Undirected.p_o )
1769.15 s
[algebraic-graphs] [24 of 29] Compiling Algebra.Graph.Class ( src/Algebra/Graph/Class.hs, dist/build/Algebra/Graph/Class.p_o )
1769.15 s
[algebraic-graphs] [25 of 29] Compiling Algebra.Graph.Relation.Transitive ( src/Algebra/Graph/Relation/Transitive.hs, dist/build/Algebra/Graph/Relation/Transitive.p_o )
1769.25 s
[algebraic-graphs] [26 of 29] Compiling Algebra.Graph.Relation.Reflexive ( src/Algebra/Graph/Relation/Reflexive.hs, dist/build/Algebra/Graph/Relation/Reflexive.p_o )
1769.25 s
[algebraic-graphs] [27 of 29] Compiling Algebra.Graph.Relation.Preorder ( src/Algebra/Graph/Relation/Preorder.hs, dist/build/Algebra/Graph/Relation/Preorder.p_o )
1769.26 s
[algebraic-graphs] [28 of 29] Compiling Algebra.Graph.Example.Todo ( src/Algebra/Graph/Example/Todo.hs, dist/build/Algebra/Graph/Example/Todo.p_o )
1769.29 s
[algebraic-graphs] [29 of 29] Compiling Data.Graph.Typed ( src/Data/Graph/Typed.hs, dist/build/Data/Graph/Typed.p_o )
1770.59 s
[algebraic-graphs] Preprocessing test suite 'main' for algebraic-graphs-0.7..
1770.59 s
[algebraic-graphs] Building test suite 'main' for algebraic-graphs-0.7..
1770.73 s
[algebraic-graphs] [ 1 of 23] Compiling Algebra.Graph.Test.Arbitrary ( test/Algebra/Graph/Test/Arbitrary.hs, dist/build/main/main-tmp/Algebra/Graph/Test/Arbitrary.o, dist/build/main/main-tmp/Algebra/Graph/Test/Arbitrary.dyn_o )
1771.60 s
[haskell-language-server] Preprocessing library 'hls-cabal-fmt-plugin' for haskell-language-server-2.12.0.0..
1771.60 s
[haskell-language-server] Building library 'hls-cabal-fmt-plugin' for haskell-language-server-2.12.0.0..
1771.70 s
[haskell-language-server] [1 of 1] Compiling Ide.Plugin.CabalFmt ( plugins/hls-cabal-fmt-plugin/src/Ide/Plugin/CabalFmt.hs, dist/build/hls-cabal-fmt-plugin/Ide/Plugin/CabalFmt.o, dist/build/hls-cabal-fmt-plugin/Ide/Plugin/CabalFmt.dyn_o )
1771.77 s
[algebraic-graphs] [ 2 of 23] Compiling Algebra.Graph.Test.API ( test/Algebra/Graph/Test/API.hs, dist/build/main/main-tmp/Algebra/Graph/Test/API.o, dist/build/main/main-tmp/Algebra/Graph/Test/API.dyn_o )
1773.50 s
[haskell-language-server] [1 of 1] Compiling Ide.Plugin.CabalFmt ( plugins/hls-cabal-fmt-plugin/src/Ide/Plugin/CabalFmt.hs, dist/build/hls-cabal-fmt-plugin/Ide/Plugin/CabalFmt.p_o )
1774.52 s
[algebraic-graphs] [ 3 of 23] Compiling Algebra.Graph.Test ( test/Algebra/Graph/Test.hs, dist/build/main/main-tmp/Algebra/Graph/Test.o, dist/build/main/main-tmp/Algebra/Graph/Test.dyn_o )
1774.52 s
[algebraic-graphs] [ 4 of 23] Compiling Algebra.Graph.Test.Acyclic.AdjacencyMap ( test/Algebra/Graph/Test/Acyclic/AdjacencyMap.hs, dist/build/main/main-tmp/Algebra/Graph/Test/Acyclic/AdjacencyMap.o, dist/build/main/main-tmp/Algebra/Graph/Test/Acyclic/AdjacencyMap.dyn_o )
1774.52 s
[algebraic-graphs] [ 5 of 23] Compiling Algebra.Graph.Test.Bipartite.AdjacencyMap ( test/Algebra/Graph/Test/Bipartite/AdjacencyMap.hs, dist/build/main/main-tmp/Algebra/Graph/Test/Bipartite/AdjacencyMap.o, dist/build/main/main-tmp/Algebra/Graph/Test/Bipartite/AdjacencyMap.dyn_o )
1776.28 s
[algebraic-graphs] [ 6 of 23] Compiling Algebra.Graph.Test.Example.Todo ( test/Algebra/Graph/Test/Example/Todo.hs, dist/build/main/main-tmp/Algebra/Graph/Test/Example/Todo.o, dist/build/main/main-tmp/Algebra/Graph/Test/Example/Todo.dyn_o )
1776.28 s
[algebraic-graphs] [ 7 of 23] Compiling Algebra.Graph.Test.Export ( test/Algebra/Graph/Test/Export.hs, dist/build/main/main-tmp/Algebra/Graph/Test/Export.o, dist/build/main/main-tmp/Algebra/Graph/Test/Export.dyn_o )
1776.28 s
[algebraic-graphs] [ 8 of 23] Compiling Algebra.Graph.Test.Generic ( test/Algebra/Graph/Test/Generic.hs, dist/build/main/main-tmp/Algebra/Graph/Test/Generic.o, dist/build/main/main-tmp/Algebra/Graph/Test/Generic.dyn_o )
1779.40 s
[algebraic-graphs] [ 9 of 23] Compiling Algebra.Graph.Test.AdjacencyMap ( test/Algebra/Graph/Test/AdjacencyMap.hs, dist/build/main/main-tmp/Algebra/Graph/Test/AdjacencyMap.o, dist/build/main/main-tmp/Algebra/Graph/Test/AdjacencyMap.dyn_o )
1779.55 s
[algebraic-graphs] [10 of 23] Compiling Algebra.Graph.Test.AdjacencyIntMap ( test/Algebra/Graph/Test/AdjacencyIntMap.hs, dist/build/main/main-tmp/Algebra/Graph/Test/AdjacencyIntMap.o, dist/build/main/main-tmp/Algebra/Graph/Test/AdjacencyIntMap.dyn_o )
1779.55 s
[algebraic-graphs] [11 of 23] Compiling Algebra.Graph.Test.Graph ( test/Algebra/Graph/Test/Graph.hs, dist/build/main/main-tmp/Algebra/Graph/Test/Graph.o, dist/build/main/main-tmp/Algebra/Graph/Test/Graph.dyn_o )
1780.16 s
[algebraic-graphs] [12 of 23] Compiling Algebra.Graph.Test.Internal ( test/Algebra/Graph/Test/Internal.hs, dist/build/main/main-tmp/Algebra/Graph/Test/Internal.o, dist/build/main/main-tmp/Algebra/Graph/Test/Internal.dyn_o )
1780.16 s
[algebraic-graphs] [13 of 23] Compiling Algebra.Graph.Test.Label ( test/Algebra/Graph/Test/Label.hs, dist/build/main/main-tmp/Algebra/Graph/Test/Label.o, dist/build/main/main-tmp/Algebra/Graph/Test/Label.dyn_o )
1780.16 s
[algebraic-graphs] [14 of 23] Compiling Algebra.Graph.Test.Labelled.AdjacencyMap ( test/Algebra/Graph/Test/Labelled/AdjacencyMap.hs, dist/build/main/main-tmp/Algebra/Graph/Test/Labelled/AdjacencyMap.o, dist/build/main/main-tmp/Algebra/Graph/Test/Labelled/AdjacencyMap.dyn_o )
1780.92 s
[algebraic-graphs] [15 of 23] Compiling Algebra.Graph.Test.Labelled.Graph ( test/Algebra/Graph/Test/Labelled/Graph.hs, dist/build/main/main-tmp/Algebra/Graph/Test/Labelled/Graph.o, dist/build/main/main-tmp/Algebra/Graph/Test/Labelled/Graph.dyn_o )
1780.92 s
[algebraic-graphs] [16 of 23] Compiling Algebra.Graph.Test.NonEmpty.AdjacencyMap ( test/Algebra/Graph/Test/NonEmpty/AdjacencyMap.hs, dist/build/main/main-tmp/Algebra/Graph/Test/NonEmpty/AdjacencyMap.o, dist/build/main/main-tmp/Algebra/Graph/Test/NonEmpty/AdjacencyMap.dyn_o )
1780.92 s
[algebraic-graphs] [17 of 23] Compiling Algebra.Graph.Test.NonEmpty.Graph ( test/Algebra/Graph/Test/NonEmpty/Graph.hs, dist/build/main/main-tmp/Algebra/Graph/Test/NonEmpty/Graph.o, dist/build/main/main-tmp/Algebra/Graph/Test/NonEmpty/Graph.dyn_o )
1780.92 s
[algebraic-graphs] [18 of 23] Compiling Algebra.Graph.Test.Relation ( test/Algebra/Graph/Test/Relation.hs, dist/build/main/main-tmp/Algebra/Graph/Test/Relation.o, dist/build/main/main-tmp/Algebra/Graph/Test/Relation.dyn_o )
1780.92 s
[algebraic-graphs] [19 of 23] Compiling Algebra.Graph.Test.Relation.Symmetric ( test/Algebra/Graph/Test/Relation/Symmetric.hs, dist/build/main/main-tmp/Algebra/Graph/Test/Relation/Symmetric.o, dist/build/main/main-tmp/Algebra/Graph/Test/Relation/Symmetric.dyn_o )
1780.92 s
[algebraic-graphs] [20 of 23] Compiling Algebra.Graph.Test.RewriteRules ( test/Algebra/Graph/Test/RewriteRules.hs, dist/build/main/main-tmp/Algebra/Graph/Test/RewriteRules.o, dist/build/main/main-tmp/Algebra/Graph/Test/RewriteRules.dyn_o )
1780.92 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:43:1: emptyI === emptyIR passed.
1780.92 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:49:1: vertexI === vertexIR passed.
1780.92 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:56:1: overlayI === overlayIR passed.
1780.92 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:63:1: connectI === connectIR passed.
1780.92 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:69:1: overlaysC `hasNoType` GHC.Types.List passed.
1780.92 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:76:1: overlaysP === overlaysPR passed.
1780.92 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:82:1: verticesCP `hasNoType` GHC.Types.List passed.
1780.92 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:83:1: verticesCP `hasNoType` Algebra.Graph.Graph passed.
1780.92 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:89:1: connectsC `hasNoType` GHC.Types.List passed.
1780.92 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:96:1: connectsP === connectsPR passed.
1780.92 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:102:1: isSubgraphOfC `hasNoType` Algebra.Graph.Graph passed.
1780.92 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:108:1: cliqueCP `hasNoType` GHC.Types.List passed.
1780.92 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:109:1: cliqueCP `hasNoType` Algebra.Graph.Graph passed.
1780.92 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:115:1: edgesCP `hasNoType` GHC.Types.List passed.
1780.92 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:116:1: edgesCP `hasNoType` Algebra.Graph.Graph passed.
1780.92 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:122:1: starCP `hasNoType` GHC.Types.List passed.
1780.92 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:123:1: starCP `hasNoType` Algebra.Graph.Graph passed.
1780.92 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:130:1: fmapCP `hasNoType` Algebra.Graph.Graph passed.
1780.92 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:137:1: bindC === bindCR passed.
1780.92 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:144:1: bindP === bindPR passed.
1780.92 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:151:1: apC === apCR passed.
1780.92 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:159:1: apP === apPR passed.
1780.92 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:165:1: eqC `hasNoType` Algebra.Graph.Graph passed.
1780.92 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:170:1: eqT `hasNoType` Algebra.Graph.AdjacencyMap.AdjacencyMap passed.
1780.92 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:176:1: ordC `hasNoType` Algebra.Graph.Graph passed.
1780.92 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:181:1: ordT `hasNoType` Algebra.Graph.AdjacencyMap.AdjacencyMap passed.
1780.92 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:187:1: isEmptyC `hasNoType` Algebra.Graph.Graph passed.
1780.92 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:193:1: sizeC `hasNoType` Algebra.Graph.Graph passed.
1780.92 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:199:1: vertexSetC `hasNoType` Algebra.Graph.Graph passed.
1780.92 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:205:1: vertexSetC `hasNoType` Algebra.Graph.Graph passed.
1780.93 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:210:1: vertexCountT `hasNoType` Data.Set.Internal.Set passed.
1780.93 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:216:1: edgeCountC `hasNoType` Algebra.Graph.Graph passed.
1780.93 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:221:1: edgeCountT `hasNoType` Data.Set.Internal.Set passed.
1780.93 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:227:1: vertexListCP `hasNoType` Algebra.Graph.Graph passed.
1780.93 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:228:1: vertexListCP `hasNoType` GHC.Types.List passed.
1780.93 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:233:1: vertexListT `hasNoType` Data.Set.Internal.Set passed.
1780.93 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:239:1: edgeSetC `hasNoType` Algebra.Graph.Graph passed.
1780.93 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:244:1: vertexListT `hasNoType` Algebra.Graph.AdjacencyMap.AdjacencyMap passed.
1780.93 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:250:1: edgeListCP `hasNoType` Algebra.Graph.Graph passed.
1780.93 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:251:1: edgeListCP `hasNoType` GHC.Types.List passed.
1780.93 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:256:1: edgeListT `hasNoType` Algebra.Graph.AdjacencyMap.AdjacencyMap passed.
1780.93 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:262:1: hasVertexC `hasNoType` Algebra.Graph.Graph passed.
1780.93 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:268:1: hasEdgeC `hasNoType` Algebra.Graph.Graph passed.
1780.93 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:274:1: adjacencyListC `hasNoType` Algebra.Graph.Graph passed.
1780.93 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:280:1: pathP `hasNoType` Algebra.Graph.Graph passed.
1780.93 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:286:1: circuitP `hasNoType` Algebra.Graph.Graph passed.
1780.93 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:292:1: bicliqueCP `hasNoType` GHC.Types.List passed.
1780.93 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:293:1: bicliqueCP `hasNoType` Algebra.Graph.Graph passed.
1780.93 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:301:1: replaceVertexCP `hasNoType` Algebra.Graph.Graph passed.
1780.93 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:309:1: mergeVerticesCP `hasNoType` Algebra.Graph.Graph passed.
1780.93 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:316:1: splitVertexCP `hasNoType` GHC.Types.List passed.
1780.93 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:317:1: splitVertexCP `hasNoType` Algebra.Graph.Graph passed.
1780.93 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:324:1: transposeCP `hasNoType` Algebra.Graph.Graph passed.
1780.93 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:339:1: simplifyC === simplifyCR passed.
1780.93 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:345:1: composeCP `hasNoType` Algebra.Graph.Graph passed.
1780.93 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:352:1: induceCP `hasNoType` Algebra.Graph.Graph passed.
1780.93 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:359:1: induceJustCP `hasNoType` Algebra.Graph.Graph passed.
1780.93 s
[algebraic-graphs] test/Algebra/Graph/Test/RewriteRules.hs:365:1: contextC `hasNoType` Algebra.Graph.Graph passed.
1780.93 s
[algebraic-graphs] inspection testing successful
1780.93 s
[algebraic-graphs] expected successes: 58
1780.93 s
[algebraic-graphs] [21 of 23] Compiling Algebra.Graph.Test.Undirected ( test/Algebra/Graph/Test/Undirected.hs, dist/build/main/main-tmp/Algebra/Graph/Test/Undirected.o, dist/build/main/main-tmp/Algebra/Graph/Test/Undirected.dyn_o )
1780.93 s
[algebraic-graphs] [22 of 23] Compiling Data.Graph.Test.Typed ( test/Data/Graph/Test/Typed.hs, dist/build/main/main-tmp/Data/Graph/Test/Typed.o, dist/build/main/main-tmp/Data/Graph/Test/Typed.dyn_o )
1780.93 s
[algebraic-graphs] [23 of 23] Compiling Main ( test/Main.hs, dist/build/main/main-tmp/Main.o, dist/build/main/main-tmp/Main.dyn_o )
1781.19 s
[haskell-language-server] Preprocessing library 'hls-eval-plugin' for haskell-language-server-2.12.0.0..
1781.19 s
[haskell-language-server] Building library 'hls-eval-plugin' for haskell-language-server-2.12.0.0..
1781.45 s
[haskell-language-server] [ 1 of 10] Compiling Ide.Plugin.Eval.Config ( plugins/hls-eval-plugin/src/Ide/Plugin/Eval/Config.hs, dist/build/hls-eval-plugin/Ide/Plugin/Eval/Config.o, dist/build/hls-eval-plugin/Ide/Plugin/Eval/Config.dyn_o )
1781.59 s
[algebraic-graphs] [24 of 24] Linking dist/build/main/main
1781.92 s
[haskell-language-server] [ 2 of 10] Compiling Ide.Plugin.Eval.Parse.Option ( plugins/hls-eval-plugin/src/Ide/Plugin/Eval/Parse/Option.hs, dist/build/hls-eval-plugin/Ide/Plugin/Eval/Parse/Option.o, dist/build/hls-eval-plugin/Ide/Plugin/Eval/Parse/Option.dyn_o )
1781.97 s
[haskell-language-server] [ 3 of 10] Compiling Ide.Plugin.Eval.Util ( plugins/hls-eval-plugin/src/Ide/Plugin/Eval/Util.hs, dist/build/hls-eval-plugin/Ide/Plugin/Eval/Util.o, dist/build/hls-eval-plugin/Ide/Plugin/Eval/Util.dyn_o )
1782.18 s
[haskell-language-server] [ 4 of 10] Compiling Ide.Plugin.Eval.GHC ( plugins/hls-eval-plugin/src/Ide/Plugin/Eval/GHC.hs, dist/build/hls-eval-plugin/Ide/Plugin/Eval/GHC.o, dist/build/hls-eval-plugin/Ide/Plugin/Eval/GHC.dyn_o )
1782.42 s
[algebraic-graphs] Phase: checkPhase
1782.45 s
[algebraic-graphs] Running 1 test suites...
1782.45 s
[algebraic-graphs] Test suite main: RUNNING...
1783.13 s
[haskell-language-server] [ 5 of 10] Compiling Ide.Plugin.Eval.Types ( plugins/hls-eval-plugin/src/Ide/Plugin/Eval/Types.hs, dist/build/hls-eval-plugin/Ide/Plugin/Eval/Types.o, dist/build/hls-eval-plugin/Ide/Plugin/Eval/Types.dyn_o )
1787.68 s
[haskell-language-server] [ 6 of 10] Compiling Ide.Plugin.Eval.Rules ( plugins/hls-eval-plugin/src/Ide/Plugin/Eval/Rules.hs, dist/build/hls-eval-plugin/Ide/Plugin/Eval/Rules.o, dist/build/hls-eval-plugin/Ide/Plugin/Eval/Rules.dyn_o )
1788.12 s
[haskell-language-server] [ 7 of 10] Compiling Ide.Plugin.Eval.Parse.Comments ( plugins/hls-eval-plugin/src/Ide/Plugin/Eval/Parse/Comments.hs, dist/build/hls-eval-plugin/Ide/Plugin/Eval/Parse/Comments.o, dist/build/hls-eval-plugin/Ide/Plugin/Eval/Parse/Comments.dyn_o )
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.Show ============
1788.22 s
[algebraic-graphs] OK: show empty == "empty"
1788.22 s
[algebraic-graphs] OK: show (shrink 1) == "vertex 1"
1788.22 s
[algebraic-graphs] OK: show (shrink $ 1 + 2) == "vertices [1,2]"
1788.22 s
[algebraic-graphs] OK: show (shrink $ 1 * 2) == "(fromJust . toAcyclic) (edge 1 2)"
1788.22 s
[algebraic-graphs] OK: show (shrink $ 1 * 2 * 3) == "(fromJust . toAcyclic) (edges [(1,2),(1,3),(2,3)])"
1788.22 s
[algebraic-graphs] OK: show (shrink $ 1 * 2 + 3) == "(fromJust . toAcyclic) (overlay (vertex 3) (edge 1 2))"
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.fromAcyclic ============
1788.22 s
[algebraic-graphs] OK: fromAcyclic empty == empty
1788.22 s
[algebraic-graphs] OK: fromAcyclic . vertex == vertex
1788.22 s
[algebraic-graphs] OK: fromAcyclic (shrink $ 1 * 3 * 2) == star 1 [2,3]
1788.22 s
[algebraic-graphs] OK: vertexCount . fromAcyclic == vertexCount
1788.22 s
[algebraic-graphs] OK: edgeCount . fromAcyclic == edgeCount
1788.22 s
[algebraic-graphs] OK: isAcyclic . fromAcyclic == const True
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.empty ============
1788.22 s
[algebraic-graphs] OK: isEmpty empty == True
1788.22 s
[algebraic-graphs] OK: hasVertex x empty == False
1788.22 s
[algebraic-graphs] OK: vertexCount empty == 0
1788.22 s
[algebraic-graphs] OK: edgeCount empty == 0
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.vertex ============
1788.22 s
[algebraic-graphs] OK: isEmpty (vertex x) == False
1788.22 s
[algebraic-graphs] OK: hasVertex x (vertex y) == (x == y)
1788.22 s
[algebraic-graphs] OK: vertexCount (vertex x) == 1
1788.22 s
[algebraic-graphs] OK: edgeCount (vertex x) == 0
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.vertices ============
1788.22 s
[algebraic-graphs] OK: vertices [] == empty
1788.22 s
[algebraic-graphs] OK: vertices [x] == vertex x
1788.22 s
[algebraic-graphs] OK: hasVertex x . vertices == elem x
1788.22 s
[algebraic-graphs] OK: vertexCount . vertices == length . nub
1788.22 s
[algebraic-graphs] OK: vertexSet . vertices == Set.fromList
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.union ============
1788.22 s
[algebraic-graphs] OK: vertexSet (union x y) == <correct result>
1788.22 s
[algebraic-graphs] OK: edgeSet (union x y) == <correct result>
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.join ============
1788.22 s
[algebraic-graphs] OK: vertexSet (join x y) == <correct result>
1788.22 s
[algebraic-graphs] OK: edgeSet (join x y) == <correct result>
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.isSubgraphOf ============
1788.22 s
[algebraic-graphs] OK: isSubgraphOf empty x == True
1788.22 s
[algebraic-graphs] OK: isSubgraphOf (vertex x) empty == False
1788.22 s
[algebraic-graphs] OK: isSubgraphOf (induce p x) x == True
1788.22 s
[algebraic-graphs] OK: isSubgraphOf x (transitiveClosure x) == True
1788.22 s
[algebraic-graphs] OK: isSubgraphOf x y ==> x <= y
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.isEmpty ============
1788.22 s
[algebraic-graphs] OK: isEmpty empty == True
1788.22 s
[algebraic-graphs] OK: isEmpty (vertex x) == False
1788.22 s
[algebraic-graphs] OK: isEmpty (removeVertex x $ vertex x) == True
1788.22 s
[algebraic-graphs] OK: isEmpty (removeEdge 1 2 $ shrink $ 1 * 2) == False
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.hasVertex ============
1788.22 s
[algebraic-graphs] OK: hasVertex x empty == False
1788.22 s
[algebraic-graphs] OK: hasVertex x (vertex y) == (x == y)
1788.22 s
[algebraic-graphs] OK: hasVertex x . removeVertex x == const False
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.hasEdge ============
1788.22 s
[algebraic-graphs] OK: hasEdge x y empty == False
1788.22 s
[algebraic-graphs] OK: hasEdge x y (vertex z) == False
1788.22 s
[algebraic-graphs] OK: hasEdge 1 2 (shrink $ 1 * 2) == True
1788.22 s
[algebraic-graphs] OK: hasEdge x y . removeEdge x y == const False
1788.22 s
[algebraic-graphs] OK: hasEdge x y == elem (x,y) . edgeList
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.vertexCount ============
1788.22 s
[algebraic-graphs] OK: vertexCount empty == 0
1788.22 s
[algebraic-graphs] OK: vertexCount (vertex x) == 1
1788.22 s
[algebraic-graphs] OK: vertexCount == length . vertexList
1788.22 s
[algebraic-graphs] OK: vertexCount x < vertexCount y ==> x < y
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.edgeCount ============
1788.22 s
[algebraic-graphs] OK: edgeCount empty == 0
1788.22 s
[algebraic-graphs] OK: edgeCount (vertex x) == 0
1788.22 s
[algebraic-graphs] OK: edgeCount (shrink $ 1 * 2) == 1
1788.22 s
[algebraic-graphs] OK: edgeCount == length . edgeList
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.vertexList ============
1788.22 s
[algebraic-graphs] OK: vertexList empty == []
1788.22 s
[algebraic-graphs] OK: vertexList (vertex x) == [x]
1788.22 s
[algebraic-graphs] OK: vertexList . vertices == nub . sort
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.edgeList ============
1788.22 s
[algebraic-graphs] OK: edgeList empty == []
1788.22 s
[algebraic-graphs] OK: edgeList (vertex x) == []
1788.22 s
[algebraic-graphs] OK: edgeList (shrink $ 2 * 1) == [(2,1)]
1788.22 s
[algebraic-graphs] OK: edgeList . transpose == sort . map swap . edgeList
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.adjacencyList ============
1788.22 s
[algebraic-graphs] OK: adjacencyList empty == []
1788.22 s
[algebraic-graphs] OK: adjacencyList (vertex x) == [(x, [])]
1788.22 s
[algebraic-graphs] OK: adjacencyList (shrink $ 1 * 2) == [(1, [2]), (2, [])]
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.vertexSet ============
1788.22 s
[algebraic-graphs] OK: vertexSet empty == Set.empty
1788.22 s
[algebraic-graphs] OK: vertexSet . vertex == Set.singleton
1788.22 s
[algebraic-graphs] OK: vertexSet . vertices == Set.fromList
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.edgeSet ============
1788.22 s
[algebraic-graphs] OK: edgeSet empty == Set.empty
1788.22 s
[algebraic-graphs] OK: edgeSet (vertex x) == Set.empty
1788.22 s
[algebraic-graphs] OK: edgeSet (shrink $ 1 * 2) == Set.singleton (1,2)
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.preSet ============
1788.22 s
[algebraic-graphs] OK: preSet x empty == Set.empty
1788.22 s
[algebraic-graphs] OK: preSet x (vertex x) == Set.empty
1788.22 s
[algebraic-graphs] OK: preSet 1 (shrink $ 1 * 2) == Set.empty
1788.22 s
[algebraic-graphs] OK: preSet 2 (shrink $ 1 * 2) == Set.fromList [1]
1788.22 s
[algebraic-graphs] OK: Set.member x . preSet x == const False
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.postSet ============
1788.22 s
[algebraic-graphs] OK: postSet x empty == Set.empty
1788.22 s
[algebraic-graphs] OK: postSet x (vertex x) == Set.empty
1788.22 s
[algebraic-graphs] OK: postSet 1 (shrink $ 1 * 2) == Set.fromList [2]
1788.22 s
[algebraic-graphs] OK: postSet 2 (shrink $ 1 * 2) == Set.empty
1788.22 s
[algebraic-graphs] OK: Set.member x . postSet x == const False
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.removeVertex ============
1788.22 s
[algebraic-graphs] OK: removeVertex x (vertex x) == empty
1788.22 s
[algebraic-graphs] OK: removeVertex 1 (vertex 2) == vertex 2
1788.22 s
[algebraic-graphs] OK: removeVertex 1 (shrink $ 1 * 2) == vertex 2
1788.22 s
[algebraic-graphs] OK: removeVertex x . removeVertex x == removeVertex x
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.removeEdge ============
1788.22 s
[algebraic-graphs] OK: removeEdge 1 2 (shrink $ 1 * 2) == vertices [1,2]
1788.22 s
[algebraic-graphs] OK: removeEdge x y . removeEdge x y == removeEdge x y
1788.22 s
[algebraic-graphs] OK: removeEdge x y . removeVertex x == removeVertex x
1788.22 s
[algebraic-graphs] OK: removeEdge 1 2 (shrink $ 1 * 2 * 3) == shrink ((1 + 2) * 3)
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.transpose ============
1788.22 s
[algebraic-graphs] OK: transpose empty == empty
1788.22 s
[algebraic-graphs] OK: transpose (vertex x) == vertex x
1788.22 s
[algebraic-graphs] OK: transpose . transpose == id
1788.22 s
[algebraic-graphs] OK: edgeList . transpose == sort . map swap . edgeList
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.induce ============
1788.22 s
[algebraic-graphs] OK: induce (const True ) x == x
1788.22 s
[algebraic-graphs] OK: induce (const False) x == empty
1788.22 s
[algebraic-graphs] OK: induce (/= x) == removeVertex x
1788.22 s
[algebraic-graphs] OK: induce p . induce q == induce (\x -> p x && q x)
1788.22 s
[algebraic-graphs] OK: isSubgraphOf (induce p x) x == True
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.induceJust ============
1788.22 s
[algebraic-graphs] OK: induceJust (vertex Nothing) == empty
1788.22 s
[algebraic-graphs] OK: induceJust . vertex . Just == vertex
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.box ============
1788.22 s
[algebraic-graphs] OK: edgeList (box (shrink $ 1 * 2) (shrink $ 10 * 20)) == <correct result>
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] OK: box x y ~~ box y x
1788.22 s
[algebraic-graphs] OK: box x (vertex ()) ~~ x
1788.22 s
[algebraic-graphs] OK: box x empty ~~ empty
1788.22 s
[algebraic-graphs] OK: box x (box y z) ~~ box (box x y) z
1788.22 s
[algebraic-graphs] OK: transpose (box x y) == box (transpose x) (transpose y)
1788.22 s
[algebraic-graphs] OK: vertexCount (box x y) == vertexCount x * vertexCount y
1788.22 s
[algebraic-graphs] OK: edgeCount (box x y) <= vertexCount x * edgeCount y + edgeCount x * vertexCount y
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.transitiveClosure ============
1788.22 s
[algebraic-graphs] OK: transitiveClosure empty == empty
1788.22 s
[algebraic-graphs] OK: transitiveClosure (vertex x) == vertex x
1788.22 s
[algebraic-graphs] OK: transitiveClosure (shrink $ 1 * 2 + 2 * 3) == shrink (1 * 2 + 1 * 3 + 2 * 3)
1788.22 s
[algebraic-graphs] OK: transitiveClosure . transitiveClosure == transitiveClosure
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.topSort ============
1788.22 s
[algebraic-graphs] OK: topSort empty == []
1788.22 s
[algebraic-graphs] OK: topSort (vertex x) == [x]
1788.22 s
[algebraic-graphs] OK: topSort (shrink $ 1 * (2 + 4) + 3 * 4) == [1, 2, 3, 4]
1788.22 s
[algebraic-graphs] OK: topSort (join x y) == fmap Left (topSort x) ++ fmap Right (topSort y)
1788.22 s
[algebraic-graphs] OK: Right . topSort == AM.topSort . fromAcyclic
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.scc ============
1788.22 s
[algebraic-graphs] OK: scc empty == empty
1788.22 s
[algebraic-graphs] OK: scc (vertex x) == vertex (NonEmpty.vertex x)
1788.22 s
[algebraic-graphs] OK: scc (edge 1 1) == vertex (NonEmpty.edge 1 1)
1788.22 s
[algebraic-graphs] OK: edgeList $ scc (edge 1 2) == [ (NonEmpty.vertex 1, NonEmpty.vertex 2) ]
1788.22 s
[algebraic-graphs] OK: edgeList $ scc (3 * 1 * 4 * 1 * 5) == <correct result>
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.toAcyclic ============
1788.22 s
[algebraic-graphs] OK: toAcyclic (path [1,2,3]) == Just (shrink $ 1 * 2 + 2 * 3)
1788.22 s
[algebraic-graphs] OK: toAcyclic (clique [3,2,1]) == Just (transpose (shrink $ 1 * 2 * 3))
1788.22 s
[algebraic-graphs] OK: toAcyclic (circuit [1,2,3]) == Nothing
1788.22 s
[algebraic-graphs] OK: toAcyclic . fromAcyclic == Just
1788.22 s
[algebraic-graphs]
1788.22 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.toAcyclicOrd ============
1788.22 s
[algebraic-graphs] OK: toAcyclicOrd empty == empty
1788.22 s
[algebraic-graphs] OK: toAcyclicOrd . vertex == vertex
1788.22 s
[algebraic-graphs] OK: toAcyclicOrd (1 + 2) == shrink (1 + 2)
1788.22 s
[algebraic-graphs] OK: toAcyclicOrd (1 * 2) == shrink (1 * 2)
1788.22 s
[algebraic-graphs] OK: toAcyclicOrd (2 * 1) == shrink (1 + 2)
1788.22 s
[algebraic-graphs] OK: toAcyclicOrd (1 * 2 * 1) == shrink (1 * 2)
1790.30 s
[haskell-language-server] [ 8 of 10] Compiling Ide.Plugin.Eval.Code ( plugins/hls-eval-plugin/src/Ide/Plugin/Eval/Code.hs, dist/build/hls-eval-plugin/Ide/Plugin/Eval/Code.o, dist/build/hls-eval-plugin/Ide/Plugin/Eval/Code.dyn_o )
1790.30 s
[haskell-language-server] [ 9 of 10] Compiling Ide.Plugin.Eval.Handlers ( plugins/hls-eval-plugin/src/Ide/Plugin/Eval/Handlers.hs, dist/build/hls-eval-plugin/Ide/Plugin/Eval/Handlers.o, dist/build/hls-eval-plugin/Ide/Plugin/Eval/Handlers.dyn_o )
1791.10 s
[algebraic-graphs] OK: toAcyclicOrd (1 * 2 * 3) == shrink (1 * 2 * 3)
1791.10 s
[algebraic-graphs]
1791.10 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.shrink ============
1791.10 s
[algebraic-graphs] OK: shrink . AM.vertex == vertex
1791.10 s
[algebraic-graphs] OK: shrink . AM.vertices == vertices
1791.10 s
[algebraic-graphs] OK: shrink . fromAcyclic == id
1791.10 s
[algebraic-graphs]
1791.10 s
[algebraic-graphs] ============ Acyclic.AdjacencyMap.consistent ============
1791.10 s
[algebraic-graphs] OK: Arbitrary
1791.10 s
[algebraic-graphs] OK: empty
1791.10 s
[algebraic-graphs] OK: vertex
1791.10 s
[algebraic-graphs] OK: vertices
1791.10 s
[algebraic-graphs] OK: union
1791.10 s
[algebraic-graphs] OK: join
1791.10 s
[algebraic-graphs] OK: transpose
1791.10 s
[algebraic-graphs] OK: box
1791.10 s
[algebraic-graphs] OK: transitiveClosure
1791.10 s
[algebraic-graphs] OK: scc
1791.10 s
[algebraic-graphs] OK: toAcyclic
1791.10 s
[algebraic-graphs] OK: toAcyclicOrd
1791.10 s
[algebraic-graphs]
1791.10 s
[algebraic-graphs] ============ AdjacencyIntMap ============
1791.10 s
[algebraic-graphs] OK: Axioms of graphs
1791.10 s
[algebraic-graphs]
1791.10 s
[algebraic-graphs] ============ AdjacencyIntMap.fromAdjacencyMap ============
1791.10 s
[algebraic-graphs] OK: fromAdjacencyMap == stars . AdjacencyMap.adjacencyList
1791.10 s
[algebraic-graphs]
1791.10 s
[algebraic-graphs] ============ AdjacencyIntMap.consistent ============
1791.10 s
[algebraic-graphs] OK: Consistency of the Arbitrary instance
1791.10 s
[algebraic-graphs]
1791.10 s
[algebraic-graphs] OK: consistent empty == True
1791.10 s
[algebraic-graphs] OK: consistent (vertex x) == True
1791.10 s
[algebraic-graphs] OK: consistent (overlay x y) == True
1791.10 s
[algebraic-graphs] OK: consistent (connect x y) == True
1791.10 s
[algebraic-graphs] OK: consistent (edge x y) == True
1791.10 s
[algebraic-graphs] OK: consistent (edges xs) == True
1791.10 s
[algebraic-graphs] OK: consistent (stars xs) == True
1791.10 s
[algebraic-graphs]
1791.10 s
[algebraic-graphs] ============ AdjacencyIntMap.Show ============
1791.10 s
[algebraic-graphs] OK: show (empty ) == "empty"
1791.10 s
[algebraic-graphs] OK: show (1 ) == "vertex 1"
1791.10 s
[algebraic-graphs] OK: show (1 + 2 ) == "vertices [1,2]"
1791.10 s
[algebraic-graphs] OK: show (1 * 2 ) == "edge 1 2"
1791.10 s
[algebraic-graphs] OK: show (1 * 2 * 3) == "edges [(1,2),(1,3),(2,3)]"
1791.10 s
[algebraic-graphs] OK: show (1 * 2 + 3) == "overlay (vertex 3) (edge 1 2)"
1791.10 s
[algebraic-graphs]
1791.10 s
[algebraic-graphs] OK: show (vertex (-1) ) == "vertex (-1)"
1791.10 s
[algebraic-graphs] OK: show (vertex (-1) + vertex (-2) ) == "vertices [-2,-1]"
1791.10 s
[algebraic-graphs] OK: show (vertex (-2) * vertex (-1) ) == "edge (-2) (-1)"
1791.10 s
[algebraic-graphs] OK: show (vertex (-3) * vertex (-2) * vertex (-1)) == "edges [(-3,-2),(-3,-1),(-2,-1)]"
1791.10 s
[algebraic-graphs] OK: show (vertex (-3) * vertex (-2) + vertex (-1)) == "overlay (vertex (-1)) (edge (-3) (-2))"
1791.10 s
[algebraic-graphs]
1791.10 s
[algebraic-graphs] ============ AdjacencyIntMap.Ord ============
1791.10 s
[algebraic-graphs] OK: vertex 1 < vertex 2
1791.10 s
[algebraic-graphs] OK: vertex 3 < edge 1 2
1791.10 s
[algebraic-graphs] OK: vertex 1 < edge 1 1
1791.10 s
[algebraic-graphs] OK: edge 1 1 < edge 1 2
1791.10 s
[algebraic-graphs] OK: edge 1 2 < edge 1 1 + edge 2 2
1791.10 s
[algebraic-graphs] OK: edge 1 2 < edge 1 3
1791.10 s
[algebraic-graphs] OK: x <= x + y
1791.10 s
[algebraic-graphs] OK: x + y <= x * y
1791.10 s
[algebraic-graphs]
1791.10 s
[algebraic-graphs] ============ AdjacencyIntMap.empty ============
1791.10 s
[algebraic-graphs] OK: isEmpty empty == True
1791.10 s
[algebraic-graphs] OK: hasVertex x empty == False
1791.10 s
[algebraic-graphs] OK: vertexCount empty == 0
1791.10 s
[algebraic-graphs] OK: edgeCount empty == 0
1791.10 s
[algebraic-graphs]
1791.10 s
[algebraic-graphs] ============ AdjacencyIntMap.vertex ============
1791.10 s
[algebraic-graphs] OK: isEmpty (vertex x) == False
1791.10 s
[algebraic-graphs] OK: hasVertex x (vertex y) == (x == y)
1791.10 s
[algebraic-graphs] OK: vertexCount (vertex x) == 1
1791.10 s
[algebraic-graphs] OK: edgeCount (vertex x) == 0
1791.10 s
[algebraic-graphs]
1791.10 s
[algebraic-graphs] ============ AdjacencyIntMap.edge ============
1791.10 s
[algebraic-graphs] OK: edge x y == connect (vertex x) (vertex y)
1791.10 s
[algebraic-graphs] OK: hasEdge x y (edge x y) == True
1791.10 s
[algebraic-graphs] OK: edgeCount (edge x y) == 1
1791.10 s
[algebraic-graphs] OK: vertexCount (edge 1 1) == 1
1791.10 s
[algebraic-graphs] OK: vertexCount (edge 1 2) == 2
1791.10 s
[algebraic-graphs]
1791.10 s
[algebraic-graphs] ============ AdjacencyIntMap.overlay ============
1791.10 s
[algebraic-graphs] OK: isEmpty (overlay x y) == isEmpty x && isEmpty y
1791.10 s
[algebraic-graphs] OK: hasVertex z (overlay x y) == hasVertex z x || hasVertex z y
1791.10 s
[algebraic-graphs] OK: vertexCount (overlay x y) >= vertexCount x
1791.10 s
[algebraic-graphs] OK: vertexCount (overlay x y) <= vertexCount x + vertexCount y
1791.10 s
[algebraic-graphs] OK: edgeCount (overlay x y) >= edgeCount x
1791.10 s
[algebraic-graphs] OK: edgeCount (overlay x y) <= edgeCount x + edgeCount y
1791.10 s
[algebraic-graphs] OK: vertexCount (overlay 1 2) == 2
1791.10 s
[algebraic-graphs] OK: edgeCount (overlay 1 2) == 0
1791.10 s
[algebraic-graphs]
1791.10 s
[algebraic-graphs] ============ AdjacencyIntMap.connect ============
1791.10 s
[algebraic-graphs] OK: isEmpty (connect x y) == isEmpty x && isEmpty y
1791.10 s
[algebraic-graphs] OK: hasVertex z (connect x y) == hasVertex z x || hasVertex z y
1791.10 s
[algebraic-graphs] OK: vertexCount (connect x y) >= vertexCount x
1791.10 s
[algebraic-graphs] OK: vertexCount (connect x y) <= vertexCount x + vertexCount y
1791.10 s
[algebraic-graphs] OK: edgeCount (connect x y) >= edgeCount x
1791.10 s
[algebraic-graphs] OK: edgeCount (connect x y) >= edgeCount y
1791.10 s
[algebraic-graphs] OK: edgeCount (connect x y) >= vertexCount x * vertexCount y
1791.10 s
[algebraic-graphs] OK: edgeCount (connect x y) <= vertexCount x * vertexCount y + edgeCount x + edgeCount y
1791.10 s
[algebraic-graphs] OK: vertexCount (connect 1 2) == 2
1791.10 s
[algebraic-graphs] OK: edgeCount (connect 1 2) == 1
1791.10 s
[algebraic-graphs]
1791.10 s
[algebraic-graphs] ============ AdjacencyIntMap.vertices ============
1791.10 s
[algebraic-graphs] OK: vertices [] == empty
1791.10 s
[algebraic-graphs] OK: vertices [x] == vertex x
1791.10 s
[algebraic-graphs] OK: vertices == overlays . map vertex
1791.10 s
[algebraic-graphs] OK: hasVertex x . vertices == elem x
1791.10 s
[algebraic-graphs] OK: vertexCount . vertices == length . nub
1791.10 s
[algebraic-graphs] OK: vertexSet . vertices == Set.fromList
1791.10 s
[algebraic-graphs]
1791.10 s
[algebraic-graphs] ============ AdjacencyIntMap.edges ============
1791.10 s
[algebraic-graphs] OK: edges [] == empty
1791.10 s
[algebraic-graphs] OK: edges [(x,y)] == edge x y
1791.10 s
[algebraic-graphs] OK: edges == overlays . map (uncurry edge)
1791.10 s
[algebraic-graphs] OK: edgeCount . edges == length . nub
1791.10 s
[algebraic-graphs]
1791.10 s
[algebraic-graphs] ============ AdjacencyIntMap.overlays ============
1791.10 s
[algebraic-graphs] OK: overlays [] == empty
1791.10 s
[algebraic-graphs] OK: overlays [x] == x
1791.10 s
[algebraic-graphs] OK: overlays [x,y] == overlay x y
1791.10 s
[algebraic-graphs] OK: overlays == foldr overlay empty
1791.10 s
[algebraic-graphs] OK: isEmpty . overlays == all isEmpty
1791.10 s
[algebraic-graphs]
1791.10 s
[algebraic-graphs] ============ AdjacencyIntMap.connects ============
1791.10 s
[algebraic-graphs] OK: connects [] == empty
1791.10 s
[algebraic-graphs] OK: connects [x] == x
1791.10 s
[algebraic-graphs] OK: connects [x,y] == connect x y
1791.10 s
[algebraic-graphs] OK: connects == foldr connect empty
1791.10 s
[algebraic-graphs] OK: isEmpty . connects == all isEmpty
1791.10 s
[algebraic-graphs]
1791.10 s
[algebraic-graphs] ============ AdjacencyIntMap.fromAdjacencyIntSets ============
1791.10 s
[algebraic-graphs] OK: fromAdjacencyIntSets [] == empty
1791.10 s
[algebraic-graphs] OK: fromAdjacencyIntSets [(x, IntSet.empty)] == vertex x
1791.10 s
[algebraic-graphs] OK: fromAdjacencyIntSets [(x, IntSet.singleton y)] == edge x y
1791.10 s
[algebraic-graphs] OK: fromAdjacencyIntSets . map (fmap IntSet.fromList) == stars
1791.10 s
[algebraic-graphs] OK: overlay (fromAdjacencyIntSets xs) (fromAdjacencyIntSets ys) == fromAdjacencyIntSets (xs ++ ys)
1791.10 s
[algebraic-graphs]
1791.10 s
[algebraic-graphs] ============ AdjacencyIntMap.isSubgraphOf ============
1791.10 s
[algebraic-graphs] OK: isSubgraphOf empty x == True
1791.10 s
[algebraic-graphs] OK: isSubgraphOf (vertex x) empty == False
1791.10 s
[algebraic-graphs] OK: isSubgraphOf x (overlay x y) == True
1791.10 s
[algebraic-graphs] OK: isSubgraphOf (overlay x y) (connect x y) == True
1791.10 s
[algebraic-graphs] OK: isSubgraphOf (path xs) (circuit xs) == True
1791.10 s
[algebraic-graphs] OK: isSubgraphOf x y ==> x <= y
1791.10 s
[algebraic-graphs]
1791.10 s
[algebraic-graphs] ============ AdjacencyIntMap.toGraph et al. ============
1791.10 s
[algebraic-graphs] OK: toGraph == foldg Empty Vertex Overlay Connect
1791.10 s
[algebraic-graphs] OK: foldg == Algebra.Graph.foldg . toGraph
1791.10 s
[algebraic-graphs] OK: isEmpty == foldg True (const False) (&&) (&&)
1791.10 s
[algebraic-graphs] OK: size == foldg 1 (const 1) (+) (+)
1791.10 s
[algebraic-graphs] OK: hasVertex x == foldg False (==x) (||) (||)
1791.10 s
[algebraic-graphs] OK: hasEdge x y == Algebra.Graph.hasEdge x y . toGraph
1791.10 s
[algebraic-graphs] OK: vertexCount == Set.size . vertexSet
1791.10 s
[algebraic-graphs] OK: edgeCount == Set.size . edgeSet
1791.10 s
[algebraic-graphs] OK: vertexList == Set.toAscList . vertexSet
1791.10 s
[algebraic-graphs] OK: edgeList == Set.toAscList . edgeSet
1791.10 s
[algebraic-graphs] OK: vertexSet == foldg Set.empty Set.singleton Set.union Set.union
1791.10 s
[algebraic-graphs] OK: vertexIntSet == foldg IntSet.empty IntSet.singleton IntSet.union IntSet.union
1791.10 s
[algebraic-graphs] OK: edgeSet == Algebra.Graph.AdjacencyMap.edgeSet . foldg empty vertex overlay connect
1791.10 s
[algebraic-graphs] OK: preSet x == Algebra.Graph.AdjacencyMap.preSet x . toAdjacencyMap
1791.10 s
[algebraic-graphs] OK: preIntSet x == Algebra.Graph.AdjacencyIntMap.preIntSet x . toAdjacencyIntMap
1791.10 s
[algebraic-graphs] OK: postSet x == Algebra.Graph.AdjacencyMap.postSet x . toAdjacencyMap
1791.10 s
[algebraic-graphs] OK: postIntSet x == Algebra.Graph.AdjacencyIntMap.postIntSet x . toAdjacencyIntMap
1791.10 s
[algebraic-graphs] OK: adjacencyList == Algebra.Graph.AdjacencyMap.adjacencyList . toAdjacencyMap
1791.10 s
[algebraic-graphs] OK: adjacencyMap == Algebra.Graph.AdjacencyMap.adjacencyMap . toAdjacencyMap
1791.10 s
[algebraic-graphs] OK: adjacencyIntMap == Algebra.Graph.AdjacencyIntMap.adjacencyIntMap . toAdjacencyIntMap
1791.10 s
[algebraic-graphs] OK: adjacencyMapTranspose == Algebra.Graph.AdjacencyMap.adjacencyMap . toAdjacencyMapTranspose
1791.10 s
[algebraic-graphs] OK: adjacencyIntMapTranspose == Algebra.Graph.AdjacencyIntMap.adjacencyIntMap . toAdjacencyIntMapTranspose
1791.10 s
[algebraic-graphs] OK: dfsForest == Algebra.Graph.AdjacencyMap.dfsForest . toAdjacencyMap
1791.10 s
[algebraic-graphs] OK: dfsForestFrom == Algebra.Graph.AdjacencyMap.dfsForestFrom . toAdjacencyMap
1791.10 s
[algebraic-graphs] OK: dfs == Algebra.Graph.AdjacencyMap.dfs . toAdjacencyMap
1791.10 s
[algebraic-graphs] OK: reachable == Algebra.Graph.AdjacencyMap.reachable . toAdjacencyMap
1791.10 s
[algebraic-graphs] OK: topSort == Algebra.Graph.AdjacencyMap.topSort . toAdjacencyMap
1791.10 s
[algebraic-graphs] OK: isAcyclic == Algebra.Graph.AdjacencyMap.isAcyclic . toAdjacencyMap
1791.10 s
[algebraic-graphs] OK: isTopSortOf vs == Algebra.Graph.AdjacencyMap.isTopSortOf vs . toAdjacencyMap
1791.10 s
[algebraic-graphs] OK: toAdjacencyMap == foldg empty vertex overlay connect
1791.10 s
[algebraic-graphs] OK: toAdjacencyMapTranspose == foldg empty vertex overlay (flip connect)
1791.10 s
[algebraic-graphs] OK: toAdjacencyIntMap == foldg empty vertex overlay connect
1791.10 s
[algebraic-graphs] OK: toAdjacencyIntMapTranspose == foldg empty vertex overlay (flip connect)
1791.10 s
[algebraic-graphs] OK: isDfsForestOf f == Algebra.Graph.AdjacencyMap.isDfsForestOf f . toAdjacencyMap
1791.76 s
[algebraic-graphs] OK: isTopSortOf vs == Algebra.Graph.AdjacencyMap.isTopSortOf vs . toAdjacencyMap
1791.76 s
[algebraic-graphs]
1791.76 s
[algebraic-graphs] ============ AdjacencyIntMap.foldg ============
1791.76 s
[algebraic-graphs] OK: foldg empty vertex overlay connect == id
1791.76 s
[algebraic-graphs] OK: foldg empty vertex overlay (flip connect) == transpose
1791.76 s
[algebraic-graphs] OK: foldg 1 (const 1) (+) (+) == size
1791.76 s
[algebraic-graphs] OK: foldg True (const False) (&&) (&&) == isEmpty
1791.76 s
[algebraic-graphs]
1791.76 s
[algebraic-graphs] ============ AdjacencyIntMap.isEmpty ============
1791.76 s
[algebraic-graphs] OK: isEmpty empty == True
1791.76 s
[algebraic-graphs] OK: isEmpty (overlay empty empty) == True
1791.76 s
[algebraic-graphs] OK: isEmpty (vertex x) == False
1791.76 s
[algebraic-graphs] OK: isEmpty (removeVertex x $ vertex x) == True
1791.76 s
[algebraic-graphs] OK: isEmpty (removeEdge x y $ edge x y) == False
1791.76 s
[algebraic-graphs]
1791.76 s
[algebraic-graphs] ============ AdjacencyIntMap.hasVertex ============
1791.76 s
[algebraic-graphs] OK: hasVertex x empty == False
1791.76 s
[algebraic-graphs] OK: hasVertex x (vertex y) == (x == y)
1791.76 s
[algebraic-graphs] OK: hasVertex x . removeVertex x == const False
1791.76 s
[algebraic-graphs]
1791.76 s
[algebraic-graphs] ============ AdjacencyIntMap.hasEdge ============
1791.76 s
[algebraic-graphs] OK: hasEdge x y empty == False
1791.76 s
[algebraic-graphs] OK: hasEdge x y (vertex z) == False
1791.76 s
[algebraic-graphs] OK: hasEdge x y (edge x y) == True
1791.76 s
[algebraic-graphs] OK: hasEdge x y . removeEdge x y == const False
1791.76 s
[algebraic-graphs] OK: hasEdge x y == elem (x,y) . edgeList
1791.76 s
[algebraic-graphs]
1791.76 s
[algebraic-graphs] ============ AdjacencyIntMap.vertexCount ============
1791.76 s
[algebraic-graphs] OK: vertexCount empty == 0
1791.76 s
[algebraic-graphs] OK: vertexCount (vertex x) == 1
1791.76 s
[algebraic-graphs] OK: vertexCount == length . vertexList
1791.76 s
[algebraic-graphs] OK: vertexCount x < vertexCount y ==> x < y
1791.76 s
[algebraic-graphs]
1791.76 s
[algebraic-graphs] ============ AdjacencyIntMap.edgeCount ============
1791.76 s
[algebraic-graphs] OK: edgeCount empty == 0
1791.76 s
[algebraic-graphs] OK: edgeCount (vertex x) == 0
1791.76 s
[algebraic-graphs] OK: edgeCount (edge x y) == 1
1791.76 s
[algebraic-graphs] OK: edgeCount == length . edgeList
1791.76 s
[algebraic-graphs]
1791.76 s
[algebraic-graphs] ============ AdjacencyIntMap.vertexList ============
1791.76 s
[algebraic-graphs] OK: vertexList empty == []
1791.76 s
[algebraic-graphs] OK: vertexList (vertex x) == [x]
1791.76 s
[algebraic-graphs] OK: vertexList . vertices == nub . sort
1791.76 s
[algebraic-graphs]
1791.76 s
[algebraic-graphs] ============ AdjacencyIntMap.vertexSet ============
1791.76 s
[algebraic-graphs] OK: vertexSet empty == Set.empty
1791.76 s
[algebraic-graphs] OK: vertexSet . vertex == Set.singleton
1791.76 s
[algebraic-graphs] OK: vertexSet . vertices == Set.fromList
1791.76 s
[algebraic-graphs]
1791.76 s
[algebraic-graphs] ============ AdjacencyIntMap.vertexIntSet ============
1791.76 s
[algebraic-graphs] OK: vertexIntSet empty == IntSet.empty
1791.76 s
[algebraic-graphs] OK: vertexIntSet . vertex == IntSet.singleton
1791.76 s
[algebraic-graphs] OK: vertexIntSet . vertices == IntSet.fromList
1791.76 s
[algebraic-graphs] OK: vertexIntSet . clique == IntSet.fromList
1791.76 s
[algebraic-graphs]
1791.76 s
[algebraic-graphs] ============ AdjacencyIntMap.edgeList ============
1791.76 s
[algebraic-graphs] OK: edgeList empty == []
1791.76 s
[algebraic-graphs] OK: edgeList (vertex x) == []
1791.76 s
[algebraic-graphs] OK: edgeList (edge x y) == [(x,y)]
1791.76 s
[algebraic-graphs] OK: edgeList (star 2 [3,1]) == [(2,1), (2,3)]
1791.76 s
[algebraic-graphs] OK: edgeList . edges == nub . sort
1791.76 s
[algebraic-graphs]
1791.76 s
[algebraic-graphs] ============ AdjacencyIntMap.edgeSet ============
1791.76 s
[algebraic-graphs] OK: edgeSet empty == Set.empty
1791.76 s
[algebraic-graphs] OK: edgeSet (vertex x) == Set.empty
1791.76 s
[algebraic-graphs] OK: edgeSet (edge x y) == Set.singleton (x,y)
1791.76 s
[algebraic-graphs] OK: edgeSet . edges == Set.fromList
1791.76 s
[algebraic-graphs]
1791.76 s
[algebraic-graphs] ============ AdjacencyIntMap.adjacencyList ============
1791.76 s
[algebraic-graphs] OK: adjacencyList empty == []
1791.76 s
[algebraic-graphs] OK: adjacencyList (vertex x) == [(x, [])]
1791.76 s
[algebraic-graphs] OK: adjacencyList (edge 1 2) == [(1, [2]), (2, [])]
1791.76 s
[algebraic-graphs] OK: adjacencyList (star 2 [3,1]) == [(1, []), (2, [1,3]), (3, [])]
1791.76 s
[algebraic-graphs]
1791.76 s
[algebraic-graphs] ============ AdjacencyIntMap.preSet ============
1791.76 s
[algebraic-graphs] OK: preSet x empty == Set.empty
1791.76 s
[algebraic-graphs] OK: preSet x (vertex x) == Set.empty
1791.76 s
[algebraic-graphs] OK: preSet 1 (edge 1 2) == Set.empty
1791.76 s
[algebraic-graphs] OK: preSet y (edge x y) == Set.fromList [x]
1791.76 s
[algebraic-graphs]
1791.76 s
[algebraic-graphs] ============ AdjacencyIntMap.preIntSet ============
1791.76 s
[algebraic-graphs] OK: preIntSet x empty == IntSet.empty
1791.76 s
[algebraic-graphs] OK: preIntSet x (vertex x) == IntSet.empty
1791.76 s
[algebraic-graphs] OK: preIntSet 1 (edge 1 2) == IntSet.empty
1791.76 s
[algebraic-graphs] OK: preIntSet y (edge x y) == IntSet.fromList [x]
1791.76 s
[algebraic-graphs]
1791.76 s
[algebraic-graphs] ============ AdjacencyIntMap.postSet ============
1791.76 s
[algebraic-graphs] OK: postSet x empty == Set.empty
1791.76 s
[algebraic-graphs] OK: postSet x (vertex x) == Set.empty
1791.76 s
[algebraic-graphs] OK: postSet x (edge x y) == Set.fromList [y]
1791.76 s
[algebraic-graphs] OK: postSet 2 (edge 1 2) == Set.empty
1791.76 s
[algebraic-graphs]
1791.76 s
[algebraic-graphs] ============ AdjacencyIntMap.postIntSet ============
1791.76 s
[algebraic-graphs] OK: postIntSet x empty == IntSet.empty
1791.76 s
[algebraic-graphs] OK: postIntSet x (vertex x) == IntSet.empty
1791.76 s
[algebraic-graphs] OK: postIntSet 2 (edge 1 2) == IntSet.empty
1791.77 s
[algebraic-graphs] OK: postIntSet x (edge x y) == IntSet.fromList [y]
1791.77 s
[algebraic-graphs]
1791.77 s
[algebraic-graphs] ============ AdjacencyIntMap.path ============
1791.77 s
[algebraic-graphs] OK: path [] == empty
1791.77 s
[algebraic-graphs] OK: path [x] == vertex x
1791.77 s
[algebraic-graphs] OK: path [x,y] == edge x y
1791.77 s
[algebraic-graphs]
1791.77 s
[algebraic-graphs] ============ AdjacencyIntMap.circuit ============
1791.77 s
[algebraic-graphs] OK: circuit [] == empty
1791.77 s
[algebraic-graphs] OK: circuit [x] == edge x x
1791.77 s
[algebraic-graphs] OK: circuit [x,y] == edges [(x,y), (y,x)]
1791.77 s
[algebraic-graphs]
1791.77 s
[algebraic-graphs] ============ AdjacencyIntMap.clique ============
1791.77 s
[algebraic-graphs] OK: clique [] == empty
1791.77 s
[algebraic-graphs] OK: clique [x] == vertex x
1791.77 s
[algebraic-graphs] OK: clique [x,y] == edge x y
1791.77 s
[algebraic-graphs] OK: clique [x,y,z] == edges [(x,y), (x,z), (y,z)]
1791.77 s
[algebraic-graphs] OK: clique (xs ++ ys) == connect (clique xs) (clique ys)
1791.77 s
[algebraic-graphs]
1791.77 s
[algebraic-graphs] ============ AdjacencyIntMap.biclique ============
1791.77 s
[algebraic-graphs] OK: biclique [] [] == empty
1791.77 s
[algebraic-graphs] OK: biclique [x] [] == vertex x
1791.77 s
[algebraic-graphs] OK: biclique [] [y] == vertex y
1791.77 s
[algebraic-graphs] OK: biclique [x1,x2] [y1,y2] == edges [(x1,y1), (x1,y2), (x2,y1), (x2,y2)]
1791.77 s
[algebraic-graphs] OK: biclique xs ys == connect (vertices xs) (vertices ys)
1791.77 s
[algebraic-graphs]
1791.77 s
[algebraic-graphs] ============ AdjacencyIntMap.star ============
1791.77 s
[algebraic-graphs] OK: star x [] == vertex x
1791.77 s
[algebraic-graphs] OK: star x [y] == edge x y
1791.77 s
[algebraic-graphs] OK: star x [y,z] == edges [(x,y), (x,z)]
1791.77 s
[algebraic-graphs] OK: star x ys == connect (vertex x) (vertices ys)
1791.77 s
[algebraic-graphs]
1791.77 s
[algebraic-graphs] ============ AdjacencyIntMap.stars ============
1791.77 s
[algebraic-graphs] OK: stars [] == empty
1791.77 s
[algebraic-graphs] OK: stars [(x, [])] == vertex x
1791.77 s
[algebraic-graphs] OK: stars [(x, [y])] == edge x y
1791.77 s
[algebraic-graphs] OK: stars [(x, ys)] == star x ys
1791.77 s
[algebraic-graphs] OK: stars == overlays . map (uncurry star)
1791.77 s
[algebraic-graphs] OK: stars . adjacencyList == id
1791.77 s
[algebraic-graphs] OK: overlay (stars xs) (stars ys) == stars (xs ++ ys)
1791.77 s
[algebraic-graphs]
1791.77 s
[algebraic-graphs] ============ AdjacencyIntMap.tree ============
1791.77 s
[algebraic-graphs] OK: tree (Node x []) == vertex x
1791.77 s
[algebraic-graphs] OK: tree (Node x [Node y [Node z []]]) == path [x,y,z]
1791.77 s
[algebraic-graphs] OK: tree (Node x [Node y [], Node z []]) == star x [y,z]
1791.77 s
[algebraic-graphs] OK: tree (Node 1 [Node 2 [], Node 3 [Node 4 [], Node 5 []]]) == edges [(1,2), (1,3), (3,4), (3,5)]
1791.77 s
[algebraic-graphs]
1791.77 s
[algebraic-graphs] ============ AdjacencyIntMap.forest ============
1791.77 s
[algebraic-graphs] OK: forest [] == empty
1791.77 s
[algebraic-graphs] OK: forest [x] == tree x
1791.77 s
[algebraic-graphs] OK: forest [Node 1 [Node 2 [], Node 3 []], Node 4 [Node 5 []]] == edges [(1,2), (1,3), (4,5)]
1791.77 s
[algebraic-graphs] OK: forest == overlays . map tree
1791.77 s
[algebraic-graphs]
1791.77 s
[algebraic-graphs] ============ AdjacencyIntMap.removeVertex ============
1791.77 s
[algebraic-graphs] OK: removeVertex x (vertex x) == empty
1791.77 s
[algebraic-graphs] OK: removeVertex 1 (vertex 2) == vertex 2
1791.77 s
[algebraic-graphs] OK: removeVertex x (edge x x) == empty
1791.77 s
[algebraic-graphs] OK: removeVertex 1 (edge 1 2) == vertex 2
1791.77 s
[algebraic-graphs] OK: removeVertex x . removeVertex x == removeVertex x
1791.77 s
[algebraic-graphs]
1791.77 s
[algebraic-graphs] ============ AdjacencyIntMap.removeEdge ============
1791.77 s
[algebraic-graphs] OK: removeEdge x y (edge x y) == vertices [x,y]
1791.77 s
[algebraic-graphs] OK: removeEdge x y . removeEdge x y == removeEdge x y
1791.77 s
[algebraic-graphs] OK: removeEdge x y . removeVertex x == removeVertex x
1791.77 s
[algebraic-graphs] OK: removeEdge 1 1 (1 * 1 * 2 * 2) == 1 * 2 * 2
1791.77 s
[algebraic-graphs] OK: removeEdge 1 2 (1 * 1 * 2 * 2) == 1 * 1 + 2 * 2
1791.77 s
[algebraic-graphs]
1791.77 s
[algebraic-graphs] ============ AdjacencyIntMap.replaceVertex ============
1791.77 s
[algebraic-graphs] OK: replaceVertex x x == id
1791.77 s
[algebraic-graphs] OK: replaceVertex x y (vertex x) == vertex y
1791.77 s
[algebraic-graphs] OK: replaceVertex x y == mergeVertices (== x) y
1791.77 s
[algebraic-graphs]
1791.77 s
[algebraic-graphs] ============ AdjacencyIntMap.mergeVertices ============
1791.77 s
[algebraic-graphs] OK: mergeVertices (const False) x == id
1791.77 s
[algebraic-graphs] OK: mergeVertices (== x) y == replaceVertex x y
1791.77 s
[algebraic-graphs] OK: mergeVertices even 1 (0 * 2) == 1 * 1
1791.77 s
[algebraic-graphs] OK: mergeVertices odd 1 (3 + 4 * 5) == 4 * 1
1791.77 s
[algebraic-graphs]
1791.77 s
[algebraic-graphs] ============ AdjacencyIntMap.transpose ============
1791.77 s
[algebraic-graphs] OK: transpose empty == empty
1791.77 s
[algebraic-graphs] OK: transpose (vertex x) == vertex x
1791.77 s
[algebraic-graphs] OK: transpose (edge x y) == edge y x
1791.77 s
[algebraic-graphs] OK: transpose . transpose == id
1791.77 s
[algebraic-graphs] OK: edgeList . transpose == sort . map swap . edgeList
1791.77 s
[algebraic-graphs]
1791.77 s
[algebraic-graphs] ============ AdjacencyIntMap.gmap ============
1791.77 s
[algebraic-graphs] OK: gmap f empty == empty
1791.77 s
[algebraic-graphs] OK: gmap f (vertex x) == vertex (f x)
1791.77 s
[algebraic-graphs] OK: gmap f (edge x y) == edge (f x) (f y)
1791.77 s
[algebraic-graphs] OK: gmap id == id
1791.77 s
[algebraic-graphs] OK: gmap f . gmap g == gmap (f . g)
1791.77 s
[algebraic-graphs]
1791.77 s
[algebraic-graphs] ============ AdjacencyIntMap.induce ============
1791.77 s
[algebraic-graphs] OK: induce (const True ) x == x
1791.77 s
[algebraic-graphs] OK: induce (const False) x == empty
1791.77 s
[algebraic-graphs] OK: induce (/= x) == removeVertex x
1791.77 s
[algebraic-graphs] OK: induce p . induce q == induce (\x -> p x && q x)
1791.77 s
[algebraic-graphs] OK: isSubgraphOf (induce p x) x == True
1791.77 s
[algebraic-graphs]
1791.77 s
[algebraic-graphs] ============ AdjacencyIntMap.compose ============
1791.77 s
[algebraic-graphs] OK: compose empty x == empty
1791.77 s
[algebraic-graphs] OK: compose x empty == empty
1791.77 s
[algebraic-graphs] OK: compose (vertex x) y == empty
1791.77 s
[algebraic-graphs] OK: compose x (vertex y) == empty
1791.77 s
[algebraic-graphs] OK: compose x (compose y z) == compose (compose x y) z
1791.77 s
[algebraic-graphs] OK: compose x (overlay y z) == overlay (compose x y) (compose x z)
1791.91 s
[haskell-language-server] [10 of 10] Compiling Ide.Plugin.Eval ( plugins/hls-eval-plugin/src/Ide/Plugin/Eval.hs, dist/build/hls-eval-plugin/Ide/Plugin/Eval.o, dist/build/hls-eval-plugin/Ide/Plugin/Eval.dyn_o )
1791.97 s
[algebraic-graphs] OK: compose (overlay x y) z == overlay (compose x z) (compose y z)
1791.97 s
[algebraic-graphs] OK: compose (edge x y) (edge y z) == edge x z
1791.97 s
[algebraic-graphs] OK: compose (path [1..5]) (path [1..5]) == edges [(1,3),(2,4),(3,5)]
1791.97 s
[algebraic-graphs] OK: compose (circuit [1..5]) (circuit [1..5]) == circuit [1,3,5,2,4]
1791.97 s
[algebraic-graphs]
1791.97 s
[algebraic-graphs] ============ AdjacencyIntMap.closure ============
1791.97 s
[algebraic-graphs] OK: closure empty == empty
1791.97 s
[algebraic-graphs] OK: closure (vertex x) == edge x x
1791.97 s
[algebraic-graphs] OK: closure (edge x x) == edge x x
1791.97 s
[algebraic-graphs] OK: closure (edge x y) == edges [(x,x), (x,y), (y,y)]
1791.97 s
[algebraic-graphs] OK: closure (path $ nub xs) == reflexiveClosure (clique $ nub xs)
1791.97 s
[algebraic-graphs] OK: closure == reflexiveClosure . transitiveClosure
1791.97 s
[algebraic-graphs] OK: closure == transitiveClosure . reflexiveClosure
1791.97 s
[algebraic-graphs] OK: closure . closure == closure
1791.97 s
[algebraic-graphs] OK: postSet x (closure y) == Set.fromList (reachable y x)
1791.97 s
[algebraic-graphs]
1791.97 s
[algebraic-graphs] ============ AdjacencyIntMap.reflexiveClosure ============
1791.97 s
[algebraic-graphs] OK: reflexiveClosure empty == empty
1791.97 s
[algebraic-graphs] OK: reflexiveClosure (vertex x) == edge x x
1791.97 s
[algebraic-graphs] OK: reflexiveClosure (edge x x) == edge x x
1791.97 s
[algebraic-graphs] OK: reflexiveClosure (edge x y) == edges [(x,x), (x,y), (y,y)]
1791.97 s
[algebraic-graphs] OK: reflexiveClosure . reflexiveClosure == reflexiveClosure
1791.97 s
[algebraic-graphs]
1791.97 s
[algebraic-graphs] ============ AdjacencyIntMap.symmetricClosure ============
1791.97 s
[algebraic-graphs] OK: symmetricClosure empty == empty
1791.97 s
[algebraic-graphs] OK: symmetricClosure (vertex x) == vertex x
1791.97 s
[algebraic-graphs] OK: symmetricClosure (edge x y) == edges [(x,y), (y,x)]
1791.97 s
[algebraic-graphs] OK: symmetricClosure x == overlay x (transpose x)
1791.97 s
[algebraic-graphs] OK: symmetricClosure . symmetricClosure == symmetricClosure
1791.97 s
[algebraic-graphs]
1791.97 s
[algebraic-graphs] ============ AdjacencyIntMap.transitiveClosure ============
1791.97 s
[algebraic-graphs] OK: transitiveClosure empty == empty
1791.97 s
[algebraic-graphs] OK: transitiveClosure (vertex x) == vertex x
1791.97 s
[algebraic-graphs] OK: transitiveClosure (edge x y) == edge x y
1791.97 s
[algebraic-graphs] OK: transitiveClosure (path $ nub xs) == clique (nub $ xs)
1791.97 s
[algebraic-graphs] OK: transitiveClosure . transitiveClosure == transitiveClosure
1791.97 s
[algebraic-graphs]
1791.97 s
[algebraic-graphs] ============ AdjacencyIntMap.bfsForest ============
1791.97 s
[algebraic-graphs] OK: forest $ bfsForest (edge 1 2) [0] == empty
1791.97 s
[algebraic-graphs] OK: forest $ bfsForest (edge 1 2) [1] == edge 1 2
1791.97 s
[algebraic-graphs] OK: forest $ bfsForest (edge 1 2) [2] == vertex 2
1791.97 s
[algebraic-graphs] OK: forest $ bfsForest (edge 1 2) [0,1,2] == vertices [1,2]
1791.97 s
[algebraic-graphs] OK: forest $ bfsForest (edge 1 2) [2,1,0] == vertices [1,2]
1791.97 s
[algebraic-graphs] OK: forest $ bfsForest (edge 1 1) [1] == vertex 1
1791.97 s
[algebraic-graphs] OK: isSubgraphOf (forest $ bfsForest x vs) x == True
1791.97 s
[algebraic-graphs] OK: bfsForest x (vertexList x) == map ( -> Node v []) (nub $ vertexList x)
1791.97 s
[algebraic-graphs] OK: bfsForest x [] == []
1791.97 s
[algebraic-graphs] OK: bfsForest empty vs == []
1791.97 s
[algebraic-graphs] OK: bfsForest (3 * (1 + 4) * (1 + 5)) [1,4] == <correct result>
1791.97 s
[algebraic-graphs] OK: forest $ bfsForest (circuit [1..5] + circuit [5,4..1]) [3] == path [3,2,1] + path [3,4,5]
1791.97 s
[algebraic-graphs]
1791.97 s
[algebraic-graphs] ============ AdjacencyIntMap.bfs ============
1791.97 s
[algebraic-graphs] OK: bfs (edge 1 2) [0] == []
1791.97 s
[algebraic-graphs] OK: bfs (edge 1 2) [1] == [[1], [2]]
1791.97 s
[algebraic-graphs] OK: bfs (edge 1 2) [2] == [[2]]
1791.97 s
[algebraic-graphs] OK: bfs (edge 1 2) [1,2] == [[1,2]]
1791.97 s
[algebraic-graphs] OK: bfs (edge 1 2) [2,1] == [[2,1]]
1791.97 s
[algebraic-graphs] OK: bfs (edge 1 1) [1] == [[1]]
1791.97 s
[algebraic-graphs] OK: bfs empty vs == []
1791.97 s
[algebraic-graphs] OK: bfs x [] == []
1791.97 s
[algebraic-graphs] OK: bfs (1 * 2 + 3 * 4 + 5 * 6) [1,2] == [[1,2]]
1791.97 s
[algebraic-graphs] OK: bfs (1 * 2 + 3 * 4 + 5 * 6) [1,3] == [[1,3], [2,4]]
1791.97 s
[algebraic-graphs] OK: bfs (3 * (1 + 4) * (1 + 5)) [3] == [[3], [1,4,5]]
1791.97 s
[algebraic-graphs] OK: bfs (circuit [1..5] + circuit [5,4..1]) [2] == [[2], [1,3], [5,4]]
1791.97 s
[algebraic-graphs] OK: concat $ bfs (circuit [1..5] + circuit [5,4..1]) [3] == [3,2,4,1,5]
1791.97 s
[algebraic-graphs] OK: map concat . transpose . map levels . bfsForest x == bfs x
1791.97 s
[algebraic-graphs]
1791.97 s
[algebraic-graphs] ============ AdjacencyIntMap.dfsForest ============
1791.97 s
[algebraic-graphs] OK: forest $ dfsForest empty == empty
1791.97 s
[algebraic-graphs] OK: forest $ dfsForest (edge 1 1) == vertex 1
1791.97 s
[algebraic-graphs] OK: forest $ dfsForest (edge 1 2) == edge 1 2
1791.97 s
[algebraic-graphs] OK: forest $ dfsForest (edge 2 1) == vertices [1,2]
1791.97 s
[algebraic-graphs] OK: isSubgraphOf (forest $ dfsForest x) x == True
1791.97 s
[algebraic-graphs] OK: isDfsForestOf (dfsForest x) x == True
1791.97 s
[algebraic-graphs] OK: dfsForest . forest . dfsForest == dfsForest
1791.97 s
[algebraic-graphs] OK: dfsForest (vertices vs) == map (\v -> Node v []) (nub $ sort vs)
1791.97 s
[algebraic-graphs] OK: dfsForest $ 3 * (1 + 4) * (1 + 5) == <correct result>
1791.97 s
[algebraic-graphs] OK: forest (dfsForest $ circuit [1..5] + circuit [5,4..1]) == path [1,2,3,4,5]
1791.97 s
[algebraic-graphs]
1791.97 s
[algebraic-graphs] ============ AdjacencyIntMap.dfsForestFrom ============
1791.97 s
[algebraic-graphs] OK: forest $ dfsForestFrom empty vs == empty
1791.97 s
[algebraic-graphs] OK: forest $ dfsForestFrom (edge 1 1) [1] == vertex 1
1791.97 s
[algebraic-graphs] OK: forest $ dfsForestFrom (edge 1 2) [0] == empty
1791.97 s
[algebraic-graphs] OK: forest $ dfsForestFrom (edge 1 2) [1] == edge 1 2
1791.97 s
[algebraic-graphs] OK: forest $ dfsForestFrom (edge 1 2) [2] == vertex 2
1791.97 s
[algebraic-graphs] OK: forest $ dfsForestFrom (edge 1 2) [1,2] == edge 1 2
1791.97 s
[algebraic-graphs] OK: forest $ dfsForestFrom (edge 1 2) [2,1] == vertices [1,2]
1791.97 s
[algebraic-graphs] OK: isSubgraphOf (forest $ dfsForestFrom x vs) x == True
1791.97 s
[algebraic-graphs] OK: isDfsForestOf (dfsForestFrom x (vertexList x)) x == True
1791.97 s
[algebraic-graphs] OK: dfsForestFrom x (vertexList x) == dfsForest x
1791.97 s
[algebraic-graphs] OK: dfsForestFrom x [] == []
1791.97 s
[algebraic-graphs] OK: dfsForestFrom (3 * (1 + 4) * (1 + 5)) [1,4] == <correct result>
1791.97 s
[algebraic-graphs] OK: forest $ dfsForestFrom (circuit [1..5] + circuit [5,4..1]) [3] == path [3,2,1,5,4]
1791.97 s
[algebraic-graphs]
1791.97 s
[algebraic-graphs] ============ AdjacencyIntMap.dfs ============
1791.97 s
[algebraic-graphs] OK: dfs empty vs == []
1791.97 s
[algebraic-graphs] OK: dfs (edge 1 1) [1] == [1]
1791.97 s
[algebraic-graphs] OK: dfs (edge 1 2) [0] == []
1791.97 s
[algebraic-graphs] OK: dfs (edge 1 2) [1] == [1,2]
1791.97 s
[algebraic-graphs] OK: dfs (edge 1 2) [2] == [2]
1791.97 s
[algebraic-graphs] OK: dfs (edge 1 2) [1,2] == [1,2]
1791.97 s
[algebraic-graphs] OK: dfs (edge 1 2) [2,1] == [2,1]
1791.97 s
[algebraic-graphs] OK: dfs x [] == []
1791.97 s
[algebraic-graphs]
1791.97 s
[algebraic-graphs] OK: and [ hasVertex v x | v <- dfs x vs ] == True
1791.97 s
[algebraic-graphs] OK: dfs (3 * (1 + 4) * (1 + 5)) [1,4] == [1,5,4]
1791.97 s
[algebraic-graphs] OK: dfs (circuit [1..5] + circuit [5,4..1]) [3] == [3,2,1,5,4]
1791.97 s
[algebraic-graphs]
1791.97 s
[algebraic-graphs] ============ AdjacencyIntMap.dfs ============
1791.97 s
[algebraic-graphs] OK: reachable empty x == []
1791.97 s
[algebraic-graphs] OK: reachable (vertex 1) 1 == [1]
1791.97 s
[algebraic-graphs] OK: reachable (edge 1 1) 1 == [1]
1791.97 s
[algebraic-graphs] OK: reachable (edge 1 2) 0 == []
1791.97 s
[algebraic-graphs] OK: reachable (edge 1 2) 1 == [1,2]
1791.97 s
[algebraic-graphs] OK: reachable (edge 1 2) 2 == [2]
1791.97 s
[algebraic-graphs] OK: reachable (path [1..8] ) 4 == [4..8]
1791.97 s
[algebraic-graphs] OK: reachable (circuit [1..8] ) 4 == [4..8] ++ [1..3]
1791.97 s
[algebraic-graphs] OK: reachable (clique [8,7..1]) 8 == [8] ++ [1..7]
1791.97 s
[algebraic-graphs]
1791.97 s
[algebraic-graphs] OK: and [ hasVertex v x | v <- reachable x y ] == True
1791.97 s
[algebraic-graphs]
1791.97 s
[algebraic-graphs] ============ AdjacencyIntMap.topSort ============
1791.97 s
[algebraic-graphs] OK: topSort (1 * 2 + 3 * 1) == Right [3,1,2]
1791.97 s
[algebraic-graphs] OK: topSort (path [1..5]) == Right [1..5]
1791.97 s
[algebraic-graphs] OK: topSort (3 * (1 * 4 + 2 * 5)) == Right [3,1,2,4,5]
1791.97 s
[algebraic-graphs] OK: topSort (1 * 2 + 2 * 1) == Left (2 :| [1])
1791.97 s
[algebraic-graphs] OK: topSort (path [5,4..1] + edge 2 4) == Left (4 :| [3,2])
1791.97 s
[algebraic-graphs] OK: topSort (circuit [1..5]) == Left (3 :| [1,2])
1791.97 s
[algebraic-graphs] OK: topSort (circuit [1..3] + circuit [3,2,1]) == Left (3 :| [2])
1791.97 s
[algebraic-graphs] OK: topSort (1 * 2 + (5 + 2) * 1 + 3 * 4 * 3) == Left (1 :| [2])
1791.97 s
[algebraic-graphs] OK: fmap (flip isTopSortOf x) (topSort x) /= Right False
1791.97 s
[algebraic-graphs] OK: topSort . vertices == Right . nub . sort
1791.97 s
[algebraic-graphs]
1791.97 s
[algebraic-graphs] ============ AdjacencyIntMap.testIsAcyclic ============
1791.97 s
[algebraic-graphs] OK: isAcyclic (1 * 2 + 3 * 1) == True
1791.97 s
[algebraic-graphs] OK: isAcyclic (1 * 2 + 2 * 1) == False
1791.97 s
[algebraic-graphs] OK: isAcyclic . circuit == null
1791.97 s
[algebraic-graphs] OK: isAcyclic == isRight . topSort
1791.97 s
[algebraic-graphs]
1791.97 s
[algebraic-graphs] ============ AdjacencyIntMap.isDfsForestOf ============
1791.97 s
[algebraic-graphs] OK: isDfsForestOf [] empty == True
1791.98 s
[algebraic-graphs] OK: isDfsForestOf [] (vertex 1) == False
1791.98 s
[algebraic-graphs] OK: isDfsForestOf [Node 1 []] (vertex 1) == True
1791.98 s
[algebraic-graphs] OK: isDfsForestOf [Node 1 []] (vertex 2) == False
1791.98 s
[algebraic-graphs] OK: isDfsForestOf [Node 1 [], Node 1 []] (vertex 1) == False
1791.98 s
[algebraic-graphs] OK: isDfsForestOf [Node 1 []] (edge 1 1) == True
1791.98 s
[algebraic-graphs] OK: isDfsForestOf [Node 1 []] (edge 1 2) == False
1791.98 s
[algebraic-graphs] OK: isDfsForestOf [Node 1 [], Node 2 []] (edge 1 2) == False
1791.98 s
[algebraic-graphs] OK: isDfsForestOf [Node 2 [], Node 1 []] (edge 1 2) == True
1791.98 s
[algebraic-graphs] OK: isDfsForestOf [Node 1 [Node 2 []]] (edge 1 2) == True
1791.98 s
[algebraic-graphs] OK: isDfsForestOf [Node 1 [], Node 2 []] (vertices [1,2]) == True
1791.98 s
[algebraic-graphs] OK: isDfsForestOf [Node 2 [], Node 1 []] (vertices [1,2]) == True
1791.98 s
[algebraic-graphs] OK: isDfsForestOf [Node 1 [Node 2 []]] (vertices [1,2]) == False
1792.45 s
[haskell-language-server] [ 1 of 10] Compiling Ide.Plugin.Eval.Config ( plugins/hls-eval-plugin/src/Ide/Plugin/Eval/Config.hs, dist/build/hls-eval-plugin/Ide/Plugin/Eval/Config.p_o )
1792.96 s
[haskell-language-server] [ 2 of 10] Compiling Ide.Plugin.Eval.Parse.Option ( plugins/hls-eval-plugin/src/Ide/Plugin/Eval/Parse/Option.hs, dist/build/hls-eval-plugin/Ide/Plugin/Eval/Parse/Option.p_o )
1793.11 s
[haskell-language-server] [ 3 of 10] Compiling Ide.Plugin.Eval.Util ( plugins/hls-eval-plugin/src/Ide/Plugin/Eval/Util.hs, dist/build/hls-eval-plugin/Ide/Plugin/Eval/Util.p_o )
1793.11 s
[haskell-language-server] [ 4 of 10] Compiling Ide.Plugin.Eval.GHC ( plugins/hls-eval-plugin/src/Ide/Plugin/Eval/GHC.hs, dist/build/hls-eval-plugin/Ide/Plugin/Eval/GHC.p_o )
1793.89 s
[haskell-language-server] [ 5 of 10] Compiling Ide.Plugin.Eval.Types ( plugins/hls-eval-plugin/src/Ide/Plugin/Eval/Types.hs, dist/build/hls-eval-plugin/Ide/Plugin/Eval/Types.p_o )
1795.96 s
[algebraic-graphs] OK: isDfsForestOf [Node 1 [Node 2 [Node 3 []]]] (path [1,2,3]) == True
1795.96 s
[algebraic-graphs] OK: isDfsForestOf [Node 1 [Node 3 [Node 2 []]]] (path [1,2,3]) == False
1795.96 s
[algebraic-graphs] OK: isDfsForestOf [Node 3 [], Node 1 [Node 2 []]] (path [1,2,3]) == True
1795.96 s
[algebraic-graphs] OK: isDfsForestOf [Node 2 [Node 3 []], Node 1 []] (path [1,2,3]) == True
1795.96 s
[algebraic-graphs] OK: isDfsForestOf [Node 1 [], Node 2 [Node 3 []]] (path [1,2,3]) == False
1795.96 s
[algebraic-graphs]
1795.96 s
[algebraic-graphs] ============ AdjacencyIntMap.isTopSortOf ============
1795.96 s
[algebraic-graphs] OK: isTopSortOf [3,1,2] (1 * 2 + 3 * 1) == True
1795.96 s
[algebraic-graphs] OK: isTopSortOf [1,2,3] (1 * 2 + 3 * 1) == False
1795.96 s
[algebraic-graphs] OK: isTopSortOf [] (1 * 2 + 3 * 1) == False
1795.96 s
[algebraic-graphs] OK: isTopSortOf [] empty == True
1795.96 s
[algebraic-graphs] OK: isTopSortOf [x] (vertex x) == True
1795.96 s
[algebraic-graphs] OK: isTopSortOf [x] (edge x x) == False
1795.96 s
[algebraic-graphs]
1795.96 s
[algebraic-graphs] ============ AdjacencyMap ============
1795.96 s
[algebraic-graphs] OK: Axioms of graphs
1795.96 s
[algebraic-graphs]
1795.96 s
[algebraic-graphs] ============ AdjacencyMap.consistent ============
1795.96 s
[algebraic-graphs] OK: Consistency of the Arbitrary instance
1795.96 s
[algebraic-graphs]
1795.96 s
[algebraic-graphs] OK: consistent empty == True
1795.96 s
[algebraic-graphs] OK: consistent (vertex x) == True
1795.96 s
[algebraic-graphs] OK: consistent (overlay x y) == True
1795.96 s
[algebraic-graphs] OK: consistent (connect x y) == True
1795.96 s
[algebraic-graphs] OK: consistent (edge x y) == True
1795.96 s
[algebraic-graphs] OK: consistent (edges xs) == True
1795.96 s
[algebraic-graphs] OK: consistent (stars xs) == True
1795.96 s
[algebraic-graphs]
1795.96 s
[algebraic-graphs] ============ AdjacencyMap.Show ============
1795.96 s
[algebraic-graphs] OK: show (empty ) == "empty"
1795.96 s
[algebraic-graphs] OK: show (1 ) == "vertex 1"
1795.96 s
[algebraic-graphs] OK: show (1 + 2 ) == "vertices [1,2]"
1795.96 s
[algebraic-graphs] OK: show (1 * 2 ) == "edge 1 2"
1795.96 s
[algebraic-graphs] OK: show (1 * 2 * 3) == "edges [(1,2),(1,3),(2,3)]"
1795.96 s
[algebraic-graphs] OK: show (1 * 2 + 3) == "overlay (vertex 3) (edge 1 2)"
1795.96 s
[algebraic-graphs]
1795.96 s
[algebraic-graphs] OK: show (vertex (-1) ) == "vertex (-1)"
1795.96 s
[algebraic-graphs] OK: show (vertex (-1) + vertex (-2) ) == "vertices [-2,-1]"
1795.96 s
[algebraic-graphs] OK: show (vertex (-2) * vertex (-1) ) == "edge (-2) (-1)"
1795.96 s
[algebraic-graphs] OK: show (vertex (-3) * vertex (-2) * vertex (-1)) == "edges [(-3,-2),(-3,-1),(-2,-1)]"
1795.96 s
[algebraic-graphs] OK: show (vertex (-3) * vertex (-2) + vertex (-1)) == "overlay (vertex (-1)) (edge (-3) (-2))"
1795.96 s
[algebraic-graphs]
1795.96 s
[algebraic-graphs] ============ AdjacencyMap.Ord ============
1795.96 s
[algebraic-graphs] OK: vertex 1 < vertex 2
1795.96 s
[algebraic-graphs] OK: vertex 3 < edge 1 2
1795.96 s
[algebraic-graphs] OK: vertex 1 < edge 1 1
1795.96 s
[algebraic-graphs] OK: edge 1 1 < edge 1 2
1795.96 s
[algebraic-graphs] OK: edge 1 2 < edge 1 1 + edge 2 2
1795.96 s
[algebraic-graphs] OK: edge 1 2 < edge 1 3
1795.96 s
[algebraic-graphs] OK: x <= x + y
1795.96 s
[algebraic-graphs] OK: x + y <= x * y
1795.96 s
[algebraic-graphs]
1795.96 s
[algebraic-graphs] ============ AdjacencyMap.empty ============
1795.96 s
[algebraic-graphs] OK: isEmpty empty == True
1795.96 s
[algebraic-graphs] OK: hasVertex x empty == False
1795.96 s
[algebraic-graphs] OK: vertexCount empty == 0
1795.96 s
[algebraic-graphs] OK: edgeCount empty == 0
1795.96 s
[algebraic-graphs]
1795.96 s
[algebraic-graphs] ============ AdjacencyMap.vertex ============
1795.96 s
[algebraic-graphs] OK: isEmpty (vertex x) == False
1795.96 s
[algebraic-graphs] OK: hasVertex x (vertex y) == (x == y)
1795.96 s
[algebraic-graphs] OK: vertexCount (vertex x) == 1
1795.96 s
[algebraic-graphs] OK: edgeCount (vertex x) == 0
1795.96 s
[algebraic-graphs]
1795.96 s
[algebraic-graphs] ============ AdjacencyMap.edge ============
1795.96 s
[algebraic-graphs] OK: edge x y == connect (vertex x) (vertex y)
1795.96 s
[algebraic-graphs] OK: hasEdge x y (edge x y) == True
1795.96 s
[algebraic-graphs] OK: edgeCount (edge x y) == 1
1795.96 s
[algebraic-graphs] OK: vertexCount (edge 1 1) == 1
1795.96 s
[algebraic-graphs] OK: vertexCount (edge 1 2) == 2
1795.96 s
[algebraic-graphs]
1795.96 s
[algebraic-graphs] ============ AdjacencyMap.overlay ============
1795.96 s
[algebraic-graphs] OK: isEmpty (overlay x y) == isEmpty x && isEmpty y
1795.96 s
[algebraic-graphs] OK: hasVertex z (overlay x y) == hasVertex z x || hasVertex z y
1795.96 s
[algebraic-graphs] OK: vertexCount (overlay x y) >= vertexCount x
1795.96 s
[algebraic-graphs] OK: vertexCount (overlay x y) <= vertexCount x + vertexCount y
1795.96 s
[algebraic-graphs] OK: edgeCount (overlay x y) >= edgeCount x
1795.96 s
[algebraic-graphs] OK: edgeCount (overlay x y) <= edgeCount x + edgeCount y
1795.96 s
[algebraic-graphs] OK: vertexCount (overlay 1 2) == 2
1795.96 s
[algebraic-graphs] OK: edgeCount (overlay 1 2) == 0
1795.96 s
[algebraic-graphs]
1795.96 s
[algebraic-graphs] ============ AdjacencyMap.connect ============
1795.96 s
[algebraic-graphs] OK: isEmpty (connect x y) == isEmpty x && isEmpty y
1795.96 s
[algebraic-graphs] OK: hasVertex z (connect x y) == hasVertex z x || hasVertex z y
1795.96 s
[algebraic-graphs] OK: vertexCount (connect x y) >= vertexCount x
1795.96 s
[algebraic-graphs] OK: vertexCount (connect x y) <= vertexCount x + vertexCount y
1795.96 s
[algebraic-graphs] OK: edgeCount (connect x y) >= edgeCount x
1795.96 s
[algebraic-graphs] OK: edgeCount (connect x y) >= edgeCount y
1795.96 s
[algebraic-graphs] OK: edgeCount (connect x y) >= vertexCount x * vertexCount y
1795.96 s
[algebraic-graphs] OK: edgeCount (connect x y) <= vertexCount x * vertexCount y + edgeCount x + edgeCount y
1795.96 s
[algebraic-graphs] OK: vertexCount (connect 1 2) == 2
1795.96 s
[algebraic-graphs] OK: edgeCount (connect 1 2) == 1
1795.96 s
[algebraic-graphs]
1795.96 s
[algebraic-graphs] ============ AdjacencyMap.vertices ============
1795.96 s
[algebraic-graphs] OK: vertices [] == empty
1795.96 s
[algebraic-graphs] OK: vertices [x] == vertex x
1795.96 s
[algebraic-graphs] OK: vertices == overlays . map vertex
1795.96 s
[algebraic-graphs] OK: hasVertex x . vertices == elem x
1795.96 s
[algebraic-graphs] OK: vertexCount . vertices == length . nub
1795.96 s
[algebraic-graphs] OK: vertexSet . vertices == Set.fromList
1795.96 s
[algebraic-graphs]
1795.96 s
[algebraic-graphs] ============ AdjacencyMap.edges ============
1795.96 s
[algebraic-graphs] OK: edges [] == empty
1795.96 s
[algebraic-graphs] OK: edges [(x,y)] == edge x y
1795.96 s
[algebraic-graphs] OK: edges == overlays . map (uncurry edge)
1795.96 s
[algebraic-graphs] OK: edgeCount . edges == length . nub
1795.96 s
[algebraic-graphs]
1795.96 s
[algebraic-graphs] ============ AdjacencyMap.overlays ============
1795.96 s
[algebraic-graphs] OK: overlays [] == empty
1795.96 s
[algebraic-graphs] OK: overlays [x] == x
1795.96 s
[algebraic-graphs] OK: overlays [x,y] == overlay x y
1795.96 s
[algebraic-graphs] OK: overlays == foldr overlay empty
1795.96 s
[algebraic-graphs] OK: isEmpty . overlays == all isEmpty
1795.96 s
[algebraic-graphs]
1795.96 s
[algebraic-graphs] ============ AdjacencyMap.connects ============
1795.96 s
[algebraic-graphs] OK: connects [] == empty
1795.96 s
[algebraic-graphs] OK: connects [x] == x
1795.96 s
[algebraic-graphs] OK: connects [x,y] == connect x y
1795.96 s
[algebraic-graphs] OK: connects == foldr connect empty
1795.96 s
[algebraic-graphs] OK: isEmpty . connects == all isEmpty
1795.96 s
[algebraic-graphs]
1795.96 s
[algebraic-graphs] ============ AdjacencyMap.fromAdjacencySets ============
1795.96 s
[algebraic-graphs] OK: fromAdjacencySets [] == empty
1795.96 s
[algebraic-graphs] OK: fromAdjacencySets [(x, Set.empty)] == vertex x
1795.96 s
[algebraic-graphs] OK: fromAdjacencySets [(x, Set.singleton y)] == edge x y
1795.96 s
[algebraic-graphs] OK: fromAdjacencySets . map (fmap Set.fromList) == stars
1795.96 s
[algebraic-graphs] OK: overlay (fromAdjacencySets xs) (fromAdjacencySets ys) == fromAdjacencySets (xs ++ ys)
1795.96 s
[algebraic-graphs]
1795.96 s
[algebraic-graphs] ============ AdjacencyMap.isSubgraphOf ============
1795.96 s
[algebraic-graphs] OK: isSubgraphOf empty x == True
1795.96 s
[algebraic-graphs] OK: isSubgraphOf (vertex x) empty == False
1795.96 s
[algebraic-graphs] OK: isSubgraphOf x (overlay x y) == True
1795.96 s
[algebraic-graphs] OK: isSubgraphOf (overlay x y) (connect x y) == True
1795.96 s
[algebraic-graphs] OK: isSubgraphOf (path xs) (circuit xs) == True
1795.96 s
[algebraic-graphs] OK: isSubgraphOf x y ==> x <= y
1795.96 s
[algebraic-graphs]
1795.96 s
[algebraic-graphs] ============ AdjacencyMap.toGraph et al. ============
1795.96 s
[algebraic-graphs] OK: toGraph == foldg Empty Vertex Overlay Connect
1795.96 s
[algebraic-graphs] OK: foldg == Algebra.Graph.foldg . toGraph
1795.96 s
[algebraic-graphs] OK: isEmpty == foldg True (const False) (&&) (&&)
1795.96 s
[algebraic-graphs] OK: size == foldg 1 (const 1) (+) (+)
1795.96 s
[algebraic-graphs] OK: hasVertex x == foldg False (==x) (||) (||)
1795.96 s
[algebraic-graphs] OK: hasEdge x y == Algebra.Graph.hasEdge x y . toGraph
1795.96 s
[algebraic-graphs] OK: vertexCount == Set.size . vertexSet
1795.96 s
[algebraic-graphs] OK: edgeCount == Set.size . edgeSet
1795.96 s
[algebraic-graphs] OK: vertexList == Set.toAscList . vertexSet
1795.96 s
[algebraic-graphs] OK: edgeList == Set.toAscList . edgeSet
1795.96 s
[algebraic-graphs] OK: vertexSet == foldg Set.empty Set.singleton Set.union Set.union
1795.96 s
[algebraic-graphs] OK: vertexIntSet == foldg IntSet.empty IntSet.singleton IntSet.union IntSet.union
1795.96 s
[algebraic-graphs] OK: edgeSet == Algebra.Graph.AdjacencyMap.edgeSet . foldg empty vertex overlay connect
1795.96 s
[algebraic-graphs] OK: preSet x == Algebra.Graph.AdjacencyMap.preSet x . toAdjacencyMap
1795.96 s
[algebraic-graphs] OK: preIntSet x == Algebra.Graph.AdjacencyIntMap.preIntSet x . toAdjacencyIntMap
1795.96 s
[algebraic-graphs] OK: postSet x == Algebra.Graph.AdjacencyMap.postSet x . toAdjacencyMap
1795.96 s
[algebraic-graphs] OK: postIntSet x == Algebra.Graph.AdjacencyIntMap.postIntSet x . toAdjacencyIntMap
1795.96 s
[algebraic-graphs] OK: adjacencyList == Algebra.Graph.AdjacencyMap.adjacencyList . toAdjacencyMap
1795.96 s
[algebraic-graphs] OK: adjacencyMap == Algebra.Graph.AdjacencyMap.adjacencyMap . toAdjacencyMap
1795.96 s
[algebraic-graphs] OK: adjacencyIntMap == Algebra.Graph.AdjacencyIntMap.adjacencyIntMap . toAdjacencyIntMap
1795.96 s
[algebraic-graphs] OK: adjacencyMapTranspose == Algebra.Graph.AdjacencyMap.adjacencyMap . toAdjacencyMapTranspose
1795.96 s
[algebraic-graphs] OK: adjacencyIntMapTranspose == Algebra.Graph.AdjacencyIntMap.adjacencyIntMap . toAdjacencyIntMapTranspose
1795.96 s
[algebraic-graphs] OK: dfsForest == Algebra.Graph.AdjacencyMap.dfsForest . toAdjacencyMap
1795.96 s
[algebraic-graphs] OK: dfsForestFrom == Algebra.Graph.AdjacencyMap.dfsForestFrom . toAdjacencyMap
1795.96 s
[algebraic-graphs] OK: dfs == Algebra.Graph.AdjacencyMap.dfs . toAdjacencyMap
1795.96 s
[algebraic-graphs] OK: reachable == Algebra.Graph.AdjacencyMap.reachable . toAdjacencyMap
1795.96 s
[algebraic-graphs] OK: topSort == Algebra.Graph.AdjacencyMap.topSort . toAdjacencyMap
1795.96 s
[algebraic-graphs] OK: isAcyclic == Algebra.Graph.AdjacencyMap.isAcyclic . toAdjacencyMap
1795.96 s
[algebraic-graphs] OK: isTopSortOf vs == Algebra.Graph.AdjacencyMap.isTopSortOf vs . toAdjacencyMap
1795.96 s
[algebraic-graphs] OK: toAdjacencyMap == foldg empty vertex overlay connect
1795.96 s
[algebraic-graphs] OK: toAdjacencyMapTranspose == foldg empty vertex overlay (flip connect)
1795.96 s
[algebraic-graphs] OK: toAdjacencyIntMap == foldg empty vertex overlay connect
1795.96 s
[algebraic-graphs] OK: toAdjacencyIntMapTranspose == foldg empty vertex overlay (flip connect)
1797.54 s
[algebraic-graphs] OK: isDfsForestOf f == Algebra.Graph.AdjacencyMap.isDfsForestOf f . toAdjacencyMap
1797.54 s
[algebraic-graphs] OK: isTopSortOf vs == Algebra.Graph.AdjacencyMap.isTopSortOf vs . toAdjacencyMap
1797.54 s
[algebraic-graphs]
1797.54 s
[algebraic-graphs] ============ AdjacencyMap.foldg ============
1797.54 s
[algebraic-graphs] OK: foldg empty vertex overlay connect == id
1797.54 s
[algebraic-graphs] OK: foldg empty vertex overlay (flip connect) == transpose
1797.54 s
[algebraic-graphs] OK: foldg 1 (const 1) (+) (+) == size
1797.54 s
[algebraic-graphs] OK: foldg True (const False) (&&) (&&) == isEmpty
1797.54 s
[algebraic-graphs]
1797.54 s
[algebraic-graphs] ============ AdjacencyMap.isEmpty ============
1797.55 s
[algebraic-graphs] OK: isEmpty empty == True
1797.55 s
[algebraic-graphs] OK: isEmpty (overlay empty empty) == True
1797.55 s
[algebraic-graphs] OK: isEmpty (vertex x) == False
1797.55 s
[algebraic-graphs] OK: isEmpty (removeVertex x $ vertex x) == True
1797.55 s
[algebraic-graphs] OK: isEmpty (removeEdge x y $ edge x y) == False
1797.55 s
[algebraic-graphs]
1797.55 s
[algebraic-graphs] ============ AdjacencyMap.hasVertex ============
1797.55 s
[algebraic-graphs] OK: hasVertex x empty == False
1797.55 s
[algebraic-graphs] OK: hasVertex x (vertex y) == (x == y)
1797.55 s
[algebraic-graphs] OK: hasVertex x . removeVertex x == const False
1797.55 s
[algebraic-graphs]
1797.55 s
[algebraic-graphs] ============ AdjacencyMap.hasEdge ============
1797.55 s
[algebraic-graphs] OK: hasEdge x y empty == False
1797.55 s
[algebraic-graphs] OK: hasEdge x y (vertex z) == False
1797.55 s
[algebraic-graphs] OK: hasEdge x y (edge x y) == True
1797.55 s
[algebraic-graphs] OK: hasEdge x y . removeEdge x y == const False
1797.55 s
[algebraic-graphs] OK: hasEdge x y == elem (x,y) . edgeList
1797.55 s
[algebraic-graphs]
1797.55 s
[algebraic-graphs] ============ AdjacencyMap.vertexCount ============
1797.55 s
[algebraic-graphs] OK: vertexCount empty == 0
1797.55 s
[algebraic-graphs] OK: vertexCount (vertex x) == 1
1797.55 s
[algebraic-graphs] OK: vertexCount == length . vertexList
1797.55 s
[algebraic-graphs] OK: vertexCount x < vertexCount y ==> x < y
1797.55 s
[algebraic-graphs]
1797.55 s
[algebraic-graphs] ============ AdjacencyMap.edgeCount ============
1797.55 s
[algebraic-graphs] OK: edgeCount empty == 0
1797.55 s
[algebraic-graphs] OK: edgeCount (vertex x) == 0
1797.55 s
[algebraic-graphs] OK: edgeCount (edge x y) == 1
1797.55 s
[algebraic-graphs] OK: edgeCount == length . edgeList
1797.55 s
[algebraic-graphs]
1797.55 s
[algebraic-graphs] ============ AdjacencyMap.vertexList ============
1797.55 s
[algebraic-graphs] OK: vertexList empty == []
1797.55 s
[algebraic-graphs] OK: vertexList (vertex x) == [x]
1797.55 s
[algebraic-graphs] OK: vertexList . vertices == nub . sort
1797.55 s
[algebraic-graphs]
1797.55 s
[algebraic-graphs] ============ AdjacencyMap.vertexSet ============
1797.55 s
[algebraic-graphs] OK: vertexSet empty == Set.empty
1797.55 s
[algebraic-graphs] OK: vertexSet . vertex == Set.singleton
1797.55 s
[algebraic-graphs] OK: vertexSet . vertices == Set.fromList
1797.55 s
[algebraic-graphs]
1797.55 s
[algebraic-graphs] ============ AdjacencyMap.vertexIntSet ============
1797.55 s
[algebraic-graphs] OK: vertexIntSet empty == IntSet.empty
1797.55 s
[algebraic-graphs] OK: vertexIntSet . vertex == IntSet.singleton
1797.55 s
[algebraic-graphs] OK: vertexIntSet . vertices == IntSet.fromList
1797.55 s
[algebraic-graphs] OK: vertexIntSet . clique == IntSet.fromList
1797.55 s
[algebraic-graphs]
1797.55 s
[algebraic-graphs] ============ AdjacencyMap.edgeList ============
1797.55 s
[algebraic-graphs] OK: edgeList empty == []
1797.55 s
[algebraic-graphs] OK: edgeList (vertex x) == []
1797.55 s
[algebraic-graphs] OK: edgeList (edge x y) == [(x,y)]
1797.55 s
[algebraic-graphs] OK: edgeList (star 2 [3,1]) == [(2,1), (2,3)]
1797.55 s
[algebraic-graphs] OK: edgeList . edges == nub . sort
1797.55 s
[algebraic-graphs]
1797.55 s
[algebraic-graphs] ============ AdjacencyMap.edgeSet ============
1797.55 s
[algebraic-graphs] OK: edgeSet empty == Set.empty
1797.55 s
[algebraic-graphs] OK: edgeSet (vertex x) == Set.empty
1797.55 s
[algebraic-graphs] OK: edgeSet (edge x y) == Set.singleton (x,y)
1797.55 s
[algebraic-graphs] OK: edgeSet . edges == Set.fromList
1797.55 s
[algebraic-graphs]
1797.55 s
[algebraic-graphs] ============ AdjacencyMap.adjacencyList ============
1797.55 s
[algebraic-graphs] OK: adjacencyList empty == []
1797.55 s
[algebraic-graphs] OK: adjacencyList (vertex x) == [(x, [])]
1797.55 s
[algebraic-graphs] OK: adjacencyList (edge 1 2) == [(1, [2]), (2, [])]
1797.55 s
[algebraic-graphs] OK: adjacencyList (star 2 [3,1]) == [(1, []), (2, [1,3]), (3, [])]
1797.55 s
[algebraic-graphs]
1797.55 s
[algebraic-graphs] ============ AdjacencyMap.preSet ============
1797.55 s
[algebraic-graphs] OK: preSet x empty == Set.empty
1797.55 s
[algebraic-graphs] OK: preSet x (vertex x) == Set.empty
1797.55 s
[algebraic-graphs] OK: preSet 1 (edge 1 2) == Set.empty
1797.55 s
[algebraic-graphs] OK: preSet y (edge x y) == Set.fromList [x]
1797.55 s
[algebraic-graphs]
1797.55 s
[algebraic-graphs] ============ AdjacencyMap.preIntSet ============
1797.55 s
[algebraic-graphs] OK: preIntSet x empty == IntSet.empty
1797.55 s
[algebraic-graphs] OK: preIntSet x (vertex x) == IntSet.empty
1797.55 s
[algebraic-graphs] OK: preIntSet 1 (edge 1 2) == IntSet.empty
1797.55 s
[algebraic-graphs] OK: preIntSet y (edge x y) == IntSet.fromList [x]
1797.55 s
[algebraic-graphs]
1797.55 s
[algebraic-graphs] ============ AdjacencyMap.postSet ============
1797.55 s
[algebraic-graphs] OK: postSet x empty == Set.empty
1797.55 s
[algebraic-graphs] OK: postSet x (vertex x) == Set.empty
1797.55 s
[algebraic-graphs] OK: postSet x (edge x y) == Set.fromList [y]
1797.55 s
[algebraic-graphs] OK: postSet 2 (edge 1 2) == Set.empty
1797.55 s
[algebraic-graphs]
1797.55 s
[algebraic-graphs] ============ AdjacencyMap.postIntSet ============
1797.55 s
[algebraic-graphs] OK: postIntSet x empty == IntSet.empty
1797.55 s
[algebraic-graphs] OK: postIntSet x (vertex x) == IntSet.empty
1797.55 s
[algebraic-graphs] OK: postIntSet 2 (edge 1 2) == IntSet.empty
1797.55 s
[algebraic-graphs] OK: postIntSet x (edge x y) == IntSet.fromList [y]
1797.55 s
[algebraic-graphs]
1797.55 s
[algebraic-graphs] ============ AdjacencyMap.path ============
1797.55 s
[algebraic-graphs] OK: path [] == empty
1797.55 s
[algebraic-graphs] OK: path [x] == vertex x
1797.55 s
[algebraic-graphs] OK: path [x,y] == edge x y
1797.55 s
[algebraic-graphs]
1797.55 s
[algebraic-graphs] ============ AdjacencyMap.circuit ============
1797.55 s
[algebraic-graphs] OK: circuit [] == empty
1797.55 s
[algebraic-graphs] OK: circuit [x] == edge x x
1797.55 s
[algebraic-graphs] OK: circuit [x,y] == edges [(x,y), (y,x)]
1797.55 s
[algebraic-graphs]
1797.55 s
[algebraic-graphs] ============ AdjacencyMap.clique ============
1797.55 s
[algebraic-graphs] OK: clique [] == empty
1797.55 s
[algebraic-graphs] OK: clique [x] == vertex x
1797.55 s
[algebraic-graphs] OK: clique [x,y] == edge x y
1797.55 s
[algebraic-graphs] OK: clique [x,y,z] == edges [(x,y), (x,z), (y,z)]
1797.55 s
[algebraic-graphs] OK: clique (xs ++ ys) == connect (clique xs) (clique ys)
1797.55 s
[algebraic-graphs]
1797.55 s
[algebraic-graphs] ============ AdjacencyMap.biclique ============
1797.55 s
[algebraic-graphs] OK: biclique [] [] == empty
1797.55 s
[algebraic-graphs] OK: biclique [x] [] == vertex x
1797.55 s
[algebraic-graphs] OK: biclique [] [y] == vertex y
1797.55 s
[algebraic-graphs] OK: biclique [x1,x2] [y1,y2] == edges [(x1,y1), (x1,y2), (x2,y1), (x2,y2)]
1797.55 s
[algebraic-graphs] OK: biclique xs ys == connect (vertices xs) (vertices ys)
1797.55 s
[algebraic-graphs]
1797.55 s
[algebraic-graphs] ============ AdjacencyMap.star ============
1797.55 s
[algebraic-graphs] OK: star x [] == vertex x
1797.55 s
[algebraic-graphs] OK: star x [y] == edge x y
1797.55 s
[algebraic-graphs] OK: star x [y,z] == edges [(x,y), (x,z)]
1797.55 s
[algebraic-graphs] OK: star x ys == connect (vertex x) (vertices ys)
1797.55 s
[algebraic-graphs]
1797.55 s
[algebraic-graphs] ============ AdjacencyMap.stars ============
1797.55 s
[algebraic-graphs] OK: stars [] == empty
1797.55 s
[algebraic-graphs] OK: stars [(x, [])] == vertex x
1797.55 s
[algebraic-graphs] OK: stars [(x, [y])] == edge x y
1797.55 s
[algebraic-graphs] OK: stars [(x, ys)] == star x ys
1797.55 s
[algebraic-graphs] OK: stars == overlays . map (uncurry star)
1797.55 s
[algebraic-graphs] OK: stars . adjacencyList == id
1797.55 s
[algebraic-graphs] OK: overlay (stars xs) (stars ys) == stars (xs ++ ys)
1797.55 s
[algebraic-graphs]
1797.55 s
[algebraic-graphs] ============ AdjacencyMap.tree ============
1797.55 s
[algebraic-graphs] OK: tree (Node x []) == vertex x
1797.55 s
[algebraic-graphs] OK: tree (Node x [Node y [Node z []]]) == path [x,y,z]
1797.55 s
[algebraic-graphs] OK: tree (Node x [Node y [], Node z []]) == star x [y,z]
1797.55 s
[algebraic-graphs] OK: tree (Node 1 [Node 2 [], Node 3 [Node 4 [], Node 5 []]]) == edges [(1,2), (1,3), (3,4), (3,5)]
1797.55 s
[algebraic-graphs]
1797.55 s
[algebraic-graphs] ============ AdjacencyMap.forest ============
1797.55 s
[algebraic-graphs] OK: forest [] == empty
1797.55 s
[algebraic-graphs] OK: forest [x] == tree x
1797.55 s
[algebraic-graphs] OK: forest [Node 1 [Node 2 [], Node 3 []], Node 4 [Node 5 []]] == edges [(1,2), (1,3), (4,5)]
1797.55 s
[algebraic-graphs] OK: forest == overlays . map tree
1797.55 s
[algebraic-graphs]
1797.55 s
[algebraic-graphs] ============ AdjacencyMap.removeVertex ============
1797.55 s
[algebraic-graphs] OK: removeVertex x (vertex x) == empty
1797.55 s
[algebraic-graphs] OK: removeVertex 1 (vertex 2) == vertex 2
1797.55 s
[algebraic-graphs] OK: removeVertex x (edge x x) == empty
1797.55 s
[algebraic-graphs] OK: removeVertex 1 (edge 1 2) == vertex 2
1797.55 s
[algebraic-graphs] OK: removeVertex x . removeVertex x == removeVertex x
1797.55 s
[algebraic-graphs]
1797.55 s
[algebraic-graphs] ============ AdjacencyMap.removeEdge ============
1797.55 s
[algebraic-graphs] OK: removeEdge x y (edge x y) == vertices [x,y]
1797.55 s
[algebraic-graphs] OK: removeEdge x y . removeEdge x y == removeEdge x y
1797.55 s
[algebraic-graphs] OK: removeEdge x y . removeVertex x == removeVertex x
1797.55 s
[algebraic-graphs] OK: removeEdge 1 1 (1 * 1 * 2 * 2) == 1 * 2 * 2
1797.55 s
[algebraic-graphs] OK: removeEdge 1 2 (1 * 1 * 2 * 2) == 1 * 1 + 2 * 2
1797.55 s
[algebraic-graphs]
1797.55 s
[algebraic-graphs] ============ AdjacencyMap.replaceVertex ============
1797.55 s
[algebraic-graphs] OK: replaceVertex x x == id
1797.55 s
[algebraic-graphs] OK: replaceVertex x y (vertex x) == vertex y
1797.55 s
[algebraic-graphs] OK: replaceVertex x y == mergeVertices (== x) y
1797.55 s
[algebraic-graphs]
1797.55 s
[algebraic-graphs] ============ AdjacencyMap.mergeVertices ============
1797.55 s
[algebraic-graphs] OK: mergeVertices (const False) x == id
1797.55 s
[algebraic-graphs] OK: mergeVertices (== x) y == replaceVertex x y
1797.55 s
[algebraic-graphs] OK: mergeVertices even 1 (0 * 2) == 1 * 1
1797.55 s
[algebraic-graphs] OK: mergeVertices odd 1 (3 + 4 * 5) == 4 * 1
1797.55 s
[algebraic-graphs]
1797.55 s
[algebraic-graphs] ============ AdjacencyMap.transpose ============
1797.55 s
[algebraic-graphs] OK: transpose empty == empty
1797.55 s
[algebraic-graphs] OK: transpose (vertex x) == vertex x
1797.55 s
[algebraic-graphs] OK: transpose (edge x y) == edge y x
1797.55 s
[algebraic-graphs] OK: transpose . transpose == id
1797.55 s
[algebraic-graphs] OK: edgeList . transpose == sort . map swap . edgeList
1797.55 s
[algebraic-graphs]
1797.55 s
[algebraic-graphs] ============ AdjacencyMap.gmap ============
1797.55 s
[algebraic-graphs] OK: gmap f empty == empty
1797.55 s
[algebraic-graphs] OK: gmap f (vertex x) == vertex (f x)
1797.55 s
[algebraic-graphs] OK: gmap f (edge x y) == edge (f x) (f y)
1797.55 s
[algebraic-graphs] OK: gmap id == id
1797.55 s
[algebraic-graphs] OK: gmap f . gmap g == gmap (f . g)
1797.55 s
[algebraic-graphs]
1797.55 s
[algebraic-graphs] ============ AdjacencyMap.induce ============
1797.55 s
[algebraic-graphs] OK: induce (const True ) x == x
1797.55 s
[algebraic-graphs] OK: induce (const False) x == empty
1797.55 s
[algebraic-graphs] OK: induce (/= x) == removeVertex x
1797.55 s
[algebraic-graphs] OK: induce p . induce q == induce (\x -> p x && q x)
1797.55 s
[algebraic-graphs] OK: isSubgraphOf (induce p x) x == True
1797.55 s
[algebraic-graphs]
1797.55 s
[algebraic-graphs] ============ AdjacencyMap.compose ============
1797.55 s
[algebraic-graphs] OK: compose empty x == empty
1797.55 s
[algebraic-graphs] OK: compose x empty == empty
1797.55 s
[algebraic-graphs] OK: compose (vertex x) y == empty
1797.55 s
[algebraic-graphs] OK: compose x (vertex y) == empty
1797.55 s
[algebraic-graphs] OK: compose x (compose y z) == compose (compose x y) z
1797.55 s
[algebraic-graphs] OK: compose x (overlay y z) == overlay (compose x y) (compose x z)
1799.39 s
[algebraic-graphs] OK: compose (overlay x y) z == overlay (compose x z) (compose y z)
1799.39 s
[algebraic-graphs] OK: compose (edge x y) (edge y z) == edge x z
1799.48 s
[algebraic-graphs] OK: compose (path [1..5]) (path [1..5]) == edges [(1,3),(2,4),(3,5)]
1799.48 s
[algebraic-graphs] OK: compose (circuit [1..5]) (circuit [1..5]) == circuit [1,3,5,2,4]
1799.48 s
[algebraic-graphs]
1799.48 s
[algebraic-graphs] ============ AdjacencyMap.closure ============
1799.48 s
[algebraic-graphs] OK: closure empty == empty
1799.48 s
[algebraic-graphs] OK: closure (vertex x) == edge x x
1799.48 s
[algebraic-graphs] OK: closure (edge x x) == edge x x
1799.48 s
[algebraic-graphs] OK: closure (edge x y) == edges [(x,x), (x,y), (y,y)]
1799.48 s
[algebraic-graphs] OK: closure (path $ nub xs) == reflexiveClosure (clique $ nub xs)
1799.48 s
[algebraic-graphs] OK: closure == reflexiveClosure . transitiveClosure
1799.48 s
[algebraic-graphs] OK: closure == transitiveClosure . reflexiveClosure
1799.48 s
[algebraic-graphs] OK: closure . closure == closure
1799.48 s
[algebraic-graphs] OK: postSet x (closure y) == Set.fromList (reachable y x)
1799.48 s
[algebraic-graphs]
1799.48 s
[algebraic-graphs] ============ AdjacencyMap.reflexiveClosure ============
1799.48 s
[algebraic-graphs] OK: reflexiveClosure empty == empty
1799.48 s
[algebraic-graphs] OK: reflexiveClosure (vertex x) == edge x x
1799.48 s
[algebraic-graphs] OK: reflexiveClosure (edge x x) == edge x x
1799.48 s
[algebraic-graphs] OK: reflexiveClosure (edge x y) == edges [(x,x), (x,y), (y,y)]
1799.48 s
[algebraic-graphs] OK: reflexiveClosure . reflexiveClosure == reflexiveClosure
1799.48 s
[algebraic-graphs]
1799.48 s
[algebraic-graphs] ============ AdjacencyMap.symmetricClosure ============
1799.48 s
[algebraic-graphs] OK: symmetricClosure empty == empty
1799.48 s
[algebraic-graphs] OK: symmetricClosure (vertex x) == vertex x
1799.48 s
[algebraic-graphs] OK: symmetricClosure (edge x y) == edges [(x,y), (y,x)]
1799.48 s
[algebraic-graphs] OK: symmetricClosure x == overlay x (transpose x)
1799.48 s
[algebraic-graphs] OK: symmetricClosure . symmetricClosure == symmetricClosure
1799.48 s
[algebraic-graphs]
1799.48 s
[algebraic-graphs] ============ AdjacencyMap.transitiveClosure ============
1799.48 s
[algebraic-graphs] OK: transitiveClosure empty == empty
1799.48 s
[algebraic-graphs] OK: transitiveClosure (vertex x) == vertex x
1799.48 s
[algebraic-graphs] OK: transitiveClosure (edge x y) == edge x y
1799.48 s
[algebraic-graphs] OK: transitiveClosure (path $ nub xs) == clique (nub $ xs)
1799.48 s
[algebraic-graphs] OK: transitiveClosure . transitiveClosure == transitiveClosure
1799.48 s
[algebraic-graphs]
1799.48 s
[algebraic-graphs] ============ AdjacencyMap.box ============
1799.48 s
[algebraic-graphs] OK: box x y ~~ box y x
1799.48 s
[algebraic-graphs] OK: box x (overlay y z) == overlay (box x y) (box x z)
1799.48 s
[algebraic-graphs] OK: box x (vertex ()) ~~ x
1799.48 s
[algebraic-graphs] OK: box x empty ~~ empty
1799.48 s
[algebraic-graphs] OK: box x (box y z) ~~ box (box x y) z
1799.48 s
[algebraic-graphs] OK: transpose (box x y) == box (transpose x) (transpose y)
1799.48 s
[algebraic-graphs] OK: vertexCount (box x y) == vertexCount x * vertexCount y
1799.48 s
[algebraic-graphs] OK: edgeCount (box x y) <= vertexCount x * edgeCount y + edgeCount x * vertexCount y
1799.48 s
[algebraic-graphs]
1799.48 s
[algebraic-graphs] ============ AdjacencyMap.bfsForest ============
1799.48 s
[algebraic-graphs] OK: forest $ bfsForest (edge 1 2) [0] == empty
1799.48 s
[algebraic-graphs] OK: forest $ bfsForest (edge 1 2) [1] == edge 1 2
1799.48 s
[algebraic-graphs] OK: forest $ bfsForest (edge 1 2) [2] == vertex 2
1799.48 s
[algebraic-graphs] OK: forest $ bfsForest (edge 1 2) [0,1,2] == vertices [1,2]
1799.48 s
[algebraic-graphs] OK: forest $ bfsForest (edge 1 2) [2,1,0] == vertices [1,2]
1799.48 s
[algebraic-graphs] OK: forest $ bfsForest (edge 1 1) [1] == vertex 1
1799.48 s
[algebraic-graphs] OK: isSubgraphOf (forest $ bfsForest x vs) x == True
1799.48 s
[algebraic-graphs] OK: bfsForest x (vertexList x) == map ( -> Node v []) (nub $ vertexList x)
1799.48 s
[algebraic-graphs] OK: bfsForest x [] == []
1799.48 s
[algebraic-graphs] OK: bfsForest empty vs == []
1799.48 s
[algebraic-graphs] OK: bfsForest (3 * (1 + 4) * (1 + 5)) [1,4] == <correct result>
1799.48 s
[algebraic-graphs] OK: forest $ bfsForest (circuit [1..5] + circuit [5,4..1]) [3] == path [3,2,1] + path [3,4,5]
1799.48 s
[algebraic-graphs]
1799.48 s
[algebraic-graphs] ============ AdjacencyMap.bfs ============
1799.48 s
[algebraic-graphs] OK: bfs (edge 1 2) [0] == []
1799.48 s
[algebraic-graphs] OK: bfs (edge 1 2) [1] == [[1], [2]]
1799.48 s
[algebraic-graphs] OK: bfs (edge 1 2) [2] == [[2]]
1799.48 s
[algebraic-graphs] OK: bfs (edge 1 2) [1,2] == [[1,2]]
1799.48 s
[algebraic-graphs] OK: bfs (edge 1 2) [2,1] == [[2,1]]
1799.48 s
[algebraic-graphs] OK: bfs (edge 1 1) [1] == [[1]]
1799.48 s
[algebraic-graphs] OK: bfs empty vs == []
1799.48 s
[algebraic-graphs] OK: bfs x [] == []
1799.48 s
[algebraic-graphs] OK: bfs (1 * 2 + 3 * 4 + 5 * 6) [1,2] == [[1,2]]
1799.48 s
[algebraic-graphs] OK: bfs (1 * 2 + 3 * 4 + 5 * 6) [1,3] == [[1,3], [2,4]]
1799.48 s
[algebraic-graphs] OK: bfs (3 * (1 + 4) * (1 + 5)) [3] == [[3], [1,4,5]]
1799.48 s
[algebraic-graphs] OK: bfs (circuit [1..5] + circuit [5,4..1]) [2] == [[2], [1,3], [5,4]]
1799.48 s
[algebraic-graphs] OK: concat $ bfs (circuit [1..5] + circuit [5,4..1]) [3] == [3,2,4,1,5]
1799.48 s
[algebraic-graphs] OK: map concat . transpose . map levels . bfsForest x == bfs x
1799.48 s
[algebraic-graphs]
1799.48 s
[algebraic-graphs] ============ AdjacencyMap.dfsForest ============
1799.48 s
[algebraic-graphs] OK: forest $ dfsForest empty == empty
1799.48 s
[algebraic-graphs] OK: forest $ dfsForest (edge 1 1) == vertex 1
1799.48 s
[algebraic-graphs] OK: forest $ dfsForest (edge 1 2) == edge 1 2
1799.48 s
[algebraic-graphs] OK: forest $ dfsForest (edge 2 1) == vertices [1,2]
1799.48 s
[algebraic-graphs] OK: isSubgraphOf (forest $ dfsForest x) x == True
1799.48 s
[algebraic-graphs] OK: isDfsForestOf (dfsForest x) x == True
1799.48 s
[algebraic-graphs] OK: dfsForest . forest . dfsForest == dfsForest
1799.48 s
[algebraic-graphs] OK: dfsForest (vertices vs) == map (\v -> Node v []) (nub $ sort vs)
1799.48 s
[algebraic-graphs] OK: dfsForest $ 3 * (1 + 4) * (1 + 5) == <correct result>
1799.48 s
[algebraic-graphs] OK: forest (dfsForest $ circuit [1..5] + circuit [5,4..1]) == path [1,2,3,4,5]
1799.48 s
[algebraic-graphs]
1799.48 s
[algebraic-graphs] ============ AdjacencyMap.dfsForestFrom ============
1799.48 s
[algebraic-graphs] OK: forest $ dfsForestFrom empty vs == empty
1799.48 s
[algebraic-graphs] OK: forest $ dfsForestFrom (edge 1 1) [1] == vertex 1
1799.48 s
[algebraic-graphs] OK: forest $ dfsForestFrom (edge 1 2) [0] == empty
1799.48 s
[algebraic-graphs] OK: forest $ dfsForestFrom (edge 1 2) [1] == edge 1 2
1799.48 s
[algebraic-graphs] OK: forest $ dfsForestFrom (edge 1 2) [2] == vertex 2
1799.48 s
[algebraic-graphs] OK: forest $ dfsForestFrom (edge 1 2) [1,2] == edge 1 2
1799.48 s
[algebraic-graphs] OK: forest $ dfsForestFrom (edge 1 2) [2,1] == vertices [1,2]
1799.48 s
[algebraic-graphs] OK: isSubgraphOf (forest $ dfsForestFrom x vs) x == True
1799.48 s
[algebraic-graphs] OK: isDfsForestOf (dfsForestFrom x (vertexList x)) x == True
1799.48 s
[algebraic-graphs] OK: dfsForestFrom x (vertexList x) == dfsForest x
1799.48 s
[algebraic-graphs] OK: dfsForestFrom x [] == []
1799.48 s
[algebraic-graphs] OK: dfsForestFrom (3 * (1 + 4) * (1 + 5)) [1,4] == <correct result>
1799.48 s
[algebraic-graphs] OK: forest $ dfsForestFrom (circuit [1..5] + circuit [5,4..1]) [3] == path [3,2,1,5,4]
1799.48 s
[algebraic-graphs]
1799.48 s
[algebraic-graphs] ============ AdjacencyMap.dfs ============
1799.48 s
[algebraic-graphs] OK: dfs empty vs == []
1799.48 s
[algebraic-graphs] OK: dfs (edge 1 1) [1] == [1]
1799.48 s
[algebraic-graphs] OK: dfs (edge 1 2) [0] == []
1799.48 s
[algebraic-graphs] OK: dfs (edge 1 2) [1] == [1,2]
1799.48 s
[algebraic-graphs] OK: dfs (edge 1 2) [2] == [2]
1799.48 s
[algebraic-graphs] OK: dfs (edge 1 2) [1,2] == [1,2]
1799.48 s
[algebraic-graphs] OK: dfs (edge 1 2) [2,1] == [2,1]
1799.48 s
[algebraic-graphs] OK: dfs x [] == []
1799.48 s
[algebraic-graphs]
1799.48 s
[algebraic-graphs] OK: and [ hasVertex v x | v <- dfs x vs ] == True
1799.48 s
[algebraic-graphs] OK: dfs (3 * (1 + 4) * (1 + 5)) [1,4] == [1,5,4]
1799.48 s
[algebraic-graphs] OK: dfs (circuit [1..5] + circuit [5,4..1]) [3] == [3,2,1,5,4]
1799.48 s
[algebraic-graphs]
1799.48 s
[algebraic-graphs] ============ AdjacencyMap.dfs ============
1799.48 s
[algebraic-graphs] OK: reachable empty x == []
1799.48 s
[algebraic-graphs] OK: reachable (vertex 1) 1 == [1]
1799.48 s
[algebraic-graphs] OK: reachable (edge 1 1) 1 == [1]
1799.48 s
[algebraic-graphs] OK: reachable (edge 1 2) 0 == []
1799.48 s
[algebraic-graphs] OK: reachable (edge 1 2) 1 == [1,2]
1799.48 s
[algebraic-graphs] OK: reachable (edge 1 2) 2 == [2]
1799.48 s
[algebraic-graphs] OK: reachable (path [1..8] ) 4 == [4..8]
1799.48 s
[algebraic-graphs] OK: reachable (circuit [1..8] ) 4 == [4..8] ++ [1..3]
1799.48 s
[algebraic-graphs] OK: reachable (clique [8,7..1]) 8 == [8] ++ [1..7]
1799.48 s
[algebraic-graphs]
1799.48 s
[algebraic-graphs] OK: and [ hasVertex v x | v <- reachable x y ] == True
1799.48 s
[algebraic-graphs]
1799.48 s
[algebraic-graphs] ============ AdjacencyMap.topSort ============
1799.48 s
[algebraic-graphs] OK: topSort (1 * 2 + 3 * 1) == Right [3,1,2]
1799.48 s
[algebraic-graphs] OK: topSort (path [1..5]) == Right [1..5]
1799.48 s
[algebraic-graphs] OK: topSort (3 * (1 * 4 + 2 * 5)) == Right [3,1,2,4,5]
1799.48 s
[algebraic-graphs] OK: topSort (1 * 2 + 2 * 1) == Left (2 :| [1])
1799.48 s
[algebraic-graphs] OK: topSort (path [5,4..1] + edge 2 4) == Left (4 :| [3,2])
1799.48 s
[algebraic-graphs] OK: topSort (circuit [1..5]) == Left (3 :| [1,2])
1799.48 s
[algebraic-graphs] OK: topSort (circuit [1..3] + circuit [3,2,1]) == Left (3 :| [2])
1799.48 s
[algebraic-graphs] OK: topSort (1 * 2 + (5 + 2) * 1 + 3 * 4 * 3) == Left (1 :| [2])
1799.48 s
[algebraic-graphs] OK: fmap (flip isTopSortOf x) (topSort x) /= Right False
1799.48 s
[algebraic-graphs] OK: topSort . vertices == Right . nub . sort
1799.48 s
[algebraic-graphs]
1799.48 s
[algebraic-graphs] ============ AdjacencyMap.testIsAcyclic ============
1799.48 s
[algebraic-graphs] OK: isAcyclic (1 * 2 + 3 * 1) == True
1799.48 s
[algebraic-graphs] OK: isAcyclic (1 * 2 + 2 * 1) == False
1799.48 s
[algebraic-graphs] OK: isAcyclic . circuit == null
1799.48 s
[algebraic-graphs] OK: isAcyclic == isRight . topSort
1799.48 s
[algebraic-graphs]
1799.48 s
[algebraic-graphs] ============ AdjacencyMap.isDfsForestOf ============
1799.49 s
[algebraic-graphs] OK: isDfsForestOf [] empty == True
1799.49 s
[algebraic-graphs] OK: isDfsForestOf [] (vertex 1) == False
1799.49 s
[algebraic-graphs] OK: isDfsForestOf [Node 1 []] (vertex 1) == True
1799.49 s
[algebraic-graphs] OK: isDfsForestOf [Node 1 []] (vertex 2) == False
1799.49 s
[algebraic-graphs] OK: isDfsForestOf [Node 1 [], Node 1 []] (vertex 1) == False
1799.49 s
[algebraic-graphs] OK: isDfsForestOf [Node 1 []] (edge 1 1) == True
1799.49 s
[algebraic-graphs] OK: isDfsForestOf [Node 1 []] (edge 1 2) == False
1800.03 s
interrupted by the user