summaryrefslogtreecommitdiff
path: root/examples/SUMO/RGLExt
diff options
context:
space:
mode:
Diffstat (limited to 'examples/SUMO/RGLExt')
-rw-r--r--examples/SUMO/RGLExt/DictLang.gf12
-rw-r--r--examples/SUMO/RGLExt/DictLangEng.gf9
-rw-r--r--examples/SUMO/RGLExt/DictLangFre.gf10
-rw-r--r--examples/SUMO/RGLExt/DictLangRon.gf10
-rw-r--r--examples/SUMO/RGLExt/Extension.gf31
-rw-r--r--examples/SUMO/RGLExt/ExtensionEng.gf62
-rw-r--r--examples/SUMO/RGLExt/ExtensionFre.gf64
-rw-r--r--examples/SUMO/RGLExt/ExtensionRon.gf62
-rw-r--r--examples/SUMO/RGLExt/ExtraLexicon.gf29
-rw-r--r--examples/SUMO/RGLExt/ExtraLexiconFre.gf34
-rw-r--r--examples/SUMO/RGLExt/ExtraLexiconRon.gf34
-rw-r--r--examples/SUMO/RGLExt/ParamBasic.gf5
12 files changed, 0 insertions, 362 deletions
diff --git a/examples/SUMO/RGLExt/DictLang.gf b/examples/SUMO/RGLExt/DictLang.gf
deleted file mode 100644
index 1b0919b2e..000000000
--- a/examples/SUMO/RGLExt/DictLang.gf
+++ /dev/null
@@ -1,12 +0,0 @@
---1 Lang: a Test Module for the Resource Grammar
-
--- This grammar is for testing the resource as included in the
--- language-independent API, consisting of a grammar and a lexicon.
--- The grammar without a lexicon is [``Grammar`` Grammar.html],
--- which may be more suitable to open in applications.
-
-abstract DictLang =
- Grammar
- ** open Extension in {
- -- flags startcat=NP ;
- } ;
diff --git a/examples/SUMO/RGLExt/DictLangEng.gf b/examples/SUMO/RGLExt/DictLangEng.gf
deleted file mode 100644
index 6227348f5..000000000
--- a/examples/SUMO/RGLExt/DictLangEng.gf
+++ /dev/null
@@ -1,9 +0,0 @@
---# -path=.:../../../lib/src/abstract:../../../lib/src/english:../../../lib/src/common
-
-concrete DictLangEng of DictLang =
- GrammarEng
- ** open ExtensionEng in {
-
-flags unlexer = text ; lexer = text ;
-
-} ;
diff --git a/examples/SUMO/RGLExt/DictLangFre.gf b/examples/SUMO/RGLExt/DictLangFre.gf
deleted file mode 100644
index c4417408e..000000000
--- a/examples/SUMO/RGLExt/DictLangFre.gf
+++ /dev/null
@@ -1,10 +0,0 @@
---# -path=.:../abstract:../common:../prelude:../romance:
-
-concrete DictLangFre of DictLang =
- GrammarFre,
- ExtensionFre
- ** {
-
-flags unlexer = text ; lexer = text ;
-
-} ;
diff --git a/examples/SUMO/RGLExt/DictLangRon.gf b/examples/SUMO/RGLExt/DictLangRon.gf
deleted file mode 100644
index 9c124d229..000000000
--- a/examples/SUMO/RGLExt/DictLangRon.gf
+++ /dev/null
@@ -1,10 +0,0 @@
---# -path=.:../abstract:../common:../prelude
-
-concrete DictLangRon of DictLang =
- GrammarRon,
- ExtensionRon
- ** {
-
-flags unlexer = text ; lexer = text ;
-
-} ;
diff --git a/examples/SUMO/RGLExt/Extension.gf b/examples/SUMO/RGLExt/Extension.gf
deleted file mode 100644
index e9410526f..000000000
--- a/examples/SUMO/RGLExt/Extension.gf
+++ /dev/null
@@ -1,31 +0,0 @@
-
--- other functions needed for parsing
-
-abstract Extension = Cat ** {
-
-cat
- PolSentence;
- StmtS ;
- [CN]{2};
-
-fun
-VerbToNounV2 : V2 -> N2 ; -- discovering
-VerbToNoun : V -> N ; -- walking is healthy
-VerbToGerundA : V -> A ; -- singing bird
-VerbToParticipeA : V -> A ; -- the required number
-ConjCN : Conj -> [CN] -> CN ; -- set or class
-mkPolSent : Cl -> PolSentence ;
-getSent : PolSentence -> S ;
-sentToNoun : PolSentence -> NP ;
-UsePolSentence : Pol -> PolSentence -> StmtS ;
-
-at_Prep : Prep ;
-per_Prep : Prep ;
-O1 : NP ;
-O2 : NP ;
-O3 : NP ;
-O4 : NP ;
-O5 : NP ;
-
-
-};
diff --git a/examples/SUMO/RGLExt/ExtensionEng.gf b/examples/SUMO/RGLExt/ExtensionEng.gf
deleted file mode 100644
index 4c4213cfd..000000000
--- a/examples/SUMO/RGLExt/ExtensionEng.gf
+++ /dev/null
@@ -1,62 +0,0 @@
---# -path=.:RGLExt:alltenses:../../lib/src/english
-
-concrete ExtensionEng of Extension = CatEng ** open MorphoEng, ResEng, ConjunctionEng, StructuralEng, Prelude, ParadigmsEng, Coordination, ParamBasic in {
-
-
-lincat
- PolSentence = {s : SentForm => CPolarity => Str ; flag : Flag};
- [CN] = {s1,s2 : Number => ResEng.Case => Str ; g : Gender} ;
- StmtS = {s : Str};
-
-lin
-VerbToNounV2 vs = VerbToNoun vs ** {c2 = vs.c2; lock_N2=<>};
-
-VerbToNoun v = {s = \\_,_ => v.s ! VPresPart;
- g = Masc; lock_N=<>};
-
-VerbToGerundA v = {s = \\_ => v.s ! VPresPart; lock_A=<>};
-
-VerbToParticipeA v = {s = \\_ => v.s ! VPPart; lock_A=<>};
-
-mkPolSent cl = {s = \\f,b => case b of
- {CPos => cl.s ! Pres ! Simul ! CPos ! ODir;
- _ => cl.s ! Pres ! Simul ! CNeg False ! ODir};
- flag = NothingS ;
- lock_PolSentence = <>};
-
-getSent psel = {s = psel.s ! Indep ! CPos} ;
-
-sentToNoun ps = {s = \\_ => "\"" ++ ps.s ! Indep ! CPos ++ "\"";
- a = agrP3 Sg; lock_NP=<>};
-
-ConjCN conj ss = conjunctDistrTable2 Number ResEng.Case conj ss ** {g = ss.g;lock_CN=<>};
-
-BaseCN x y ={s1 = \\n,c => x.s ! n ! c ;
- s2 = \\n,c => y.s ! n ! c ;
- g = x.g} ;
-
-ConsCN xs x = consrTable2 Number ResEng.Case comma xs x ** {g = Masc} ;
-
-
-UsePolSentence p ps = {s = ps.s ! Indep ! p.p};
-
-at_Prep = mkPrep "at" ;
-per_Prep = mkPrep "per" ;
-
-O1 = {s = \\_ => "o1" ;
- a = agrP3 Sg}**{lock_NP=<>};
-
-O2 = {s = \\_ => "o2" ;
- a = agrP3 Sg}**{lock_NP=<>};
-
-O3 = {s = \\_ => "o3" ;
- a = agrP3 Sg}**{lock_NP=<>};
-
-O4 = {s = \\_ => "o4" ;
- a = agrP3 Sg}**{lock_NP=<>};
-
-O5 = {s = \\_ => "o5" ;
- a = agrP3 Sg}**{lock_NP=<>};
-
-
-}
diff --git a/examples/SUMO/RGLExt/ExtensionFre.gf b/examples/SUMO/RGLExt/ExtensionFre.gf
deleted file mode 100644
index 16040d03e..000000000
--- a/examples/SUMO/RGLExt/ExtensionFre.gf
+++ /dev/null
@@ -1,64 +0,0 @@
---# -path=.:../romance:../common:../abstract:../prelude:
-concrete ExtensionFre of Extension = CatFre ** open MorphoFre, Prelude, Coordination,ParamBasic, ResFre, GrammarFre, ParadigmsFre in {
-
-
-lincat
- PolSentence = {s : SentForm => Polarity => Str ; flag : Flag};
- [CN] = {s1,s2 : Number => Str ; g : Gender} ;
- SS = {s : Str};
-
-
-
-lin
-
-VerbToNoun v = {s = \\_ => v.s ! (VInfin True);
- g = Masc};
-
-VerbToNounV2 v2 = VerbToNoun v2 ** {c2 = v2.c2};
-
-VerbToGerundA v = {s = \\_,af => case af of
- {AF g n => v.s ! VGer; -- need more data for feminine and plural forms
- AA => "en" ++ v.s ! VGer
- };
- isPre = False};
-
-VerbToParticipeA v = {s = \\_,af => case af of
- {AF g n => v.s ! (VPart g n);
- AA => "en" ++ v.s ! VGer
- };
- isPre = False} ;
-
-mkPolSent cl = {s = \\f,b => cl.s ! DDir ! RPres ! Simul ! b ! Indic ;
- flag = NothingS ;
- lock_PolSentence = <>
- };
-
-sentToNoun ps = heavyNP {s = \\_ => "\"" ++ ps.s ! Indep ! Pos ++ "\"";
- a = agrP3 Masc Sg
- };
-
-at_Prep = mkPreposition "à" ;
-per_Prep = mkPreposition "per" ;
-
-ConjCN conj ss = conjunctDistrTable Number conj ss ** {
- g = ss.g
- };
-
-BaseCN x y ={
- s1 = \\n => x.s ! n ;
- s2 = \\n => y.s ! n ;
- g = x.g};
-
-ConsCN xs x = consrTable Number comma xs x ** {g = x.g} ;
-
-UsePolSentence p ps = {s = ps.s ! Indep ! p.p};
-
-O1 = UsePN (mkPN "o1") ;
-O2 = UsePN (mkPN "o2") ;
-O3 = UsePN (mkPN "o3") ;
-O4 = UsePN (mkPN "o4") ;
-O5 = UsePN (mkPN "o5") ;
-
-
-
-} \ No newline at end of file
diff --git a/examples/SUMO/RGLExt/ExtensionRon.gf b/examples/SUMO/RGLExt/ExtensionRon.gf
deleted file mode 100644
index 50a94e88b..000000000
--- a/examples/SUMO/RGLExt/ExtensionRon.gf
+++ /dev/null
@@ -1,62 +0,0 @@
-concrete ExtensionRon of Extension = CatRon ** open MorphoRon, ResRon, ConjunctionRon, StructuralRon, Prelude, Coordination,ParamBasic, ParadigmsRon, NounRon in {
-
-
-lincat
- PolSentence = {s : SentForm => Polarity => Str ; flag : Flag};
- [CN] = {s1,s2 : Number => Species => ACase => Str; g : NGender; a : Animacy ; isComp : Bool} ;
- StmtS = {s : Str};
-lin
-
-VerbToNounV2 v2 = VerbToNoun v2 ** {c2 = v2.c2};
-
-
-VerbToNoun vp = { s = \\n,sp,c => vp.s ! PPasse Masc n sp c ;
- g = NNeut ; a = Inanimate };
-
-
-VerbToGerundA vp = {s = \\af => vp.s ! Ger;
- isPre = False
- };
-
-VerbToParticipeA v = {s = \\af => case af of
- {AF g n sp c => v.s ! PPasse g n sp c;
- AA => v.s ! PPasse Masc Sg Indef ANomAcc
- };
- isPre = False
- };
-
-mkPolSent cl = {s = \\f,b => cl.s ! DDir ! RPres ! Simul ! b ! Indic ;
- flag = NothingS ;
- lock_PolSentence = <>
- };
-
-sentToNoun ps = heavyNP {s = \\_ => "\"" ++ ps.s ! Indep ! Pos ++ "\"";
- a = agrP3 Masc Sg; hasClit = HasClit ; isComp = True ;
- ss = "\"" ++ ps.s ! Indep ! Pos ++ "\""
- };
-
-ConjCN conj ss = conjunctDistrTable3 Number Species ACase conj ss ** {
- g = ss.g; a = ss.a; isComp = ss.isComp; needsRefForm = False
- };
-
-
-BaseCN x y ={
- s1 = \\n,sp,c => x.s ! n ! sp ! c ;
- s2 = \\n,sp,c => y.s ! n ! sp ! c ;
- g = x.g; a = x.a ; isComp = x.isComp;
- needsRefForm = False};
-
-ConsCN xs x = consrTable3 Number Species ACase comma xs x ** {g = x.g; a = x.a; isComp = x.isComp; needsRefForm = False} ;
-
-at_Prep = mkPrep "la" Ac True;
-per_Prep = mkPrep "per" Ac True;
-
-UsePolSentence p ps = {s = ps.s ! Indep ! p.p};
-
-O1 = UsePN (mkPN "o1") ;
-O2 = UsePN (mkPN "o2") ;
-O3 = UsePN (mkPN "o3") ;
-O4 = UsePN (mkPN "o4") ;
-O5 = UsePN (mkPN "o5") ;
-
-} \ No newline at end of file
diff --git a/examples/SUMO/RGLExt/ExtraLexicon.gf b/examples/SUMO/RGLExt/ExtraLexicon.gf
deleted file mode 100644
index d15177b70..000000000
--- a/examples/SUMO/RGLExt/ExtraLexicon.gf
+++ /dev/null
@@ -1,29 +0,0 @@
-abstract ExtraLexicon = Cat ** {
-fun
- time_N : N ;
- square_A : A ;
- value_N : N ;
- element_N : N ;
-
-
---------------------------
---CNL presentation
-
- entity_N : N ;
- abstract_N : N ;
- attribute_N : N ;
- graph_N : N ;
- model_N : N ;
- process_N : N ;
- task_N : N ;
- proposition_N : N ;
- quantity_N : N ;
- set_N : N ;
- class_N : N ;
- physical_N : N ;
- content_N : N ;
- object_N : N ;
- system_N : N ;
- physical_A : A ;
-
-}
diff --git a/examples/SUMO/RGLExt/ExtraLexiconFre.gf b/examples/SUMO/RGLExt/ExtraLexiconFre.gf
deleted file mode 100644
index a23806cff..000000000
--- a/examples/SUMO/RGLExt/ExtraLexiconFre.gf
+++ /dev/null
@@ -1,34 +0,0 @@
---# -path=.:../romance:../common:../abstract:../../prelude
-
-concrete ExtraLexiconFre of ExtraLexicon = CatFre **
- open ParadigmsFre,MorphoFre,BeschFre in {
-
-flags
- optimize=values ; coding=utf8 ;
-
-lin
- value_N = regGenN "valeur" feminine ;
- square_A = regA "caré" ;
- time_N = regN "heure" ;
- element_N = mkN "élément" ;
-
- entity_N = regGenN "entité" feminine;
- abstract_N = mkN "abstrait" ;
- attribute_N = mkN "attribut" ;
- graph_N = regGenN "graph" masculine ;
- model_N = regGenN "modèle" masculine;
- process_N = mkN "processus" ;
- task_N = regGenN "tâche" feminine;
- proposition_N = regGenN "proposition" feminine ;
- quantity_N = regGenN "quantité" feminine;
- set_N = regGenN "ensemble" masculine;
- class_N = regGenN "classe" feminine;
- physical_N = regGenN "physique" masculine;
- content_N = mkN "sens" ;
- object_N = mkN "objet" ;
- system_N = mkN "système" ;
- physical_A = regA "physique" ;
-
-
-
-} ;
diff --git a/examples/SUMO/RGLExt/ExtraLexiconRon.gf b/examples/SUMO/RGLExt/ExtraLexiconRon.gf
deleted file mode 100644
index b1f6c47f1..000000000
--- a/examples/SUMO/RGLExt/ExtraLexiconRon.gf
+++ /dev/null
@@ -1,34 +0,0 @@
---# -path=.:../romance:../common:../abstract:../../prelude
-
-concrete ExtraLexiconRon of ExtraLexicon = CatRon **
- open ParadigmsRon,MorphoRon,BeschRon in {
-
-flags
- optimize=values ; coding=utf8 ;
-
-lin
- value_N = mkN "valoare" "valori" ;
- square_A = regA "patrat" ;
- time_N = mkNR "timp" ;
- element_N = mkN "element" ;
-
- entity_N = mkN "entitate" ;
- abstract_N = mkN "abstract" ;
- attribute_N = mkN "atribut" ;
- graph_N = mkNR "graf" ;
- model_N = mkN "model" neuter;
- process_N = mkN "proces" ;
- task_N = mkN "sarcină" ;
- proposition_N = mkN "propoziție" ;
- quantity_N = mkN "cantitate" ;
- set_N = mkN "mulțime" ;
- class_N = mkN "clasă" ;
- physical_N = mkN "concret" ;
- content_N = mkN "conținut" ;
- object_N = mkN "obiect" ;
- system_N = mkN "sistem" ;
- physical_A = regA "concret" ;
-
-
-
-} ;
diff --git a/examples/SUMO/RGLExt/ParamBasic.gf b/examples/SUMO/RGLExt/ParamBasic.gf
deleted file mode 100644
index 83471801a..000000000
--- a/examples/SUMO/RGLExt/ParamBasic.gf
+++ /dev/null
@@ -1,5 +0,0 @@
-resource ParamBasic = {
-param Flag = ExistS NumQuant | ForallS NumQuant | NothingS ;
-param SentForm = Indep | Attrib ;
-param NumQuant = One | Many ;
-} \ No newline at end of file
generated by cgit v1.2.3 (git 2.39.1) at 2026-05-20 05:17:51 +0000