import           XMonad.Util.Keyboard (showKBLayout)

main :: IO ()
main = putStrLn =<< showKBLayout