better dictionary visualization in the Android App

This commit is contained in:
kr.angelov
2013-11-27 22:16:05 +00:00
parent 848573afdc
commit 9de4812482
13 changed files with 1337 additions and 1078 deletions

View File

@@ -154,4 +154,14 @@ lin
UttAdV adv = adv;
lincat
Feat = Str;
lin FeatN2, FeatN = \n ->
case n.g of {
AMasc Human => "(м.р.л.)" ;
AMasc NonHuman => "(м.р.)" ;
AFem => "(ж.р.)" ;
ANeut => "(ср.р.)"
} ;
}

View File

@@ -149,5 +149,9 @@ lin
PPos = {s = [] ; p = CPos} ;
PNeg = {s = [] ; p = CNeg True} ; -- contracted: don't
UncNeg = {s = [] ; p = CNeg False} ;
lincat
Feat = Str;
lin FeatN, FeatN2 = \_ -> "";
}

View File

@@ -72,4 +72,9 @@ fun CompoundCN : Num -> N -> CN -> CN ;
AdAdV : AdA -> AdV -> AdV ;
UttAdV : AdV -> Utt;
cat Feat;
fun FeatN : N -> Feat;
FeatN2 : N2 -> Feat;
}

View File

@@ -123,5 +123,13 @@ lin
lin
UncNeg = {s = [] ; p = Neg} ;
lincat
Feat = Str;
lin FeatN2, FeatN = \n ->
case n.g of {
Utr => "(utr)" ;
Neutr => "(neutr)"
} ;
}