diff options
| -rw-r--r-- | src/Test/VeriFuzz/Graph/Random.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Test/VeriFuzz/Graph/Random.hs b/src/Test/VeriFuzz/Graph/Random.hs index a31e374..1bedf7f 100644 --- a/src/Test/VeriFuzz/Graph/Random.hs +++ b/src/Test/VeriFuzz/Graph/Random.hs @@ -25,7 +25,7 @@ arbitraryEdge n = do z <- arbitrary return (x, y, z) where - with = suchThat . resize n $ arbitrary + with = suchThat $ resize n arbitrary -- | Gen instance for a random acyclic DAG. randomDAG :: (Arbitrary l, Arbitrary e, Graph gr) |