Safe Haskell | Safe |
---|---|
Language | Haskell2010 |
Simple English clause creation parameterized by individual words.
Synopsis
- data Part
- = String !String
- | Text !Text
- | Cardinal !Int
- | Car !Int
- | Ws !Part
- | CardinalAWs !Int !Part
- | CardinalWs !Int !Part
- | CarAWs !Int !Part
- | CarWs !Int !Part
- | Car1Ws !Int !Part
- | Ordinal !Int
- | Ord !Int
- | AW !Part
- | WWandW ![Part]
- | WWxW !Part ![Part]
- | Wown !Part
- | WownW !Part !Part
- | Append !Part !Part
- | Phrase ![Part]
- | Capitalize !Part
- | SubjectVerb !Person !Polarity !Part !Part
- | SubjectVerbSg !Part !Part
- | SubjectVVxV !Part !Person !Polarity !Part ![Part]
- | SubjectVVandVSg !Part ![Part]
- data Person
- data Polarity
- data Irregular = Irregular {}
- makeSentence :: Irregular -> [Part] -> Text
- makePhrase :: Irregular -> [Part] -> Text
- defIrregular :: Irregular
- (<+>) :: Text -> Text -> Text
Documentation
Various basic and compound parts of English simple present tense clauses. Many of the possible nestings do not make sense. We don't care.
String !String | handle for a |
Text !Text | handle for a |
Cardinal !Int | cardinal number, spelled in full up to 10 |
Car !Int | cardinal number, not spelled |
Ws !Part | plural form of a phrase |
CardinalAWs !Int !Part | plural prefixed with a cardinal, spelled, with "a" for 1 and "no" for 0 |
CardinalWs !Int !Part | plural prefixed with a cardinal, spelled |
CarAWs !Int !Part | plural prefixed with a cardinal, not spelled, with "a" for 1 and "no" for 0 |
CarWs !Int !Part | plural prefixed with a cardinal, not spelled; |
Car1Ws !Int !Part | plural prefixed with a cardinal, not spelled; no prefix at all for 1 |
Ordinal !Int | ordinal number, spelled in full up to 10 |
Ord !Int | ordinal number, not spelled |
AW !Part | phrase with indefinite article |
WWandW ![Part] | enumeration |
WWxW !Part ![Part] | collection |
Wown !Part | non-premodifying possesive |
WownW !Part !Part | attributive possesive |
Append !Part !Part | no space in between; one can also just use |
Phrase ![Part] | space-separated sequence |
Capitalize !Part | make the first letter into a capital letter |
SubjectVerb !Person !Polarity !Part !Part | conjugation according to polarity, with a default person (pronouns override it) |
SubjectVerbSg !Part !Part | a shorthand for |
SubjectVVxV !Part !Person !Polarity !Part ![Part] | conjugation of all verbs according to polarity, with a default person (pronouns override it) |
SubjectVVandVSg !Part ![Part] | a shorthand for "and", |
Instances
Persons: singular 1st, singular 3rd and the rest.
Generalized polarity: affirmative, negative, interrogative.
Nouns with irregular plural form and nouns with irregular indefinite article.
makeSentence :: Irregular -> [Part] -> Text Source #
Realise a complete sentence, capitalized, ending with a dot.
makePhrase :: Irregular -> [Part] -> Text Source #
Realise a phrase. The spacing between parts resembles
the semantics of (<+>)
, that is, it ignores empty words.
defIrregular :: Irregular Source #
Default set of words with irregular forms.