funcs = [\a b c -> a+b+c, \a b c -> a, \a b c -> b, \a b c -> c] arg = flip ($) -- аргументы применяются справа налево (первым будет 1 вторым 2 третьим 100500) main = print $ map (arg 100500 . arg 2 . arg 1) funcs