forked from GitHub/gf-core
29 lines
766 B
Plaintext
29 lines
766 B
Plaintext
resource PhonoRon = open Prelude in {
|
|
|
|
flags coding=utf8 ;
|
|
|
|
oper
|
|
voyelle : Strs = strs {
|
|
"a" ; "?" ; "?" ; "e" ; "?" ; "?" ; "??" ;
|
|
"h" ;
|
|
"i" ; "?" ; "o" ; "?" ; "u" ; "?" ; "y"
|
|
} ;
|
|
|
|
elision : Str -> Str = \d -> d + pre {"e" ; "'" / voyelle} ;
|
|
|
|
-- The following morphemes are the most common uses of elision.
|
|
|
|
elisDe = elision "d" ;
|
|
elisLa = pre {"la" ; "l'" / voyelle} ;
|
|
elisLe = elision "l" ;
|
|
elisNe = elision "n" ;
|
|
elisQue = elision "qu" ;
|
|
|
|
-- The subjunction "si" has a special kind of elision. The rule is
|
|
-- only approximatively correct, for "si" is not really elided before
|
|
-- the string "il" in general, but before the pronouns "il" and "ils".
|
|
|
|
elisSi = pre {"si" ; "s'" / strs {"il"}} ;
|
|
|
|
}
|