content: -- Copyright (c) 2016-present, Facebook, Inc.
  -- All rights reserved.
  --
  -- This source code is licensed under the BSD-style license found in the
  -- LICENSE file in the root directory of this source tree.
  
  
  {-# LANGUAGE OverloadedStrings #-}
  
  module Duckling.AmountOfMoney.RO.Corpus
    ( corpus
    , negativeCorpus
    ) where
  
  import Data.String
  import Prelude
  
  import Duckling.AmountOfMoney.Types
  import Duckling.Locale
  import Duckling.Resolve
  import Duckling.Testing.Types
  
  context :: Context
  context = testContext {locale = makeLocale RO Nothing}
  
  negativeCorpus :: NegativeCorpus
  negativeCorpus = (context, testOptions, examples)
    where
      examples =
        [ "10 de dolari"
        ]
  
  corpus :: Corpus
  corpus = (context, testOptions, allExamples)
  
  allExamples :: [Example]
  allExamples = concat
    [ examples (simple RON 10)
               [ "10 lei"
               , "10 roni"
               , "10 RON"
               ]
    , examples (simple Cent 50)
               [ "50 de bani"
               , "50 DE BANI"
               ]
    , examples (simple RON 10.5)
               [ "10,5 lei"
               , "10,5 ron"
               , "10 lei si 50 bani"
               ]
    , examples (simple Dollar 10)
               [ "$10"
               , "10$"
               , "zece dolari"
               , "10 dolari"
               ]
    , examples (simple Cent 10)
               [ "zece centi"
               , "zece cenți"
               ]
    , examples (simple Dollar 10000)
               [ "$10.000"
               , "$10000"
               ]
    , examples (simple USD 1.23)
               [ "USD1,23"
               ]
    , examples (simple Dollar 1)
               [ "1 dolar"
               , "un dolar"
               , "$1"
               ]
    , examples (simple Cent 2)
               [ "2 centi"
               ]
    , examples (simple Cent 23)
               [ "23 de centi"
               ]
    , examples (simple Dollar 2.23)
               [ "2 dolari si 23 de centi"
               , "2 dolari și 23 de cenți"
               , "doi dolari si douăzeci si trei de centi"
               , "doi dolari și douăzeci și trei de cenți"
               , "2 dolari 23 de centi"
               , "doi dolari si 23"
               , "doi dolari și 23"
               ]
    , examples (simple EUR 20)
               [ "20€"
               , "20 de euro"
               , "20 de Euro"
               , "EUR 20"
               ]
    , examples (simple EUR 29.99)
               [ "EUR29,99"
               ]
    , examples (simple Pound 9)
               [ "£9"
               , "noua lir"
               , "nouă lire"
               ]
    , examples (simple GBP 3.01)
               [ "GBP3,01"
               , "GBP 3,01"
               ]
    , examples (simple QAR 1)
               [ "un rial qatarian"
               , "1 rial qataria"
               ]
    , examples (simple EGP 10)
               [ "zece lira egiptiana"
               ]
    , examples (simple LBP 1)
               [ "una liră libaneză"
               ]
    , examples (simple INR 42)
               [ "42 de rupii"
               , "Rs. 42"
               ]
    , examples (simple KWD 1)
               [ "un dinar kuweitian"
               ]
    , examples (simple AED 2)
               [ "2 dirhami"
               ]
    , examples (simple SAR 1)
               [ "1 rial saudit"
               , "un rial saudi"
               ]
    , examples (between RON (5, 15))
               [ "intre 5 si 15 lei"
               , "intre 5 și 15 lei"
               , "de la 5 RON la 15 RON"
               , "intre 5 lei si 15 lei"
               , "de la 5 la 15 lei"
               , "5 - 15 roni"
               , "aproximativ 5-15 lei"
               , "aproape de 5-15 lei"
               , "cam 5-15 RON"
               ]
    , examples (under EUR 7)
               [ "sub șapte euro"
               , "mai putin de 7 EUR"
               , "mai puțin de 7 EUR"
               , "nu chiar 7€"
               , "nici macar 7 euro"
               , "mai ieftin de 7€"
               , "cel mult 7 euro"
               ]
    , examples (above Dollar 3)
              [ "mai mult de 3 dolari"
              , "peste 3 dolari"
              , "mai scump de trei dolari"
              ]
    ]
  