add one more conjunction

This commit is contained in:
Krasimir Angelov
2018-08-07 11:49:22 +02:00
parent e6f924d597
commit 5bb454454a
5 changed files with 15 additions and 15 deletions
+3 -3
View File
@@ -827,10 +827,10 @@ resource ResBul = ParamX ** open Prelude, Predef in {
GPl => "òåçè"
} ;
linCoord : Ints 3 => Str ;
linCoord = table {0 => "è"; 1=>"èëè"; 2=>"íèòî"; 3=>"íî"} ;
linCoord : Ints 4 => Str ;
linCoord = table {0 => "è"; 1=>"èëè"; 2=>"íèòî"; 3=>"íî"; 4=>"âìåñòî"} ;
linCoordSep : Str -> Bool => Ints 3 => Str ;
linCoordSep : Str -> Bool => Ints 4 => Str ;
linCoordSep s = table {True => linCoord; False=> \\_ => s} ;
hyphen : Str = SOFT_BIND ++ "-" ++ SOFT_BIND ;