fixes in the dictionaries

This commit is contained in:
kr.angelov
2013-11-28 13:16:03 +00:00
parent 35580255c3
commit 99ac055997
7 changed files with 240 additions and 11 deletions

View File

@@ -131,5 +131,52 @@ lin FeatN2, FeatN = \n ->
Utr => "(utr)" ;
Neutr => "(neutr)"
} ;
FeatV = \v ->
"<subject>" ++
v.s ! VI (VInfin Act) ++ v.part ;
FeatV2 = \v ->
"<subject>" ++
v.s ! VI (VInfin Act) ++ v.part ++ v.c2.s ++
"<object>";
FeatV3 = \v ->
"<subject>" ++
v.s ! VI (VInfin Act) ++ v.part ++
v.c2.s ++ "<arg1>" ++
v.c3.s ++ "<arg2>";
FeatV2V = \v ->
"<subject>" ++
v.s ! VI (VInfin Act) ++ v.part ++
v.c2.s ++ "<object>" ++
v.c3.s ++ "<verb>";
FeatV2S = \v ->
"<subject>" ++
v.s ! VI (VInfin Act) ++ v.part ++
v.c2.s ++ "<object>" ++
"that" ++ "<sentence>";
FeatV2Q = \v ->
"<subject>" ++
v.s ! VI (VInfin Act) ++ v.part ++
v.c2.s ++ "<object>" ++
"that" ++ "<question>";
FeatV2A = \v ->
"<subject>" ++
v.s ! VI (VInfin Act) ++ v.part ++
v.c2.s ++ "<object>" ++
"<adjective>";
FeatVV = \v ->
"<subject>" ++
v.s ! VI (VInfin Act) ++ v.part ++
"<verb>" ;
FeatVS = \v ->
"<subject>" ++
v.s ! VI (VInfin Act) ++ v.part ++
"that" ++ "<sentence>";
FeatVQ = \v ->
"<subject>" ++
v.s ! VI (VInfin Act) ++ v.part ++
"<question>";
FeatVA = \v ->
"<subject>" ++
v.s ! VI (VInfin Act) ++ v.part ++
"<adjective>";
}