4 ms·

I’m sure there's a way to define the main function above in an Applicative fashion, but my Haskell isn't really up to it!