{-# LANGUAGE OverloadedStrings #-}
module Duckling.Quantity.RO.Corpus
( corpus
) where
import Data.String
import Prelude
import Duckling.Locale
import Duckling.Quantity.Types
import Duckling.Resolve
import Duckling.Testing.Types
corpus :: Corpus
corpus = (testContext {locale = makeLocale RO Nothing}, testOptions, allExamples)
allExamples :: [Example]
allExamples = concat
[ examples (simple Pound 2 (Just "carne"))
[ "doua livre de carne"
]
, examples (simple Pound 1 Nothing)
[ "o livră"
]
, examples (simple Pound 500 (Just "zahăr"))
[ "cinci sute livre de zahăr"
, "cinci sute de livre de zahăr"
]
, examples (simple Pound 21 (Just "mamaliga"))
[ "douăzeci și unu de livre de mamaliga"
]
]