1 files changed, 20 insertions, 0 deletions
diff --git a/deprecated/old-lib/resource/italian/PhonoIta.gf b/deprecated/old-lib/resource/italian/PhonoIta.gf
new file mode 100644
index 000000000..f725aef68
--- /dev/null
+++ b/deprecated/old-lib/resource/italian/PhonoIta.gf
@@ -0,0 +1,20 @@
+resource PhonoIta = open Prelude in {
+
+--3 Elision
+--
+-- The phonological rule of *elision* can be defined as follows in GF.
+-- In Italian it includes both vowels and the *impure 's'*.
+
+oper 
+  vocale : Strs = strs {
+    "a" ; "e" ; "h" ; "i" ; "o" ; "u" ; "è" ; "y"
+    } ;
+
+  sImpuro : Strs = strs {
+    "z" ; "sb" ; "sc" ; "sd" ; "sf" ; "sm" ; "sp" ; "sq" ; "sr" ; "st" ; "sv"
+    } ;
+
+  elision : (_,_,_ : Str) -> Str = \il, l', lo -> 
+    pre {il ; l' / vocale ; lo / sImpuro} ;
+
+}