{-# LANGUAGE OverloadedStrings #-}
module Duckling.Ordinal.ML.Corpus
( corpus
) where
import Data.String
import Prelude
import Duckling.Locale
import Duckling.Ordinal.Types
import Duckling.Resolve
import Duckling.Testing.Types
context :: Context
context :: Context
context = Context
testContext {locale :: Locale
locale = Lang -> Maybe Region -> Locale
makeLocale Lang
ML Maybe Region
forall a. Maybe a
Nothing}
corpus :: Corpus
corpus :: Corpus
corpus = (Context
context, Options
testOptions, [Example]
allExamples)
allExamples :: [Example]
allExamples :: [Example]
allExamples = [[Example]] -> [Example]
forall (t :: * -> *) a. Foldable t => t [a] -> [a]
concat
[ OrdinalData -> [Text] -> [Example]
forall a. ToJSON a => a -> [Text] -> [Example]
examples (Int -> OrdinalData
OrdinalData Int
1)
[ Text
"ഒന്നാം"
, Text
"1."
]
, OrdinalData -> [Text] -> [Example]
forall a. ToJSON a => a -> [Text] -> [Example]
examples (Int -> OrdinalData
OrdinalData Int
2)
[ Text
"രണ്ടാം"
, Text
"2."
]
, OrdinalData -> [Text] -> [Example]
forall a. ToJSON a => a -> [Text] -> [Example]
examples (Int -> OrdinalData
OrdinalData Int
3)
[ Text
"മൂന്നാം"
, Text
"3."
]
, OrdinalData -> [Text] -> [Example]
forall a. ToJSON a => a -> [Text] -> [Example]
examples (Int -> OrdinalData
OrdinalData Int
4)
[ Text
"നാലാം"
, Text
"4."
]
, OrdinalData -> [Text] -> [Example]
forall a. ToJSON a => a -> [Text] -> [Example]
examples (Int -> OrdinalData
OrdinalData Int
5)
[ Text
"അഞ്ചാം"
, Text
"5."
]
, OrdinalData -> [Text] -> [Example]
forall a. ToJSON a => a -> [Text] -> [Example]
examples (Int -> OrdinalData
OrdinalData Int
6)
[ Text
"ആറാം"
, Text
"6."
]
, OrdinalData -> [Text] -> [Example]
forall a. ToJSON a => a -> [Text] -> [Example]
examples (Int -> OrdinalData
OrdinalData Int
7)
[ Text
"ഏഴാം"
, Text
"7."
]
, OrdinalData -> [Text] -> [Example]
forall a. ToJSON a => a -> [Text] -> [Example]
examples (Int -> OrdinalData
OrdinalData Int
8)
[ Text
"എട്ടാം"
, Text
"8."
]
, OrdinalData -> [Text] -> [Example]
forall a. ToJSON a => a -> [Text] -> [Example]
examples (Int -> OrdinalData
OrdinalData Int
9)
[ Text
"ഒമ്പതാം"
, Text
"9."
]
, OrdinalData -> [Text] -> [Example]
forall a. ToJSON a => a -> [Text] -> [Example]
examples (Int -> OrdinalData
OrdinalData Int
10)
[ Text
"പത്താം"
, Text
"10."
]
, OrdinalData -> [Text] -> [Example]
forall a. ToJSON a => a -> [Text] -> [Example]
examples (Int -> OrdinalData
OrdinalData Int
11)
[ Text
"പതിനൊന്നാം"
, Text
"11."
]
, OrdinalData -> [Text] -> [Example]
forall a. ToJSON a => a -> [Text] -> [Example]
examples (Int -> OrdinalData
OrdinalData Int
12)
[ Text
"പന്ത്രണ്ടാം"
, Text
"12."
]
, OrdinalData -> [Text] -> [Example]
forall a. ToJSON a => a -> [Text] -> [Example]
examples (Int -> OrdinalData
OrdinalData Int
20)
[ Text
"ഇരുപതാം"
, Text
"20."
]
, OrdinalData -> [Text] -> [Example]
forall a. ToJSON a => a -> [Text] -> [Example]
examples (Int -> OrdinalData
OrdinalData Int
22)
[ Text
"ഇരുപത്തിരണ്ടാം"
, Text
"22."
]
, OrdinalData -> [Text] -> [Example]
forall a. ToJSON a => a -> [Text] -> [Example]
examples (Int -> OrdinalData
OrdinalData Int
26)
[ Text
"ഇരുപത്തിആറാം"
, Text
"26."
]
, OrdinalData -> [Text] -> [Example]
forall a. ToJSON a => a -> [Text] -> [Example]
examples (Int -> OrdinalData
OrdinalData Int
30)
[ Text
"മുപ്പത്തഞ്ചാം"
, Text
"30."
]
, OrdinalData -> [Text] -> [Example]
forall a. ToJSON a => a -> [Text] -> [Example]
examples (Int -> OrdinalData
OrdinalData Int
33)
[ Text
"മുപ്പത്തിമൂന്നാം"
, Text
"33."
]
, OrdinalData -> [Text] -> [Example]
forall a. ToJSON a => a -> [Text] -> [Example]
examples (Int -> OrdinalData
OrdinalData Int
50)
[ Text
"അമ്പതാം"
, Text
"50."
]
, OrdinalData -> [Text] -> [Example]
forall a. ToJSON a => a -> [Text] -> [Example]
examples (Int -> OrdinalData
OrdinalData Int
54)
[ Text
"അമ്പത്തിനാലാം"
, Text
"54."
]
, OrdinalData -> [Text] -> [Example]
forall a. ToJSON a => a -> [Text] -> [Example]
examples (Int -> OrdinalData
OrdinalData Int
65)
[ Text
"അറുപത്തിഅഞ്ചാം"
, Text
"65."
]
, OrdinalData -> [Text] -> [Example]
forall a. ToJSON a => a -> [Text] -> [Example]
examples (Int -> OrdinalData
OrdinalData Int
76)
[ Text
"എഴുപത്തിആറാം"
, Text
"76."
]
, OrdinalData -> [Text] -> [Example]
forall a. ToJSON a => a -> [Text] -> [Example]
examples (Int -> OrdinalData
OrdinalData Int
87)
[ Text
"എൺപത്തിഏഴാം"
, Text
"87."
]
]