From 4dc6354de80d31fc32e955dc22cf3440ded49e3a Mon Sep 17 00:00:00 2001
From: Joel Kaasinen <joel.kaasinen@metosin.fi>
Date: Mon, 8 Aug 2022 11:33:33 +0300
Subject: [PATCH] Set 12 Ex 7: don't care about ordering

---
 exercises/Set12Test.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/exercises/Set12Test.hs b/exercises/Set12Test.hs
index 847d45a..dca0651 100644
--- a/exercises/Set12Test.hs
+++ b/exercises/Set12Test.hs
@@ -112,7 +112,7 @@ ex6_maybe =
 ex7_list =
   forAll_ $ \(is::[Int]) ->
   forAll_ $ \(js::[Int]) ->
-  $(testing [|inBoth (nub is) (nub js)|]) (?==intersect (nub is) (nub js))
+  $(testing [|inBoth (nub is) (nub js)|]) (hasElements $ intersect (nub is) (nub js))
 
 ex7_maybe =
   forAll_ $ \(i::Int) ->