redocumenting resource

lib/resource-1.0/romance/CatRomance.gf

@@ -1,5 +1,5 @@
 incomplete concrete CatRomance of Cat = 
-  open Prelude, CommonRomance, ResRomance, (R = ParamX) in {
+  TenseX ** open Prelude, CommonRomance, ResRomance, (R = ParamX) in {
 
   flags optimize=all_subs ;
 
@@ -71,7 +71,7 @@ incomplete concrete CatRomance of Cat =
     Subj  = {s : Str ; m : Mood} ;
     Prep  = {s : Str ; c : Case} ;
 
--- Open lexical classes, e.g. Basic
+-- Open lexical classes, e.g. Lexicon
 
     V, VQ, VA = Verb ;
     V2, VV, V2A = Verb ** {c2 : Compl} ;

lib/resource-1.0/romance/PhraseRomance.gf

@@ -1,5 +1,5 @@
 incomplete concrete PhraseRomance of Phrase = 
-  CatRomance, TenseX ** open CommonRomance, ResRomance, Prelude in {
+  CatRomance ** open CommonRomance, ResRomance, Prelude in {
 
   lin
     PhrUtt pconj utt voc = {s = pconj.s ++ utt.s ++ voc.s} ;

lib/resource-1.0/romance/SentenceRomance.gf

@@ -40,4 +40,9 @@ incomplete concrete SentenceRomance of Sentence =
     EmbedQS qs = {s = qs.s ! QIndir} ;
     EmbedVP vp = {s = infVP vp (agrP3 Masc Sg)} ; --- agr ---- compl
 
+    UseCl  t a p cl = {s = \\o => t.s ++ a.s ++ p.s ++ cl.s ! t.t ! a.a ! p.p ! o} ;
+    UseQCl t a p cl = {s = \\q => t.s ++ a.s ++ p.s ++ cl.s ! t.t ! a.a ! p.p ! q} ;
+    UseRCl t a p cl = 
+      {s = \\r,ag => t.s ++ a.s ++ p.s ++ cl.s ! t.t ! a.a ! p.p ! r ! ag} ;
+
 }

lib/resource-1.0/romance/TensedRomance.gf

@@ -1,12 +0,0 @@
-incomplete concrete TensedRomance of Tensed = CatRomance, TenseX ** 
-  open ResRomance in {
-
-  flags optimize=all_subs ;
-
-  lin
-    UseCl  t a p cl = {s = \\o => t.s ++ a.s ++ p.s ++ cl.s ! t.t ! a.a ! p.p ! o} ;
-    UseQCl t a p cl = {s = \\q => t.s ++ a.s ++ p.s ++ cl.s ! t.t ! a.a ! p.p ! q} ;
-    UseRCl t a p cl = 
-      {s = \\r,ag => t.s ++ a.s ++ p.s ++ cl.s ! t.t ! a.a ! p.p ! r ! ag} ;
-
-}