CompoundAP in translator/Extensions, e.g. language(-)independent. Implemented for all but Bul,Hin

This commit is contained in:
aarne
2014-04-13 10:37:58 +00:00
parent df7e50b5fb
commit 677c5cdac9
21 changed files with 63 additions and 17 deletions

View File

@@ -52,6 +52,10 @@ lin
h = cn.h
} ;
CompoundAP noun adj = {
s = \\_ => (snoun2nounSep {s = \\f => noun.s ! 10 ++ BIND ++ adj.s ! Posit ! sAN f ; h = adj.h}).s
} ;
---- PastPartAP vp = {s = \\_,nf => (sverb2verbSep v).s ! PastPartPass (AN nf)} ;
PredVPosv np vp = mkCl np vp ; ----