Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- if (null [(a,b) | (a,b)<-[(5,2),(4,2),(2,2),(1,2)], b==2, a<4]) then [] else [min [(a,b) | (a,b)<-[(5,2),(4,2),(2,2),(1,2)], b==2, a<4 ]]
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement