fixed new tense structure in next-resourc/demo

lib/next-resource/demo/Add.gf

@@ -0,0 +1,12 @@
+
+  PredVS : NP -> VS -> S -> Cl ;
+  PredVVV2A : NP -> VV -> V2A -> NP -> AP -> Cl ;
+  RelCNAdvPrep : CN -> NP -> V -> Adv -> Prep -> CN ;
+
+  PredVS np vs s = PredVP np (ComplVS vs s) ;
+
+  PredVVV2A np vv v2 np2 ap = PredVP np (ComplVV vv (ComplSlash (SlashV2A v2 ap) np2)) ;
+
+  RelCNAdvPrep cn np v adv prep = RelCN cn (UseRCl TPast ASimul PPos 
+            (RelSlash IdRP (SlashPrep (PredVP np (AdvVP (UseV v) adv)) prep))) ;
+

lib/next-resource/demo/Clause.gf

@@ -0,0 +1,21 @@
+abstract Clause = Cat ** {
+
+fun 
+  PredV   : NP -> V -> Cl ;
+  PredV2  : NP -> V2 -> NP -> Cl ;
+  PredAP  : NP -> AP -> Cl ;
+  PredAdv : NP -> Adv -> Cl ;
+
+  UseCl   : Temp -> Pol -> Cl  -> S ;
+
+  QuestV  : IP -> V -> QCl ;
+  QuestV2 : IP -> V2 -> NP -> QCl ;
+--  QuestV2Slash : IP -> NP -> V2 -> QCl ;
+
+  UseQCl  : Temp -> Pol -> QCl -> QS ;
+
+  ImpV   : V -> Imp ;
+--  ImpV2  : V2 -> NP -> Imp ;
+
+
+}

lib/next-resource/demo/ClauseAra.gf

@@ -0,0 +1,2 @@
+concrete ClauseAra of Clause = CatAra ** ClauseI
+  with (Grammar = GrammarAra) ;

lib/next-resource/demo/ClauseBul.gf

@@ -0,0 +1 @@
+concrete ClauseBul of Clause = CatBul ** ClauseI with (Grammar = GrammarBul) ;

lib/next-resource/demo/ClauseCat.gf

@@ -0,0 +1 @@
+concrete ClauseCat of Clause = CatCat ** ClauseI with (Grammar = GrammarCat) ;

lib/next-resource/demo/ClauseDan.gf

@@ -0,0 +1 @@
+concrete ClauseDan of Clause = CatDan ** ClauseI with (Grammar = GrammarDan) ;

lib/next-resource/demo/ClauseEng.gf

@@ -0,0 +1 @@
+concrete ClauseEng of Clause = CatEng ** ClauseI with (Grammar = GrammarEng) ;

lib/next-resource/demo/ClauseFin.gf

@@ -0,0 +1 @@
+concrete ClauseFin of Clause = CatFin ** ClauseI with (Grammar = GrammarFin) ;

lib/next-resource/demo/ClauseFre.gf

@@ -0,0 +1 @@
+concrete ClauseFre of Clause = CatFre ** ClauseI with (Grammar = GrammarFre) ;

lib/next-resource/demo/ClauseGer.gf

@@ -0,0 +1 @@
+concrete ClauseGer of Clause = CatGer ** ClauseI with (Grammar = GrammarGer) ;

lib/next-resource/demo/ClauseI.gf

@@ -0,0 +1,22 @@
+incomplete concrete ClauseI of Clause = Cat ** open Grammar in {
+
+lin 
+  PredV np v = PredVP np (UseV v) ;
+  PredV2 s v o = PredVP s (ComplSlash (SlashV2a v) o) ;
+  PredAP s a = PredVP s (UseComp (CompAP a)) ;
+  PredAdv s a = PredVP s (UseComp (CompAdv a)) ;
+
+  UseCl = Grammar.UseCl ;
+
+  QuestV np v = QuestVP np (UseV v) ;
+  QuestV2 s v o = QuestVP s (ComplSlash (SlashV2a v) o) ;
+--  QuestV2Slash ip s v = QuestSlash ip (SlashVP s (SlashV2a v)) ;
+
+  UseQCl = Grammar.UseQCl ;
+
+  ImpV v = ImpVP (UseV v) ;
+--  ImpV2 v o = ImpVP (ComplSlash (SlashV2a v) o) ;
+
+
+
+}

lib/next-resource/demo/ClauseIta.gf

@@ -0,0 +1 @@
+concrete ClauseIta of Clause = CatIta ** ClauseI with (Grammar = GrammarIta) ;

lib/next-resource/demo/ClauseNor.gf

@@ -0,0 +1 @@
+concrete ClauseNor of Clause = CatNor ** ClauseI with (Grammar = GrammarNor) ;

lib/next-resource/demo/ClauseRus.gf

@@ -0,0 +1 @@
+concrete ClauseRus of Clause = CatRus ** ClauseI with (Grammar = GrammarRus) ;

lib/next-resource/demo/ClauseSpa.gf

@@ -0,0 +1 @@
+concrete ClauseSpa of Clause = CatSpa ** ClauseI with (Grammar = GrammarSpa) ;

lib/next-resource/demo/ClauseSwe.gf

@@ -0,0 +1 @@
+concrete ClauseSwe of Clause = CatSwe ** ClauseI with (Grammar = GrammarSwe) ;

lib/next-resource/demo/Demo.gf

@@ -0,0 +1,21 @@
+abstract Demo =  
+  Noun - [AdvCN,PredetNP,PPartNP,RelNP,RelCN,SentCN,ApposCN,MassNP,DetNP],
+--  Verb,
+  Clause, -- 
+  Adjective - [SentAP,ReflA2],
+  Adverb,
+  Numeral,
+--  Sentence, 
+  Question - [QuestVP,QuestSlash],
+----  Relative,
+----  Conjunction,
+  Phrase,
+----  Text,
+----  Idiom,
+  Structural - [everybody_NP,everything_NP,something_NP],
+  Lexicon ** {
+
+flags startcat = S ;
+
+}
+

lib/next-resource/demo/DemoAra.gf

@@ -0,0 +1,24 @@
+--# -path=.:alltenses
+
+concrete DemoAra of Demo = 
+  NounAra - [AdvCN,PredetNP,PPartNP,RelNP,RelCN,SentCN,
+             ApposCN,MassNP,DetNP,ComplN3,Use2N3,Use3N3,AdvNP], 
+--  VerbAra, 
+  ClauseAra, --
+  AdjectiveAra - [SentAP,ComplA2,UseA2,DemoA2],
+  AdverbAra,
+  NumeralAra,
+----  SentenceAra,
+  QuestionAra - [QuestVP,QuestSlash],
+----  RelativeAra,
+----  ConjunctionAra,
+----  PhraseAra,
+----  TextX,
+----  IdiomAra,
+  StructuralAra - [everybody_NP,everything_NP,something_NP],
+  LexiconAra
+  ** {
+
+flags startcat = Phr ; unlexer = text ; lexer = text ;
+
+} ;

lib/next-resource/demo/DemoBul.gf

@@ -0,0 +1,16 @@
+--# -path=.:alltenses
+
+concrete DemoBul of Demo = 
+  NounBul,
+  ClauseBul,
+  AdjectiveBul,
+  AdverbBul,
+  NumeralBul,
+  QuestionBul,
+  StructuralBul,
+  LexiconBul
+  ** {
+
+flags language = bg; unlexer = text ; lexer = text ;
+
+} ;

lib/next-resource/demo/DemoCat.gf

@@ -0,0 +1,16 @@
+--# -path=.:alltenses
+
+concrete DemoCat of Demo = 
+  NounCat,
+  ClauseCat,
+  AdjectiveCat,
+  AdverbCat,
+  NumeralCat,
+  QuestionCat,
+  StructuralCat,
+  LexiconCat
+  ** {
+
+flags language = ca; unlexer = text ; lexer = text ;
+
+} ;

lib/next-resource/demo/DemoDan.gf

@@ -0,0 +1,16 @@
+--# -path=.:alltenses
+
+concrete DemoDan of Demo = 
+  NounDan,
+  ClauseDan,
+  AdjectiveDan,
+  AdverbDan,
+  NumeralDan,
+  QuestionDan,
+  StructuralDan,
+  LexiconDan
+  ** {
+
+flags language = da; unlexer = text ; lexer = text ;
+
+} ;

lib/next-resource/demo/DemoEng.gf

@@ -0,0 +1,16 @@
+--# -path=.:alltenses
+
+concrete DemoEng of Demo = 
+  NounEng,
+  ClauseEng,
+  AdjectiveEng,
+  AdverbEng,
+  NumeralEng,
+  QuestionEng,
+  StructuralEng,
+  LexiconEng
+  ** {
+
+flags language = en; unlexer = text ; lexer = text ;
+
+} ;

lib/next-resource/demo/DemoFin.gf

@@ -0,0 +1,16 @@
+--# -path=.:alltenses
+
+concrete DemoFin of Demo = 
+  NounFin,
+  ClauseFin,
+  AdjectiveFin,
+  AdverbFin,
+  NumeralFin,
+  QuestionFin,
+  StructuralFin,
+  LexiconFin
+  ** {
+
+flags language = fi; unlexer = text ; lexer = text ;
+
+} ;

lib/next-resource/demo/DemoFre.gf

@@ -0,0 +1,16 @@
+--# -path=.:alltenses
+
+concrete DemoFre of Demo = 
+  NounFre,
+  ClauseFre,
+  AdjectiveFre,
+  AdverbFre,
+  NumeralFre,
+  QuestionFre,
+  StructuralFre,
+  LexiconFre
+  ** {
+
+flags language = fr; unlexer = text ; lexer = text ;
+
+} ;

lib/next-resource/demo/DemoGer.gf

@@ -0,0 +1,16 @@
+--# -path=.:alltenses
+
+concrete DemoGer of Demo = 
+  NounGer,
+  ClauseGer,
+  AdjectiveGer,
+  AdverbGer,
+  NumeralGer,
+  QuestionGer,
+  StructuralGer,
+  LexiconGer
+  ** {
+
+flags language = de; unlexer = text ; lexer = text ;
+
+} ;

lib/next-resource/demo/DemoHin.gf

@@ -0,0 +1,24 @@
+--# -path=.:alltenses
+
+concrete DemoHin of Demo = 
+  NounHin - [AdvCN,PredetNP,PPartNP,RelNP,RelCN,SentCN,
+             ApposCN,MassNP,DetNP,ComplN3,Use2N3,Use3N3,AdvNP], 
+--  VerbHin, 
+  ClauseHin, --
+  AdjectiveHin - [SentAP,ComplA2,UseA2,DemoA2],
+  AdverbHin,
+  NumeralHin,
+----  SentenceHin,
+  QuestionHin - [QuestVP,QuestSlash],
+----  RelativeHin,
+----  ConjunctionHin,
+----  PhraseHin,
+----  TextX,
+----  IdiomHin,
+  StructuralHin - [everybody_NP,everything_NP,something_NP],
+  LexiconHin
+  ** {
+
+flags startcat = Phr ; unlexer = text ; lexer = text ;
+
+} ;

lib/next-resource/demo/DemoIna.gf

@@ -0,0 +1,24 @@
+--# -path=.:alltenses
+
+concrete DemoIna of Demo = 
+  NounIna - [AdvCN,PredetNP,PPartNP,RelNP,RelCN,SentCN,
+             ApposCN,MassNP,DetNP,ComplN3,Use2N3,Use3N3,AdvNP], 
+--  VerbIna, 
+  ClauseIna, --
+  AdjectiveIna - [SentAP,ComplA2,UseA2,DemoA2],
+  AdverbIna,
+  NumeralIna,
+----  SentenceIna,
+  QuestionIna - [QuestVP,QuestSlash],
+----  RelativeIna,
+----  ConjunctionIna,
+----  PhraseIna,
+----  TextX,
+----  IdiomIna,
+  StructuralIna - [everybody_NP,everything_NP,something_NP],
+  LexiconIna
+  ** {
+
+flags startcat = Phr ; unlexer = text ; lexer = text ;
+
+} ;

lib/next-resource/demo/DemoIta.gf

@@ -0,0 +1,16 @@
+--# -path=.:alltenses
+
+concrete DemoIta of Demo = 
+  NounIta,
+  ClauseIta,
+  AdjectiveIta,
+  AdverbIta,
+  NumeralIta,
+  QuestionIta,
+  StructuralIta,
+  LexiconIta
+  ** {
+
+flags language = it; unlexer = text ; lexer = text ;
+
+} ;

lib/next-resource/demo/DemoJ.gf

@@ -0,0 +1,24 @@
+--# -path=.:alltenses
+
+incomplete concrete DemoJ of Demo = 
+  Noun - [AdvCN,PredetNP,PPartNP,RelNP,RelCN,SentCN,
+             ApposCN,MassNP,DetNP,ComplN3,Use2N3,Use3N3,AdvNP], 
+--  Verb, 
+  Clause, --
+  Adjective - [SentAP,ComplA2,UseA2,DemoA2],
+  Adverb,
+  Numeral,
+----  Sentence,
+  Question - [QuestVP,QuestSlash],
+----  Relative,
+----  Conjunction,
+----  Phrase,
+----  TextX,
+----  Idiom,
+  Structural - [everybody_NP,everything_NP,something_NP],
+  Lexicon
+  ** {
+
+flags startcat = Phr ; unlexer = text ; lexer = text ;
+
+} ;

lib/next-resource/demo/DemoJEng.gf

@@ -0,0 +1,22 @@
+--# -path=.:alltenses
+
+concrete DemoJEng of Demo = DemoJ with 
+  (Noun = NounEng),
+  (Clause = ClauseEng), --
+  (Adjective = AdjectiveEng),
+  (Adverb = AdverbEng),
+  (Numeral = NumeralEng),
+----  Sentence,
+  (Question )- [QuestVP,QuestSlash],
+----  Relative,
+----  Conjunction,
+----  Phrase,
+----  TextX,
+----  Idiom,
+  Structural - [everybody_NP,everything_NP,something_NP],
+  Lexicon
+  ** {
+
+flags startcat = Phr ; unlexer = text ; lexer = text ;
+
+} ;

lib/next-resource/demo/DemoNor.gf

@@ -0,0 +1,16 @@
+--# -path=.:alltenses
+
+concrete DemoNor of Demo = 
+  NounNor,
+  ClauseNor,
+  AdjectiveNor,
+  AdverbNor,
+  NumeralNor,
+  QuestionNor,
+  StructuralNor,
+  LexiconNor
+  ** {
+
+flags language = no; unlexer = text ; lexer = text ;
+
+} ;

lib/next-resource/demo/DemoRus.gf

@@ -0,0 +1,16 @@
+--# -path=.:alltenses
+
+concrete DemoRus of Demo = 
+  NounRus,
+  ClauseRus,
+  AdjectiveRus,
+  AdverbRus,
+  NumeralRus,
+  QuestionRus,
+  StructuralRus,
+  LexiconRus
+  ** {
+
+flags language = ru; unlexer = text ; lexer = text ;
+
+} ;

lib/next-resource/demo/DemoSpa.gf

@@ -0,0 +1,16 @@
+--# -path=.:alltenses
+
+concrete DemoSpa of Demo = 
+  NounSpa,
+  ClauseSpa,
+  AdjectiveSpa,
+  AdverbSpa,
+  NumeralSpa,
+  QuestionSpa,
+  StructuralSpa,
+  LexiconSpa
+  ** {
+
+flags language = es; unlexer = text ; lexer = text ;
+
+} ;

lib/next-resource/demo/DemoSwe.gf

@@ -0,0 +1,16 @@
+--# -path=.:alltenses
+
+concrete DemoSwe of Demo = 
+  NounSwe,
+  ClauseSwe,
+  AdjectiveSwe,
+  AdverbSwe,
+  NumeralSwe,
+  QuestionSwe,
+  StructuralSwe,
+  LexiconSwe
+  ** {
+
+flags language = sv; unlexer = text ; lexer = text ;
+
+} ;

lib/next-resource/demo/DemoTha.gf

@@ -0,0 +1,24 @@
+--# -path=.:alltenses
+
+concrete DemoTha of Demo = 
+  NounTha - [AdvCN,PredetNP,PPartNP,RelNP,RelCN,SentCN,
+             ApposCN,MassNP,DetNP,ComplN3,Use2N3,Use3N3,AdvNP], 
+--  VerbTha, 
+  ClauseTha, --
+  AdjectiveTha - [SentAP,ComplA2,UseA2,DemoA2],
+  AdverbTha,
+  NumeralTha,
+----  SentenceTha,
+  QuestionTha - [QuestVP,QuestSlash],
+----  RelativeTha,
+----  ConjunctionTha,
+----  PhraseTha,
+----  TextX,
+----  IdiomTha,
+  StructuralTha - [everybody_NP,everything_NP,something_NP],
+  LexiconTha
+  ** {
+
+flags startcat = Phr ; unlexer = text ; lexer = text ;
+
+} ;