From ba78322409e2086a83c03b7b32e84940a24030b0 Mon Sep 17 00:00:00 2001
From: aarne <aarne@cs.chalmers.se>
Date: Fri, 15 Aug 2008 12:41:04 +0000
Subject: examples of morphological synthesis/analysis as top-level grammars

---
 examples/morpho/FreDescr.gf | 44 ++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 44 insertions(+)
 create mode 100644 examples/morpho/FreDescr.gf

(limited to 'examples/morpho/FreDescr.gf')

diff --git a/examples/morpho/FreDescr.gf b/examples/morpho/FreDescr.gf
new file mode 100644
index 000000000..0007986b2
--- /dev/null
+++ b/examples/morpho/FreDescr.gf
@@ -0,0 +1,44 @@
+--# -path=.:alltenses
+
+concrete FreDescr of Fre = IrregFre - [S] ** open (R = CommonRomance), Prelude in {
+
+flags coding=utf8 ;
+
+lincat 
+  Display, Word, Form = Str ;
+  TMood, Number, Person, NumPersI, Gender, Mood = Str ;
+
+lin
+  DAll w = w ++ ":" ++ "la conjugaison" ;
+
+  DForm w f = w ++ ":" ++ f ;
+
+  VInfin = "infinitif" ;
+  VFin m n p = m ++ n ++ p ;
+  VImper np = "imparfait" ++ np ;
+  VPart g n = "participe passé" ++ g ++ n ;
+  VGer = "participe présent" ;
+
+  VPres m = m ++ "présent" ;
+  VImperf m = m ++ "imparfait" ;
+  VPasse = "passé simple" ;
+  VFut = "futur" ;
+  VCondit = "conditionnel" ;
+
+  SgP2 = "singulier 2e" ;
+  PlP1 = "pluriel 1ère" ;
+  PlP2 = "pluriel 2e" ;
+  Sg = "singulier" ;
+  Pl = "pluriel" ;
+  P1 = "1ère" ;
+  P2 = "2e" ;
+  P3 = "3e" ;
+  Masc = "masculin" ;
+  Fem = "féminin" ;
+  Indic = "indicatif" ;
+  Conjunct = "subjonctif" ;
+
+  WVerb v = v.s ! R.VInfin True ;
+  WVerb2 v = v.s ! R.VInfin True ;
+
+}
-- 
cgit v1.2.3