1 files changed, 17 insertions, 0 deletions
diff --git a/gf-book/examples/chapter9/AnaphoraIta.gf b/gf-book/examples/chapter9/AnaphoraIta.gf
new file mode 100644
index 000000000..288872160
--- /dev/null
+++ b/gf-book/examples/chapter9/AnaphoraIta.gf
@@ -0,0 +1,17 @@
+concrete AnaphoraIta of Anaphora = TestSemanticsIta - [she_NP] ** 
+  open ResIta, Prelude, Formal in {
+
+lincat
+  Proof = {} ;
+
+lin
+  IfS A B = {s = "se" ++ A.s ++ B.s} ;
+
+  AnaNP cn _ _ = case cn.g of {
+    Masc => pronNP "lui" "lo" "gli" Masc  Sg Per3 ;
+    Fem  => pronNP "lei" "la" "le" Fem  Sg Per3
+    } ;
+
+  pe _ _ = constant [] ; ----
+
+}