improve Main.hs: Show Argument