summaryrefslogtreecommitdiff
path: root/examples/translator/SmallNDPredFunctor.gf
diff options
context:
space:
mode:
Diffstat (limited to 'examples/translator/SmallNDPredFunctor.gf')
-rw-r--r--examples/translator/SmallNDPredFunctor.gf230
1 files changed, 0 insertions, 230 deletions
diff --git a/examples/translator/SmallNDPredFunctor.gf b/examples/translator/SmallNDPredFunctor.gf
deleted file mode 100644
index 144592933..000000000
--- a/examples/translator/SmallNDPredFunctor.gf
+++ /dev/null
@@ -1,230 +0,0 @@
-incomplete concrete NDPredFunctor of NDPred =
- Cat [Ant,NP,Utt,IP,IAdv,Conj,RS,RP,Subj] **
- open
- PredInterface,
- Pred,
- ParamX,
- Prelude
- in {
-
-------------------------------------
--- lincats
--------------------------------------
-
-lincat
- Tense = Pred.Tense ;
- Pol = Pred.Pol ;
-
- PrV_none, PrV_np, PrV_v, PrV_s, PrV_q, PrV_a, PrV_n,
- PrV_np_np, PrV_np_v, PrV_np_s, PrV_np_q, PrV_np_a, PrV_np_n = Pred.PrV ;
-
- PrVP_none, PrVP_np, PrVP_v, PrVP_s, PrVP_q, PrVP_a, PrVP_n,
- PrVP_np_np, PrVP_np_v, PrVP_np_s, PrVP_np_q, PrVP_np_a, PrVP_np_n = Pred.PrVP ;
-
- PrVPI_none, PrVPI_np = Pred.PrVPI ;
-
- PrCl_none, PrCl_np = Pred.PrCl ;
-
- PrQCl_none, PrQCl_np = Pred.PrQCl ;
-
- VPC_none, VPC_np = Pred.VPC ;
-
- ClC_none, ClC_np = Pred.ClC ;
-
- PrAdv_none, PrAdv_np = Pred.PrAdv ;
-
- PrS = Pred.PrS ;
-
- PrAP_none, PrAP_np = Pred.PrAP ;
-
- PrCN_none, PrCN_np = Pred.PrCN ;
-
--- reference linearizations for chunking
----- should be by functor as well
-
-linref
- PrVP_none, PrVP_np, PrVP_v, PrVP_s, PrVP_q, PrVP_a, PrVP_n,
- PrVP_np_np, PrVP_np_v, PrVP_np_s, PrVP_np_q, PrVP_np_a, PrVP_np_n
- = linrefPrVP ;
- PrCl_none, PrCl_np = linrefPrCl ;
- PrQCl_none, PrQCl_np = linrefPrQCl ;
- PrAdv_none, PrAdv_np = linrefPrAdv ;
----- PrAP_none, PrAP_np = \ap -> ap.s ! defaultAgr ++ ap.obj1 ! defaultAgr ;
----- PrCN_none, PrCN_np = \cn -> cn.s ! Sg ++ cn.obj1 ! defaultAgr ;
-
-----------------------------
---- linearization rules ----
-----------------------------
-
-lin
-
--- standard general
-
- TPres = Pred.TPres ;
- TPast = Pred.TPast ;
- TFut = Pred.TFut ;
- TCond = Pred.TCond ;
- ASimul = Pred.ASimul ;
- AAnter = Pred.AAnter ;
- PPos = Pred.PPos ;
- PNeg = Pred.PNeg ;
-
- UseV_none, UseV_np, UseV_v, UseV_s, UseV_q, UseV_a, UseV_n, UseV_np_np, UseV_np_v, UseV_np_s, UseV_np_q, UseV_np_a, UseV_np_n
- = Pred.UseV Pred.aNone ;
-{-
- PassUseV_none, PassUseV_np, PassUseV_v, PassUseV_s, PassUseV_q, PassUseV_a, PassUseV_n
- = Pred.PassUseV Pred.aNone ;
- AgentPassUseV_none, AgentPassUseV_np, AgentPassUseV_v, AgentPassUseV_s, AgentPassUseV_q, AgentPassUseV_a, AgentPassUseV_n
- = Pred.AgentPassUseV Pred.aNone ;
--}
- UseAP_none, UseAP_np
- = Pred.UseAP Pred.aNone ;
- UseCN_none, UseCN_np
- = Pred.UseCN Pred.aNone ;
- UseAdv_none, UseAdv_np
- = Pred.UseAdv Pred.aNone ;
- UseNP_none
- = Pred.UseNP ;
-{-
- UseS_none
- = Pred.UseS ;
- UseQ_none
- = Pred.UseQ ;
- UseVP_none
- = Pred.UseVP ;
--}
- ComplV2_none
- = Pred.ComplV2 Pred.aNone ;
-{-
- ComplVV_none, ComplVV_np
- = Pred.ComplVV Pred.aNone ;
- ComplVS_none, ComplVS_np
- = Pred.ComplVS Pred.aNone ;
- ComplVA_none
- = Pred.ComplVA Pred.aNone ;
- ComplVQ_none
- = Pred.ComplVQ Pred.aNone ;
- ComplVN_none
- = Pred.ComplVN Pred.aNone ;
-
- SlashV3_none
- = Pred.SlashV3 Pred.aNone ;
- SlashV2V_none, SlashV2V_np
- = Pred.SlashV2V Pred.aNone ;
- SlashV2S_none
- = Pred.SlashV2S Pred.aNone ;
- SlashV2Q_none
- = Pred.SlashV2Q Pred.aNone ;
- SlashV2A_none
- = Pred.SlashV2A Pred.aNone ;
- SlashV2N_none
- = Pred.SlashV2N Pred.aNone ;
-
- ReflVP_none, ReflVP_np, ReflVP_v, ReflVP_s, ReflVP_q, ReflVP_a, ReflVP_n
- = Pred.ReflVP Pred.aNone ;
- ReflVP2_np
- = Pred.ReflVP2 Pred.aNone ;
-
- InfVP_none, InfVP_np
- = Pred.InfVP Pred.aNone ;
--}
- PredVP_none, PredVP_np
- = Pred.PredVP Pred.aNone ;
-{-
- SlashClNP_none
- = Pred.SlashClNP Pred.aNone ;
--}
- QuestCl_none, QuestCl_np
- = Pred.QuestCl Pred.aNone ;
-
- QuestIAdv_none
- = Pred.QuestIAdv Pred.aNone ;
-
- QuestIComp_none
- = Pred.QuestIComp ;
-
- QuestVP_none
- = Pred.QuestVP Pred.aNone ;
-{-
- QuestSlash_none
- = Pred.QuestSlash Pred.aNone ;
-
- UseCl_none
- = Pred.UseCl ;
- UseQCl_none
- = Pred.UseQCl ;
-
- UseAdvCl_none
- = Pred.UseAdvCl ;
--}
- UttPrS
- = Pred.UttPrS ;
-
- AdvCl_none, AdvCl_np
- = Pred.AdvCl Pred.aNone ;
-{-
- AdvQCl_none, AdvQCl_np
- = Pred.AdvQCl Pred.aNone ;
-
----- RelCl_none
----- = Pred.RelCl Pred.aNone ;
- RelVP_none
- = Pred.RelVP ;
- RelSlash_none
- = Pred.RelSlash ;
-
- PrImpSg
- = Pred.PrImpSg ;
- PrImpPl
- = Pred.PrImpPl ;
-
- PresPartAP_none, PresPartAP_np
- = Pred.PresPartAP Pred.aNone ;
-
- PastPartAP_none
- = Pred.PastPartAP Pred.aNone ;
-
- AgentPastPartAP_none
- = Pred.AgentPastPartAP Pred.aNone ;
-
- NomVPNP_none
- = Pred.NomVPNP ;
-
- ByVP_none
- = Pred.ByVP Pred.aNone ;
- WhenVP_none
- = Pred.WhenVP Pred.aNone ;
- BeforeVP_none
- = Pred.BeforeVP Pred.aNone ;
- AfterVP_none
- = Pred.AfterVP Pred.aNone ;
- InOrderVP_none
- = Pred.InOrderVP Pred.aNone ;
- WithoutVP_none
- = Pred.WithoutVP Pred.aNone ;
-
- StartVPC_none, StartVPC_np
- = Pred.StartVPC Pred.aNone ;
- ContVPC_none, ContVPC_np
- = Pred.ContVPC Pred.aNone ;
- UseVPC_none, UseVPC_np
- = Pred.UseVPC Pred.aNone ;
-
- StartClC_none, StartClC_np
- = Pred.StartClC Pred.aNone ;
- ContClC_none, ContClC_np
- = Pred.ContClC Pred.aNone ;
- UseClC_none, UseClC_np
- = Pred.UseClC Pred.aNone ;
-
- ComplAdv_none
- = Pred.ComplAdv Pred.aNone ;
-
- SubjUttPreS
- = Pred.SubjUttPreS ;
- SubjUttPreQ
- = Pred.SubjUttPreQ ;
- SubjUttPost
- = Pred.SubjUttPost ;
--}
-} \ No newline at end of file