refinemtsParseUrd

This commit is contained in:
virk.shafqat
2012-11-06 16:43:31 +00:00
parent d441b2c629
commit 64cbf59dac
3 changed files with 60 additions and 58 deletions

View File

@@ -85,7 +85,7 @@ ComplVV v a p vp = insertTrans (insertVV (infVV v.isAux vp) (predV v) vp.embComp
} ;
-}
CompVP ant p vp = {s = \\a => ant.s ++ p.s ++
infVP False vp a} ;
infVP False vp a} ; -- check for vp.isAux
that_RP = {
s = \\_,_ => "kh" ;