1
0
forked from GitHub/gf-core

next-lib renamed to lib, lib to old-lib

This commit is contained in:
aarne
2009-06-22 15:39:08 +00:00
parent 90bd07b1cf
commit 2116f41bc2
1433 changed files with 8 additions and 8 deletions

View File

@@ -0,0 +1,49 @@
--# -path=../common:prelude
resource PhonoCat = open Prelude in {
--3 Elision
--
-- The phonological rule of *elision* can be defined as follows in GF.
-- In Catalan it includes both vowels and 'h'.
---TODO: L'elisi— depŽn de la tonicitat.
oper
vocal : Strs = strs {
"a" ; "ˆ" ;
"e" ; "<22>" ; "Ž" ; "o" ; "˜" ; "—" ;
"i" ; "" ; "•" ; "u" ; "œ" ; "Ÿ" ; "h"
} ;
vocalForta : Strs = strs {
"a" ; "ˆ" ; "ha" ; "hˆ" ;
"e" ; "<22>" ; "Ž" ; "he" ; "h<>" ; "hŽ" ;
"o" ; "˜" ; "—" ; "ho" ; "h˜" ; "h—" ;
"" ; "œ" ; "h" ; "hœ" ;
} ;
vocalFeble : Strs = strs {
"i" ; "•" ; "u" ; "Ÿ" ;
"hi" ; "h•" ; "hu" ; "hŸ" ;
} ;
elisDe = pre { "de" ; "d'" / vocal };
elisEl = pre { "el" ; "l'" / vocal } ;
elisLa = pre { "la" ; "l'" / vocalForta } ;
elisEm = pre { "em" ; "m'" / vocal } ;
elisEt = pre { "et" ; "t'" / vocal } ;
-- AR after pre syntax change 25/5/2009
elisEs = pre {
vocal => "s'" ;
"s" => "se" ;
_ => "es"
} ;
--elisEs = pre {
-- pre { "es" ; "s'" / vocal} ;
-- "se" / strs { "s" } } ;
}