Adding a bantu Functor (#32)

* added Bantu functor

*  added egekusii language based on Bantu functor

*  added kikamba language based on Bantu functor

*  added kiswahili language based on Bantu functor
This commit is contained in:
kitukb
2018-10-03 13:52:48 +03:00
committed by Krasimir Angelov
parent c410abfa6b
commit bd556c7789
75 changed files with 6428 additions and 0 deletions
+13
View File
@@ -0,0 +1,13 @@
concrete AdverbKis of Adverb = CatKis **AdverbBantu -[ComparAdvAdj,ComparAdvAdjS] with
(ResBantu = ResKis)** open DiffKis in
{
flags coding=utf8;
lin
ComparAdvAdj cadv a np =let agr = complAgr np.a
in {
s = cadv.s ++ a.s !AAdj agr.g agr.n ++ cadv.p ++ np.s ! npNom
} ;
ComparAdvAdjS cadv a s = {
s = cadv.s ++ a.s !AAdj G1 Sg ++ cadv.p ++ s.s
} ;
}