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

more accurate treatment of negative "have" clauses in Phrasebook

Browse Source
This commit is contained in:
aarne
2010-05-29 09:18:20 +00:00
parent 0c32ae12a3
commit 79e864c91b
6 changed files with 40 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
examples/phrasebook/SentencesFre.gf
View File

@@ -2,13 +2,14 @@ concrete SentencesFre of Sentences = NumeralFre ** SentencesI - [
QProp,
IFemale, YouFamFemale, YouPolFemale,
PYesToNo,
SHaveNo,SHaveNoMass,
Superlative
]
with
(Syntax = SyntaxFre),
(Symbolic = SymbolicFre),
(Lexicon = LexiconFre) **
open SyntaxFre, ExtraFre, Prelude in {
open SyntaxFre, ExtraFre, (P = ParadigmsFre), Prelude in {
lincat
Superlative = {s : Ord ; isPre : Bool} ;
@@ -23,4 +24,11 @@ concrete SentencesFre of Sentences = NumeralFre ** SentencesI - [
{name = mkNP youPol8fem_Pron ; isPron = True ; poss = mkQuant youPol_Pron};
PYesToNo = mkPhrase (lin Utt (ss "si")) ;
SHaveNo p k = mkS negativePol (mkCl p.name have_de (mkNP aPl_Det k)) ;
SHaveNoMass p k = mkS negativePol (mkCl p.name (ComplCN have_de k)) ;
oper
have_de : V2 = P.mkV2 (P.mkV have_V2) P.genitive ;
}