aboutsummaryrefslogtreecommitdiffstats
path: root/src/VeriFuzz/Graph/RandomAlt.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/VeriFuzz/Graph/RandomAlt.hs')
-rw-r--r--src/VeriFuzz/Graph/RandomAlt.hs12
1 files changed, 4 insertions, 8 deletions
diff --git a/src/VeriFuzz/Graph/RandomAlt.hs b/src/VeriFuzz/Graph/RandomAlt.hs
index c5fad9e..e6d16bb 100644
--- a/src/VeriFuzz/Graph/RandomAlt.hs
+++ b/src/VeriFuzz/Graph/RandomAlt.hs
@@ -12,14 +12,10 @@ Define the random generation for the directed acyclic graph.
module VeriFuzz.Graph.RandomAlt where
-import qualified Data.Graph.Inductive.Arbitrary
- as G
-import Data.Graph.Inductive.PatriciaTree
- ( Gr )
-import Test.QuickCheck ( Arbitrary
- , Gen
- )
-import qualified Test.QuickCheck as QC
+import qualified Data.Graph.Inductive.Arbitrary as G
+import Data.Graph.Inductive.PatriciaTree (Gr)
+import Test.QuickCheck (Arbitrary, Gen)
+import qualified Test.QuickCheck as QC
randomDAG :: (Arbitrary l, Arbitrary e) => Gen (Gr l e)
randomDAG = G.looplessGraph <$> QC.arbitrary