forked from GitHub/gf-core
First (public) version of PhrasebookLav
Tested on Actions: - Temp: AHasName, ALike. - ToDo: AHasAge, AHasChildren, AHasRoom, AHasTable. - FixMe (in the resource grammar): + YouPolMale/YouPolFemale agreement (AHungry, AIll, AMarried, AReady, AScared, AThirsty, ATired); + Missing commas in multiple ObjAndObj constructions (AWant); + Use (the currently missing) Irreg_Give (AWantGo).
This commit is contained in:
33
examples/phrasebook/SentencesLav.gf
Normal file
33
examples/phrasebook/SentencesLav.gf
Normal file
@@ -0,0 +1,33 @@
|
||||
concrete SentencesLav of Sentences = NumeralLav ** SentencesI - [
|
||||
NameNN,
|
||||
IFemale,
|
||||
YouFamFemale,
|
||||
YouPolFemale,
|
||||
WeFemale,
|
||||
YouPlurFamFemale,
|
||||
YouPlurPolFemale,
|
||||
TheyFemale
|
||||
]
|
||||
with
|
||||
(Syntax = SyntaxLav),
|
||||
(Symbolic = SymbolicLav),
|
||||
(Lexicon = LexiconLav) **
|
||||
open
|
||||
Prelude,
|
||||
SyntaxLav,
|
||||
(P = ParadigmsLav),
|
||||
ExtraLav
|
||||
in {
|
||||
lin
|
||||
NameNN = mkNP (P.mkN "NN") ;
|
||||
|
||||
IFemale = mkPerson i8fem_Pron ;
|
||||
YouFamFemale = mkPerson youSg8fem_Pron ;
|
||||
YouPolFemale = mkPerson youPol8fem_Pron ;
|
||||
WeFemale = mkPerson we8fem_Pron ;
|
||||
YouPlurFamFemale, YouPlurPolFemale = mkPerson youPl8fem_Pron ;
|
||||
TheyFemale = mkPerson they8fem_Pron ;
|
||||
|
||||
--AHaveCurr p curr = mkCl p.name have_V2 (mkNP aPl_Det curr) ;
|
||||
--AHaveCurr p curr = mkCl (mkVP have_V3 (mkNP aPl_Det curr) p.name) ;
|
||||
}
|
||||
Reference in New Issue
Block a user