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

Italian "quello" corrected

Browse Source
This commit is contained in:
aarne
2008-10-01 12:11:29 +00:00
parent c2d41e70be
commit 8fbdf3e57c
3 changed files with 11 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
examples/tutorial/syntax/GrammarIta.gf
View File

@@ -66,9 +66,9 @@ concrete GrammarIta of Grammar = open Prelude, MorphoIta in {
UseV v = {s = \\b,_,n => posneg b ++ v.s ! n} ;
this_Det = mkDet Sg (regAdjective "questo") ;
that_Det = mkDet Sg (regAdjective "quello") ;
that_Det = mkDet Sg quello ;
these_Det = mkDet Pl (regAdjective "questo") ;
those_Det = mkDet Pl (regAdjective "quello") ;
those_Det = mkDet Pl quello ;
every_Det = {s = \\_ => "ogni" ; n = Sg} ;
theSg_Det = {s = artDef Sg ; n = Sg} ;
thePl_Det = {s = artDef Pl ; n = Pl} ;
@@ -125,6 +125,12 @@ concrete GrammarIta of Grammar = open Prelude, MorphoIta in {
_ => h
} ;
quello : Adjective =
let
quel = pre {"quel" ; "quello" / sImpuro ; "quell'" / vowel} ;
quei = pre {"quei" ; "quegli" / sImpuro ; "quegli" / vowel} ;
in mkAdjective quel "quella" quei "quelle" ;
sImpuro : Strs = strs {"sb" ; "sp" ; "sy" ; "z"} ;
vowel : Strs = strs {"a" ; "e" ; "i" ; "o" ; "u"} ;