Haskell

[Law]

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) ]