zulu inclusion

This commit is contained in:
Laurette Marais
2022-04-28 08:53:37 +02:00
parent a72600b27c
commit 8b05843585
66 changed files with 43788 additions and 0 deletions
+27
View File
@@ -0,0 +1,27 @@
concrete AdverbZul of Adverb = CatZul ** open ResZul, Prelude in {
lin
PositAdvAdj a = {
s = "ka" ++BIND++ a.s!AF1 ;
reqLocS = False
} ;
-- ComparAdvAdj cadv a np = {
-- s = cadv.s ! Pos ++ a.s ! AAdv ++ cadv.p ++ np.s ! npNom
-- } ;
-- ComparAdvAdjS cadv a s = {
-- s = cadv.s ! Pos ++ a.s ! AAdv ++ cadv.p ++ s.s
-- } ;
--
-- PrepNP prep np = {s = preOrPost prep.isPre prep.s (np.s ! NPAcc)} ;
--
-- AdAdv = cc2 ;
-- PositAdAAdj a = {s = a.s ! AAdv} ;
-- SubjS subj s = {
-- s = subj.s ++ s.subjs ;
-- reqLocS = False
-- } ;
-- AdnCAdv cadv = {s = cadv.s ! Pos ++ cadv.p} ;
}