aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/VeriFuzz/RandomAlt.hs25
1 files changed, 0 insertions, 25 deletions
diff --git a/src/VeriFuzz/RandomAlt.hs b/src/VeriFuzz/RandomAlt.hs
deleted file mode 100644
index 8548a1a..0000000
--- a/src/VeriFuzz/RandomAlt.hs
+++ /dev/null
@@ -1,25 +0,0 @@
-{-|p
-Module : VeriFuzz.RandomAlt
-Description : RandomAlt generation for DAG
-Copyright : (c) 2018-2019, Yann Herklotz
-License : BSD-3
-Maintainer : ymherklotz [at] gmail [dot] com
-Stability : experimental
-Portability : POSIX
-
-Define the random generation for the directed acyclic graph.
--}
-
-module VeriFuzz.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
-
-randomDAG :: (Arbitrary l, Arbitrary e) => Gen (Gr l e)
-randomDAG = G.looplessGraph <$> QC.arbitrary
-
--- | Generate a random acyclic DAG with an IO instance.
-genRandomDAG :: (Arbitrary l, Arbitrary e) => IO (Gr l e)
-genRandomDAG = QC.generate randomDAG