Set 12 Ex 7: don't care about ordering

Cem-Gulec · Aug 8, 2022 · 4dc6354 · 4dc6354
1 parent 9269b95
commit 4dc6354
Showing 1 changed file with 1 addition and 1 deletion.
diff --git 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) ->