k :: a -> b -> ak x y = x s :: (a -> b -> c) -> (a -> b) -> a -> cs f g x = f x (g x) i :: a -> ai = s k k main = pure ()
Standard input is empty
Standard output is empty
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!