module Duckling.Distance.RO.Corpus
( corpus ) where
import Prelude
import Data.String
import Duckling.Distance.Types
import Duckling.Locale
import Duckling.Resolve
import Duckling.Testing.Types
corpus :: Corpus
corpus = (testContext {locale = makeLocale RO Nothing}, allExamples)
allExamples :: [Example]
allExamples = concat
[ examples (DistanceValue Kilometre 3)
[ "3 kilometri"
, "3 km"
, "3km"
, "3,0 km"
]
, examples (DistanceValue Mile 8)
[ "8 mile"
]
, examples (DistanceValue Metre 9)
[ "9m"
, "9 m"
]
, examples (DistanceValue Centimetre 2)
[ "2cm"
, "2 centimetri"
]
, examples (DistanceValue Foot 10)
[ "zece picioare"
]
]