mirror of
https://github.com/iritmaximus/haskell.git
synced 2026-10-12 19:13:39 +03:00
Set 12 Ex 7: don't care about ordering
This commit is contained in:
@@ -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) ->
|
||||
|
||||
Reference in New Issue
Block a user