1{-# LANGUAGE NamedFieldPuns #-}
2{- -} module Main where
3main = putStr "foo"
4