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)