1foo = pure 1 <^> pure 2 <^> pure (+)
2  where (<^>) = flip (<*>)
3
4        infixr 4 <^>
5