From b7d2916bbed9d1eec92066061d0fc0d5d35739b4 Mon Sep 17 00:00:00 2001
From: "ra.monique" <ra.monique@gmail.com>
Date: Mon, 23 Feb 2009 13:29:42 +0000
Subject: Romainian in next-lib

---
 next-lib/src/romanian/CatRon.gf | 70 +++++++++++++++++++++++++++++++++++++++++
 1 file changed, 70 insertions(+)
 create mode 100644 next-lib/src/romanian/CatRon.gf

(limited to 'next-lib/src/romanian/CatRon.gf')

diff --git a/next-lib/src/romanian/CatRon.gf b/next-lib/src/romanian/CatRon.gf
new file mode 100644
index 000000000..f3e756e64
--- /dev/null
+++ b/next-lib/src/romanian/CatRon.gf
@@ -0,0 +1,70 @@
+--# -path=.:../Romance:../common:../abstract:../common:prelude
+
+concrete CatRon of Cat =
+  CommonX - [Temp,TTAnt,Tense,TPres,TPast,TFut,TCond] 
+  ** open Prelude, ResRon, (R = ParamX) in {
+
+  flags optimize=all_subs ;
+
+
+  
+  lincat
+
+
+-- Verb
+
+ --   VP = ResRon.VP ;
+  --  VPSlash = ResRon.VP ** {c2 : Compl} ;
+  --  Comp = {s : Agr => Str} ; 
+
+-- Adjective
+
+    AP = {s : AForm => Str ; isPre : Bool} ; 
+
+-- Noun
+
+    CN      = {s : Number => Str ; g : Gender} ;
+ --   Pron    = Pronoun ;
+ --   NP      = NounPhrase ;
+  --  Det     = {
+  --    s : Gender => Case => Str ; 
+  --    n : Number ; 
+  --    s2 : Str ;            -- -ci 
+  --    sp : Gender => Case => Str    -- substantival: mien, mienne
+  --    } ;
+  --  Quant = {
+  --    s  : Bool => Number => Gender => Case => Str ; 
+  --    s2 : Str ; 
+  --    sp : Number => Gender => Case => Str 
+       Ord = {s : AForm => Str ; isPre : Bool} ;
+-- Numeral
+
+    Numeral = {s : ACase => CardOrd => NumF => Str ; size : Size } ;
+    Digits  = {s : CardOrd => Str ; n : Size ; isDig : Bool} ;
+
+    
+
+-- Structural
+ 
+    Conj = {s1,s2 : Str ; n : Number} ;
+    Subj = {s : Str ; m : Mood} ;
+    Prep = {s : Str ; c : NCase ; isDir : Bool} ;
+
+-- Open lexical classes, e.g. Lexicon
+    Verb = {s : VForm => Str } ;
+    V ={s : VForm => Str } ;
+    VQ, VA = V ;
+    V2, VV, V2S, V2Q = V ** {c2 : Compl} ;
+    V3, V2A, V2V = V ** {c2,c3 : Compl} ;
+    VS = V ** {m : Polarity => Mood} ;
+
+    A  = {s : Degree => AForm => Str ; isPre : Bool} ;
+    A2 = {s : Degree => AForm => Str ; c2 : Compl} ;
+
+    N  = Noun ; 
+    N2 = Noun  ** {c2 : Compl} ;
+    N3 = Noun  ** {c2,c3 : Compl} ;
+    PN = {s : ACase => Str ; g : Gender ; n : Number} ;
+
+
+}
-- 
cgit v1.2.3