hi, how do I define this function:
 
tupleWithf :: [Int] -> [(Int, Int)]
 
such that
 
tupleWithf [x1,x2,.....,xn]
= [ (f x1, x1), (f x2 x2),...., (f xn, xn) ]