next-lib/src/catalan/PhonoCat.gf


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
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" ; "" ; "Ž" ; "o" ; "˜" ; "—" ;
	"i" ; "’" ; "•" ; "u" ; "œ" ; "Ÿ" ;  "h" 
	} ;
  
  vocalForta : Strs = strs {
	"a" ; "ˆ" ; "ha" ; "hˆ" ;
	"e" ; "" ; "Ž" ; "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" } } ;

}