add one more conjunction

2018-08-07 11:49:22 +02:00
parent e6f924d597
commit 5bb454454a
5 changed files with 15 additions and 15 deletions
@@ -112,7 +112,7 @@ lin

 lincat
  VPS   = {s : Agr => Str} ;
-  [VPS] = {s : Bool => Ints 3 => Agr => Str} ;
+  [VPS] = {s : Bool => Ints 4 => Agr => Str} ;

 lin
  BaseVPS x y = {s  = \\d,t,a=>x.s!a++linCoord!t++y.s!a} ;