fixed the linearization for both7and_Conj and either7or_Conj

This commit is contained in:
krasimir
2008-06-13 13:57:50 +00:00
parent 85606ec32b
commit 6080d7f384
5 changed files with 40 additions and 29 deletions

View File

@@ -578,4 +578,10 @@ resource ResBul = ParamX ** open Prelude in {
GSg Neut => "òîâà" ;
GPl => "òåçè"
} ;
linCoord : Bool => Str ;
linCoord = table {True => "è"; False=>"èëè"} ;
linCoordSep : Str -> Bool => Bool => Str ;
linCoordSep s = table {True => linCoord; False=> \\_ => s} ;
}