gender-0.1.0.0: gender.hs

-- |
-- Module:      gender.hs
-- Copyright:   (c) 2013 Kranium Gikos Mendoza
--              (c) 2007-2008, Jörg Michael
-- License:     LGPL
-- Maintainer:  Kranium Gikos Mendoza <kranium@gikos.net>
-- Stability:   experimental
-- Portability: portable
--

import Language.Gender
import Data.Text
import System.Environment

main = do
  args <- fmap (Prelude.map pack) getArgs
  dict <- defaultDictionary
  let result = Prelude.map (`lookup` dict) args
  print result