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

Phrase.UttCN added and implemented for Eng,Fre,Ger

Browse Source
This commit is contained in:
aarne
2009-12-17 21:54:11 +00:00
parent 5c9ac3655e
commit 8d5f97866d
4 changed files with 4 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
lib/src/abstract/Phrase.gf
View File

@@ -28,6 +28,7 @@ abstract Phrase = Cat ** {
UttNP : NP -> Utt ; -- this man UttNP : NP -> Utt ; -- this man
UttAdv : Adv -> Utt ; -- here UttAdv : Adv -> Utt ; -- here
UttVP : VP -> Utt ; -- to sleep UttVP : VP -> Utt ; -- to sleep
UttCN : CN -> Utt ; -- house
-- The phrasal conjunction is optional. A sentence conjunction -- The phrasal conjunction is optional. A sentence conjunction
-- can also used to prefix an utterance. -- can also used to prefix an utterance.

1
lib/src/english/PhraseEng.gf
View File

@@ -14,6 +14,7 @@ concrete PhraseEng of Phrase = CatEng ** open Prelude, ResEng in {
UttNP np = {s = np.s ! Nom} ; UttNP np = {s = np.s ! Nom} ;
UttVP vp = {s = infVP False vp (agrP3 Sg)} ; UttVP vp = {s = infVP False vp (agrP3 Sg)} ;
UttAdv adv = adv ; UttAdv adv = adv ;
UttCN n = {s = n.s ! Sg ! Nom} ;
NoPConj = {s = []} ; NoPConj = {s = []} ;
PConjConj conj = {s = conj.s2} ; --- PConjConj conj = {s = conj.s2} ; ---

2
lib/src/german/PhraseGer.gf
View File

@@ -16,7 +16,7 @@ concrete PhraseGer of Phrase = CatGer ** open Prelude, ResGer in {
UttNP np = {s = np.s ! Nom} ; UttNP np = {s = np.s ! Nom} ;
UttVP vp = {s = useInfVP True vp} ; -- without zu UttVP vp = {s = useInfVP True vp} ; -- without zu
UttAdv adv = adv ; UttAdv adv = adv ;
UttCN n = {s = n.s ! Strong ! Sg ! Nom} ;
NoPConj = {s = []} ; NoPConj = {s = []} ;
PConjConj conj = ss (conj.s2) ; PConjConj conj = ss (conj.s2) ;

1
lib/src/romance/PhraseRomance.gf
View File

@@ -17,6 +17,7 @@ incomplete concrete PhraseRomance of Phrase =
UttNP np = {s = (np.s ! Nom).ton} ; UttNP np = {s = (np.s ! Nom).ton} ;
UttVP vp = {s = infVP vp (agrP3 Fem Sg)} ; --- Agr UttVP vp = {s = infVP vp (agrP3 Fem Sg)} ; --- Agr
UttAdv adv = adv ; UttAdv adv = adv ;
UttCN n = {s = n.s ! Sg} ;
NoPConj = {s = []} ; NoPConj = {s = []} ;
PConjConj conj = {s = conj.s2} ; PConjConj conj = {s = conj.s2} ;