{-# OPTIONS_GHC -a -a -a -a -a -a -a -a -a -a -a #-} module Main (main) where main :: IO () main = dat