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

1 files changed, 41 insertions, 0 deletions

diff --git a/old-lib/resource/catalan/PhonoCat.gf b/old-lib/resource/catalan/PhonoCat.gf
new file mode 100644
index 000000000..f750aeb01
--- /dev/null
+++ b/old-lib/resource/catalan/PhonoCat.gf
@@ -0,0 +1,41 @@
+--# -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 } ;
+elisEs = pre {
+			pre { "es" ; "s'" / vocal} ;
+			"se" / strs { "s" } } ;
+
+}