1
0
forked from GitHub/gf-core

refinementsNep-11-06-27

This commit is contained in:
virk.shafqat
2011-06-27 14:55:51 +00:00
parent a98d4bb0aa
commit a7fede8ee4
21 changed files with 113 additions and 71 deletions

View File

@@ -13,7 +13,9 @@ concrete SentenceNep of Sentence = CatNep ** open Prelude, ResNep in {
s = \\pol,n =>
let
agr = Ag Masc (numImp n) Pers2_M ;
--verb = vp.obj.s ++ (vp.s ! PVForm).inf ++ vp.comp ! agr ;
verb = vp.obj.s ++ (vp.s ! Root).inf ++ vp.comp ! agr ;
--verb = vp.obj.s ++ vp.comp ! agr ++ (vp.s ! Root).inf ;
dont = case pol of {
CNeg True => "नगर" ;
CNeg False => "नगर" ;