GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-09 04:59:31 -06:00
Code Issues Packages Projects Releases Wiki Activity

FixedRon

Browse Source
This commit is contained in:
ramona.enache
2010-04-25 00:47:15 +00:00
parent fd0f602b48
commit ca6075ab77
3 changed files with 33 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
contrib/summerschool/foods/FoodsRon.gf
View File

@@ -15,9 +15,9 @@ Item = {s : Str ; n : Number; g : Gender};
lin
This = det Sg (mkTab "acest" "aceastã");
This = det Sg (mkTab "acest" "această");
That = det Sg (mkTab "acel" "acea");
These = det Pl (mkTab "aceºti" "aceste");
These = det Pl (mkTab "acești" "aceste");
Those = det Pl (mkTab "acei" "acele");
Wine = mkNoun "vin" "vinuri" NNeut ;

31
examples/phrasebook/SentencesRon.gf
View File

@@ -1,4 +1,27 @@
concrete SentencesRon of Sentences = NumeralRon ** SentencesI with
(Syntax = SyntaxRon),
(Symbolic = SymbolicRon),
(Lexicon = LexiconRon) ;
concrete SentencesRon of Sentences = NumeralRon ** SentencesI - [
IFemale, YouFamFemale, YouPolFemale, IMale, YouFamMale, YouPolMale
]
with
(Syntax = SyntaxRon),
(Symbolic = SymbolicRon),
(Lexicon = LexiconRon) **
open SyntaxRon, ExtraRon in {
lin
IFemale =
{name = mkNP i8fem_Pron ; isPron = True ; poss = mkQuant i_Pron} ;
YouFamFemale =
{name = mkNP youSg8fem_Pron ; isPron = True ; poss = mkQuant youSg_Pron} ;
YouPolFemale =
{name = mkNP youPol8fem_Pron ; isPron = True ; poss = mkQuant youPol_Pron};
IMale =
{name = mkNP i_Pron ; isPron = True ; poss = mkQuant i_Pron} ;
YouFamMale =
{name = mkNP youSg_Pron ; isPron = True ; poss = mkQuant youSg_Pron} ;
YouPolMale =
{name = mkNP youPol_Pron ; isPron = True ; poss = mkQuant youPol_Pron} ;
}

11
examples/phrasebook/WordsRon.gf
View File

@@ -1,7 +1,7 @@
-- (c) 2009 Ramona Enache under LGPL
concrete WordsRon of Words = SentencesRon ** open
SyntaxRon,
SyntaxRon, ResRon,
(P = ParadigmsRon),
(L = LexiconRon),
BeschRon,
@@ -89,7 +89,7 @@ concrete WordsRon of Words = SentencesRon ** open
AHasTable p num = mkCl p.name have_V2
(mkNP (mkNP a_Det (P.mkN "masa" "mese")) (SyntaxRon.mkAdv for_Prep (mkNP num (P.mkN "persoană")))) ;
AHasName p name = mkCl p.name (P.dirV2 (mkRVAcc (v_besch119 "numi"))) name ;
AHungry p = DatSubjCl p.name (mkVP (mkCN (P.mkN "foame"))) ;
AHungry p = DatSubjCl p.name (mkVP (mkNP (P.mkN "foame"))) ;
AIll p = mkCl p.name (P.mkA "bolnav") ;
AKnow p = mkCl p.name (v_besch122 "şti") ;
ALike p item = mkCl p.name (P.dirV2 (v_besch71 "plăcea")) item ;
@@ -100,7 +100,7 @@ concrete WordsRon of Words = SentencesRon ** open
AReady p = mkCl p.name (P.mkA "gata" "gata" "gata" "gata") ;
AScared p = mkCl p.name (P.mkA "speriat") ;
ASpeak p lang = mkCl p.name (P.dirV2 (P.mkV "vorbi")) lang ;
AThirsty p = DatSubjCl p.name (mkVP (mkCN (P.mkN "sete"))) ;
AThirsty p = DatSubjCl p.name (mkVP (mkNP (P.mkN "sete"))) ;
ATired p = mkCl p.name (P.mkA "obosit") ;
AUnderstand p = mkCl p.name (v_besch83 "înţelege") ;
AWant p obj = mkCl p.name (P.dirV2 (v_besch74 "vrea")) obj ;
@@ -138,7 +138,7 @@ concrete WordsRon of Words = SentencesRon ** open
Son = xOf sing (P.mkN "fiu") ;
Daughter = xOf sing (P.mkN "fiică") ;
Children = xOf plur L.child_N ;
-- week days
Monday = mkDay "luni" ;
@@ -166,9 +166,6 @@ open_A : A = P.mkA "deschis" ;
ad = {s = d} in
mkNPDay day ad ad; ---- difference is enforced by additional constructions
-- mkPlace : N -> Prep -> {name : CN ; at : Prep ; to : Prep} = \p,i ->
-- mkCNPlace (mkCN p) i P.dative ;
xOf : GNumber -> N -> NPPerson -> NPPerson = \n,x,p -> mkRelative n (mkCN x) p ;