From 73e401cee21fa61dcf9900d8d2b40ddd39f4e612 Mon Sep 17 00:00:00 2001
From: aarne <aarne@cs.chalmers.se>
Date: Fri, 27 Jun 2008 11:59:03 +0000
Subject: updated synopsis, removed GF/devel/

---
 devel/koe/Koe.gf    | 14 --------------
 devel/koe/KoeFre.gf | 50 --------------------------------------------------
 2 files changed, 64 deletions(-)
 delete mode 100644 devel/koe/Koe.gf
 delete mode 100644 devel/koe/KoeFre.gf

(limited to 'devel/koe')

diff --git a/devel/koe/Koe.gf b/devel/koe/Koe.gf
deleted file mode 100644
index beff21b44..000000000
--- a/devel/koe/Koe.gf
+++ /dev/null
@@ -1,14 +0,0 @@
-abstract Koe = {
-
-flags startcat = S ;
-
-cat S ; NP ; VP ;
-
-fun
-  Pred : NP -> VP -> S ;
-
-  Je, Tu, Il, Elle, Nous, Vous, Ils, Elles : NP ;
-
-  Strong : VP ;
-
-}
diff --git a/devel/koe/KoeFre.gf b/devel/koe/KoeFre.gf
deleted file mode 100644
index cf0b31f2d..000000000
--- a/devel/koe/KoeFre.gf
+++ /dev/null
@@ -1,50 +0,0 @@
-concrete KoeFre of Koe = {
-
-flags coding=utf8 ;
-
-param 
-  Gen = Masc | Fem ;
-  Num = Sg | Pl ;
-  Per = P1 | P2 | P3 ;
-
-oper 
-  Agr : Type = {g : Gen ; n : Num ; p : Per} ;
-
-  predA : Str -> {s : Agr => Str} = \adj -> 
-    {s = \\a => copula a.n a.p ++ regA adj a.g a.n} ;
-
-  copula : Num -> Per -> Str = \n,p -> case <n,p> of {
-    <Sg,P1> => "suis" ;
-    <Sg,P2> => "es" ;
-    <Sg,P3> => "est" ;
-    <Pl,P1> => "sommes" ;
-    <Pl,P2> => "êtes" ;
-    <Pl,P3> => "sont"
-  } ;
-
-  regA : Str -> Gen -> Num -> Str = \s,g,n -> case <g,n> of {
-    <Masc,Sg> => s ;
-    <Masc,Pl> => s + "s" ;
-    <Fem,Sg>  => s + "e";
-    <Fem,Pl>  => s + "es"
-  } ;
-
-lincat
-  NP = {s : Str ; a : Agr} ;
-  VP = {s : Agr => Str} ;
-
-lin
-  Pred np vp = {s = np.s ++ vp.s ! np.a} ;
-
-  Je    = {s = "je"    ; a = {g = Masc ; n = Sg ; p = P1}} ;
-  Tu    = {s = "tu"    ; a = {g = Masc ; n = Sg ; p = P2}} ;
-  Il    = {s = "il"    ; a = {g = Masc ; n = Sg ; p = P3}} ;
-  Elle  = {s = "elle"  ; a = {g = Fem  ; n = Sg ; p = P3}} ;
-  Nous  = {s = "nous"  ; a = {g = Masc ; n = Pl ; p = P1}} ;
-  Vous  = {s = "vous"  ; a = {g = Masc ; n = Pl ; p = P2}} ;
-  Ils   = {s = "ils"   ; a = {g = Masc ; n = Pl ; p = P3}} ;
-  Elles = {s = "elles" ; a = {g = Fem  ; n = Pl ; p = P3}} ;
-
-  Strong = predA "fort" ;
-
-}
-- 
cgit v1.2.3