bit more tryout of Options.Applicative