tested an idea in Finnish, failed

This commit is contained in:
aarne
2006-06-16 14:49:47 +00:00
parent 7c8f3d1cf4
commit 6aafec44dc

View File

@@ -61,7 +61,8 @@ concrete IdiomFin of Idiom = CatFin **
ImpPl1 vp =
let vps = vp.s ! VIPass ! Simul ! Pos ! {n = Pl ; p = P1}
in
{s = vps.fin ++ vps.inf ++ vp.s2 ! True ! Pos ! {n = Pl ; p = P1} ++ vp.ext
{s = vps.fin ++ vps.inf ++
vp.s2 ! True ! Pos ! {n = Pl ; p = P1} ++ vp.ext
} ;
oper