(Ara) Prepositions + improve Paradigms API functions

This commit is contained in:
Inari Listenmaa
2018-11-07 14:30:38 +01:00
parent 5c5cd125c9
commit bf28bf1e56
11 changed files with 185 additions and 89 deletions
+1 -1
View File
@@ -21,7 +21,7 @@ concrete AdjectiveAra of Adjective = CatAra ** open ResAra, Prelude in {
-- $SuperlA$ belongs to determiner syntax in $Noun$.
--
ComplA2 a np = {
s = \\sp,g,n,st,c => a.s ! APosit g n st c ++ a.c2 ++ np.s ! Gen ;
s = \\sp,g,n,st,c => a.s ! APosit g n st c ++ a.c2.s ++ np.s ! a.c2.c ;
} ;
--
-- ReflA2 a = {