import "Prelude"

a = [1,2]
b = [5,9]
main = [(x,y) | x <- a, y <- b]
--
[(1,5), (1,9), (2,5), (2,9)]