mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-23 19:42:50 -06:00
change Food to Words in Phrasebook, since it's unpractical to have many small modules; added syntactic forms and words
This commit is contained in:
@@ -2,7 +2,7 @@
|
||||
|
||||
concrete PhrasebookFre of Phrasebook =
|
||||
GreetingsFre,
|
||||
FoodFre
|
||||
WordsFre
|
||||
** open
|
||||
(R = Roles),
|
||||
SyntaxFre,
|
||||
@@ -11,13 +11,14 @@ concrete PhrasebookFre of Phrasebook =
|
||||
Prelude in {
|
||||
|
||||
lincat
|
||||
Phrase = Utt ;
|
||||
Phrase = Text ;
|
||||
Gender = {s : Str ; g : R.Gender} ;
|
||||
Politeness = {s : Str ; p : R.Politeness} ;
|
||||
|
||||
lin
|
||||
PNumeral n = mkPhrase ((mkCard <n : Numeral>).s ! masculine) ; ----
|
||||
PSentence s = s ;
|
||||
PSentence s = mkText s ;
|
||||
PQuestion s = mkText s ;
|
||||
|
||||
PGreeting g = mkPhrase (g.s ! R.Polite ! R.Male ! R.Male) ;
|
||||
---- PGreeting p s h g = mkPhrase (g.s ! p.p ! s.g ! h.g ++ p.s ++ s.s ++ h.s) ;
|
||||
|
||||
Reference in New Issue
Block a user