non ho birra in Italian phrasebook

This commit is contained in:
aarne
2010-05-29 10:38:12 +00:00
parent e9ec8c69aa
commit 8b3dcb53a9

View File

@@ -1,6 +1,6 @@
concrete SentencesIta of Sentences = NumeralIta ** SentencesI - [
IFemale, YouFamFemale, YouPolFemale, IMale, YouFamMale, YouPolMale,
mkPerson, Superlative
mkPerson, Superlative, SHaveNoMass
]
with
(Syntax = SyntaxIta),
@@ -26,6 +26,8 @@ concrete SentencesIta of Sentences = NumeralIta ** SentencesI - [
YouPolMale =
{name = mkNP (ProDrop youPol_Pron) ; isPron = True ; poss = PossFamQuant youPol_Pron} ;
SHaveNoMass p k = mkS negativePol (mkCl p.name (ComplCN have_V2 k)) ;
oper
CNPlace : Type = {name : CN ; at : Prep ; to : Prep } ;
@@ -46,6 +48,7 @@ concrete SentencesIta of Sentences = NumeralIta ** SentencesI - [
mkPerson : Pron -> {name : NP ; isPron : Bool ; poss : Quant} = \p ->
{name = mkNP p ; isPron = True ; poss = PossFamQuant p} ;
}