1
0
forked from GitHub/gf-rgl
This commit is contained in:
janna
2006-06-09 11:10:43 +00:00
parent 1196d4e6a3
commit a4dbe71899
5 changed files with 182 additions and 116 deletions

View File

@@ -57,7 +57,7 @@ concrete SentenceRus of Sentence = CatRus ** open Prelude, ResRus in {
SlashPrep cl p = {s=cl.s; s2=p.s; c=p.c} ;
ImpVP inf = {s = \\pol, g,n =>
let
let
dont = case pol of {
Neg => "не" ;
_ => []