From 76ba03b545600054176612201de78dca16eb65e1 Mon Sep 17 00:00:00 2001
From: aarne <aarne@chalmers.se>
Date: Mon, 22 Nov 2010 12:55:37 +0000
Subject: started a subdir for the book

---
 book/examples/chapter9/Anaphora.gf | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)
 create mode 100644 book/examples/chapter9/Anaphora.gf

(limited to 'book/examples/chapter9/Anaphora.gf')

diff --git a/book/examples/chapter9/Anaphora.gf b/book/examples/chapter9/Anaphora.gf
new file mode 100644
index 000000000..5cbb92c94
--- /dev/null
+++ b/book/examples/chapter9/Anaphora.gf
@@ -0,0 +1,17 @@
+abstract Anaphora = TestSemantics - [she_NP] ** {
+
+cat
+  Proof Prop ;
+
+fun
+  IfS : (A : S) -> (Proof (iS A) -> S) -> S ;
+
+  AnaNP : (A : CN) -> (a : Ind) -> Proof (iCN A a) -> NP ;
+
+  pe : (B : Ind -> Prop) -> Proof (Exist B) -> Ind ;
+  qe : (B : Ind -> Prop) -> (c : Proof (Exist B)) -> Proof (B (pe B c)) ;
+
+  pc : (A,B : Prop) -> Proof (And A B) -> Proof A ;
+  qc : (A,B : Prop) -> Proof (And A B) -> Proof B ;
+
+}
-- 
cgit v1.2.3