module FunIn5 where --Any unused parameter to a definition can be removed. --In this example: remove (x,y) (stop the cursor at 'x' or 'y') foo (x,y) = h + t where (h,t) = head $ zip [1..a] [3..b] a=10 b=17 main :: Int main = foo (10, 20)