msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

genitive s in Nor possessives ; some Nor words in Phrasebook

Browse Source
This commit is contained in:
aarne
2010-05-28 12:25:26 +00:00
parent f9f2491fcc
commit b23640c769
6 changed files with 24 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
examples/phrasebook/SentencesDan.gf
View File

@@ -1,4 +1,8 @@
concrete SentencesDan of Sentences = NumeralDan ** SentencesI with concrete SentencesDan of Sentences = NumeralDan ** SentencesI - [NameNN] with
(Syntax = SyntaxDan), (Syntax = SyntaxDan),
(Symbolic = SymbolicDan), (Symbolic = SymbolicDan),
(Lexicon = LexiconDan) ; (Lexicon = LexiconDan) ** open Prelude, SyntaxDan, (P = ParadigmsDan) in {
lin NameNN = mkNP (P.mkPN "NN") ;
}

10
examples/phrasebook/SentencesNor.gf
View File

@@ -1,4 +1,10 @@
concrete SentencesNor of Sentences = NumeralNor ** SentencesI with concrete SentencesNor of Sentences = NumeralNor ** SentencesI - [NameNN] with
(Syntax = SyntaxNor), (Syntax = SyntaxNor),
(Symbolic = SymbolicNor), (Symbolic = SymbolicNor),
(Lexicon = LexiconNor) ; (Lexicon = LexiconNor) ** open SyntaxNor, (P = ParadigmsNor) in
{
lin NameNN = mkNP (P.mkPN "NN") ;
}

5
examples/phrasebook/SentencesSwe.gf
View File

@@ -1,8 +1,9 @@
concrete SentencesSwe of Sentences = NumeralSwe ** SentencesI - [PYesToNo] with concrete SentencesSwe of Sentences = NumeralSwe ** SentencesI - [PYesToNo,NameNN] with
(Syntax = SyntaxSwe), (Syntax = SyntaxSwe),
(Symbolic = SymbolicSwe), (Symbolic = SymbolicSwe),
(Lexicon = LexiconSwe) ** open Prelude in { (Lexicon = LexiconSwe) ** open Prelude, SyntaxSwe, (P = ParadigmsSwe) in {
lin PYesToNo = mkPhrase (lin Utt (ss "jo")) ; lin PYesToNo = mkPhrase (lin Utt (ss "jo")) ;
lin NameNN = mkNP (P.mkPN "NN") ;
} }

2
examples/phrasebook/WordsDan.gf
View File

@@ -133,7 +133,7 @@ concrete WordsDan of Words = SentencesDan **
AHasTable p num = mkCl p.name have_V2 AHasTable p num = mkCl p.name have_V2
(mkNP (mkNP a_Det (mkN "bord")) (mkNP (mkNP a_Det (mkN "bord"))
(SyntaxDan.mkAdv to_Prep (mkNP num (mkN "person" "personen" "personer" "personerne")))) ; (SyntaxDan.mkAdv to_Prep (mkNP num (mkN "person" "personen" "personer" "personerne")))) ;
AHungry p = mkCl p.name (mkA "sulten") ; AHungry p = mkCl p.name (mkA "sulten" "sultet" "sultne") ;
AIll p = mkCl p.name (mkA "syg") ; AIll p = mkCl p.name (mkA "syg") ;
AKnow p = mkCl p.name vide_V ; AKnow p = mkCl p.name vide_V ;
ALike p item = mkCl p.name (mkV2 holde_V (mkPrep "af")) item ; ALike p item = mkCl p.name (mkV2 holde_V (mkPrep "af")) item ;

10
examples/phrasebook/WordsNor.gf
View File

@@ -32,7 +32,7 @@ concrete WordsNor of Words = SentencesNor **
Expensive = mkA "dyr" ; Expensive = mkA "dyr" ;
Fresh = mkA "fersk" ; Fresh = mkA "fersk" ;
Good = L.good_A ; Good = L.good_A ;
Suspect = mkA "suspekt" ; Suspect = mkA "suspekt" "suspekt" ;
Warm = L.warm_A ; Warm = L.warm_A ;
-- places -- places
@@ -131,9 +131,9 @@ concrete WordsNor of Words = SentencesNor **
(mkNP (mkNP a_Det (mkN "rom" "rommet" "rommene" "romma")) (mkNP (mkNP a_Det (mkN "rom" "rommet" "rommene" "romma"))
(SyntaxNor.mkAdv for_Prep (mkNP num (mkN "person" "personen" "personer" "personene")))) ; (SyntaxNor.mkAdv for_Prep (mkNP num (mkN "person" "personen" "personer" "personene")))) ;
AHasTable p num = mkCl p.name have_V2 AHasTable p num = mkCl p.name have_V2
(mkNP (mkNP a_Det (mkN "tabel" "tabellen" "tabeller" "tabellene")) (mkNP (mkNP a_Det (mkN "bord" "bordet" "bord" "borda"))
(SyntaxNor.mkAdv for_Prep (mkNP num (mkN "person" "personen" "personer" "personene")))) ; (SyntaxNor.mkAdv for_Prep (mkNP num (mkN "person" "personen" "personer" "personene")))) ;
AHungry p = mkCl p.name (mkA "sulten") ; AHungry p = mkCl p.name (mkA "sulten" "sultet" "sultne") ;
AIll p = mkCl p.name (mkA "syk") ; AIll p = mkCl p.name (mkA "syk") ;
AKnow p = mkCl p.name vite_V ; AKnow p = mkCl p.name vite_V ;
ALike p item = mkCl p.name (dirV2 (mk2V "like" "likte")) item ; ALike p item = mkCl p.name (dirV2 (mk2V "like" "likte")) item ;
@@ -143,7 +143,7 @@ concrete WordsNor of Words = SentencesNor **
AReady p = mkCl p.name (mkA "klar") ; AReady p = mkCl p.name (mkA "klar") ;
AScared p = mkCl p.name (mkA "redd") ; AScared p = mkCl p.name (mkA "redd") ;
ASpeak p lang = mkCl p.name (dirV2 (regV "snakke")) lang ; ASpeak p lang = mkCl p.name (dirV2 (regV "snakke")) lang ;
AThirsty p = mkCl p.name (mkA "tørst") ; AThirsty p = mkCl p.name (mkA "tørstig") ;
ATired p = mkCl p.name (mkA "sliten") ; ATired p = mkCl p.name (mkA "sliten") ;
AUnderstand p = mkCl p.name (irregV "forstå" "forstod" "forstått") ; AUnderstand p = mkCl p.name (irregV "forstå" "forstod" "forstått") ;
AWant p obj = mkCl p.name want_VV (mkVP have_V2 obj) ; AWant p obj = mkCl p.name want_VV (mkVP have_V2 obj) ;
@@ -251,7 +251,7 @@ concrete WordsNor of Words = SentencesNor **
mkTransport : N -> {name : CN ; by : Adv} = \n -> { mkTransport : N -> {name : CN ; by : Adv} = \n -> {
name = mkCN n ; name = mkCN n ;
by = SyntaxNor.mkAdv by8means_Prep (mkNP n) by = SyntaxNor.mkAdv by8means_Prep (mkNP the_Det n)
} ; } ;
far_IAdv = ExtraNor.IAdvAdv (ParadigmsNor.mkAdv "langt") ; far_IAdv = ExtraNor.IAdvAdv (ParadigmsNor.mkAdv "langt") ;

2
examples/phrasebook/WordsSwe.gf
View File

@@ -108,7 +108,7 @@ concrete WordsSwe of Words = SentencesSwe **
Car = mkTransport L.car_N ; Car = mkTransport L.car_N ;
Ferry = mkTransport (mkN "färja") ; Ferry = mkTransport (mkN "färja") ;
Plane = mkTransport L.airplane_N ; Plane = mkTransport L.airplane_N ;
Subway = mkTransport (mkN "metro" "metron" "metro" "metrona") ; ---- Subway = mkTransport (mkN "tunnelbana") ;
Taxi = mkTransport (mkN "taxi" "taxin" "taxibilar" "taxibilarna") ; ---- Taxi = mkTransport (mkN "taxi" "taxin" "taxibilar" "taxibilarna") ; ----
Train = mkTransport L.train_N ; Train = mkTransport L.train_N ;
Tram = mkTransport (mkN "spårvagn") ; Tram = mkTransport (mkN "spårvagn") ;