From a53cf08249ec1ca6cc9d9e87bd031e0022cd9b48 Mon Sep 17 00:00:00 2001
From: Yann Herklotz <ymherklotz@gmail.com>
Date: Thu, 27 Dec 2018 10:38:02 +0100
Subject: Small style change

---
 src/Test/VeriFuzz/Graph/Random.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/Test')

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)
-- 
cgit