Chunking and other robust translation facilities in plain RGL

This commit is contained in:
aarne
2014-04-02 21:16:03 +00:00
parent d94c7632d4
commit 2ae1392cc1
17 changed files with 437 additions and 38 deletions

View File

@@ -1,22 +1,22 @@
concrete ExtensionsFre of Extensions =
CatFre **
open
PhonoFre, MorphoFre, ResFre, CommonRomance, ParadigmsFre, SyntaxFre, Prelude, (G = GrammarFre) in {
PhonoFre, MorphoFre, ResFre, CommonRomance, ParadigmsFre, SyntaxFre, Prelude, (G = GrammarFre), (E = ExtraFre) in {
----lincat
---- VPI = E.VPI ;
lincat
VPI = E.VPI ;
---- ListVPI = E.ListVPI ;
---- VPS = E.VPS ;
VPS = E.VPS ;
---- ListVPS = E.ListVPS ;
----lin
---- MkVPI = E.MkVPI ;
lin
MkVPI = E.MkVPI ;
---- ConjVPI = E.ConjVPI ;
---- ComplVPIVV = E.ComplVPIVV ;
---- MkVPS = E.MkVPS ;
MkVPS = E.MkVPS ;
---- ConjVPS = E.ConjVPS ;
---- PredVPS = E.PredVPS ;
PredVPS = E.PredVPS ;
---- BaseVPI = E.BaseVPI ;
---- ConsVPI = E.ConsVPI ;

View File

@@ -1,22 +1,22 @@
concrete ExtensionsIta of Extensions =
CatIta **
open
PhonoIta, MorphoIta, ResIta, CommonRomance, ParadigmsIta, SyntaxIta, Prelude, (G = GrammarIta) in {
PhonoIta, MorphoIta, ResIta, CommonRomance, ParadigmsIta, SyntaxIta, Prelude, (G = GrammarIta), (E = ExtraIta) in {
----lincat
---- VPI = E.VPI ;
lincat
VPI = E.VPI ;
---- ListVPI = E.ListVPI ;
---- VPS = E.VPS ;
VPS = E.VPS ;
---- ListVPS = E.ListVPS ;
----lin
---- MkVPI = E.MkVPI ;
lin
MkVPI = E.MkVPI ;
---- ConjVPI = E.ConjVPI ;
---- ComplVPIVV = E.ComplVPIVV ;
---- MkVPS = E.MkVPS ;
MkVPS = E.MkVPS ;
---- ConjVPS = E.ConjVPS ;
---- PredVPS = E.PredVPS ;
PredVPS = E.PredVPS ;
---- BaseVPI = E.BaseVPI ;
---- ConsVPI = E.ConsVPI ;

View File

@@ -1,22 +1,22 @@
concrete ExtensionsSpa of Extensions =
CatSpa **
open
PhonoSpa, MorphoSpa, ResSpa, CommonRomance, ParadigmsSpa, SyntaxSpa, Prelude, (G = GrammarSpa) in {
PhonoSpa, MorphoSpa, ResSpa, CommonRomance, ParadigmsSpa, SyntaxSpa, Prelude, (G = GrammarSpa), (E = ExtraSpa) in {
----lincat
---- VPI = E.VPI ;
lincat
VPI = E.VPI ;
---- ListVPI = E.ListVPI ;
---- VPS = E.VPS ;
VPS = E.VPS ;
---- ListVPS = E.ListVPS ;
----lin
---- MkVPI = E.MkVPI ;
lin
MkVPI = E.MkVPI ;
---- ConjVPI = E.ConjVPI ;
---- ComplVPIVV = E.ComplVPIVV ;
---- MkVPS = E.MkVPS ;
MkVPS = E.MkVPS ;
---- ConjVPS = E.ConjVPS ;
---- PredVPS = E.PredVPS ;
PredVPS = E.PredVPS ;
---- BaseVPI = E.BaseVPI ;
---- ConsVPI = E.ConsVPI ;

View File

@@ -7,7 +7,7 @@ abstract Translate =
Numeral,
Conjunction,
Verb - [
----- SlashV2V, PassV2, ComplVV, -- to be generalized
SlashV2V, PassV2, ComplVV, -- to be generalized
UseCopula ---- overgenerating ??
],
Adverb,
@@ -22,7 +22,7 @@ abstract Translate =
Chunk,
Construction,
Extensions - [VPI,VPS,PredFrontVQ,PredFrontVS,SlashSlashV2V,SlashV2V,SlashVPIV2V,ComplVV,PassVPSlash,PassAgentVPSlash],
Extensions - [VPI,VPS],
Dictionary,
Documentation

View File

@@ -8,7 +8,8 @@ concrete TranslateChi of Translate =
SymbolChi [PN, Symb, String, CN, Card, NP, MkSymb, SymbPN, CNNumNP],
ConjunctionChi,
VerbChi - [
SlashV2V, PassV2, UseCopula, ComplVV,
UseCopula, -- just removed
SlashV2V, PassV2, ComplVV, -- generalized
CompAP, AdvVP -- Chi exceptions
],
AdverbChi,

View File

@@ -12,16 +12,13 @@ concrete TranslateEng of Translate =
],
ConjunctionEng,
VerbEng - [
UseCopula,
-- SlashV2V, PassV2, ComplVV, -- generalized in Extensions
ComplVS, SlashV2S, ComplSlash, -- have variants in Eng
SlashV2VNP, SlashVV, AdVVPSlash,AdvVPSlash,VPSlashPrep -----
UseCopula, -- just removed
SlashV2V, PassV2, ComplVV, -- generalized in Extensions
ComplVS, SlashV2S, ComplSlash -- Eng exceptions
],
AdverbEng,
PhraseEng,
SentenceEng - [
SlashVS, -----
---- PredVP, -- to be replaced by PredVPS, QuestVPS, QuestIAdvVPS in Extensions
UseCl -- replaced by UseCl | ContractedUseCl
],
QuestionEng,
@@ -33,7 +30,7 @@ concrete TranslateEng of Translate =
ChunkEng,
ExtensionsEng - [
VPI,VPS,PredFrontVQ,PredFrontVS,SlashSlashV2V,SlashV2V,SlashVPIV2V,ComplVV,PassVPSlash,PassAgentVPSlash
VPI,VPS
],
DictionaryEng **
open MorphoEng, ResEng, ParadigmsEng, (G = GrammarEng), (E = ExtraEng), Prelude in {

View File

@@ -11,8 +11,7 @@ concrete TranslateSwe of Translate =
ConjunctionSwe,
VerbSwe - [
UseCopula,
-- SlashV2V, PassV2, ComplVV, -- generalized in Extensions
SlashV2VNP, SlashVV, AdVVPSlash,AdvVPSlash,VPSlashPrep -----
SlashV2V, PassV2, ComplVV -- generalized in Extensions
],
AdverbSwe,
PhraseSwe,
@@ -29,7 +28,7 @@ concrete TranslateSwe of Translate =
ChunkSwe,
ExtensionsSwe - [
VPI,VPS,PredFrontVQ,PredFrontVS,SlashSlashV2V,SlashV2V,SlashVPIV2V,ComplVV,PassVPSlash,PassAgentVPSlash
VPI,VPS
],
DictionarySwe **
open MorphoSwe, ResSwe, ParadigmsSwe, SyntaxSwe, CommonScand, (E = ExtraSwe), Prelude in {