[(x,y)|x<-[1,2],y<-[3,4]]

##</code><code>##

[(1,3),(1,4),(2,3),(2,4)]