Haskell zip lists to lists of tulples

Question

>cprod [1,2,3] [’a’, ’b’]
[(1,’a’),(2,’a’),(3,’a’),(1,’b’),(2,’b’),(3,’b’)]

I try to implement the code by using zip but I know it is not enough.