move NumeralX.inc to ParamX since it is used in many places

2026-03-03 14:34:52 +01:00
parent 8e780d6263
commit 761597ad8c
25 changed files with 13 additions and 115 deletions
@@ -109,11 +109,6 @@ lin pot3plus n m = {
      _  => BIND
      } ;

-    inc : DTail -> DTail = \t -> case t of {
-      T1 => T2 ;
-      T2 => T3 ;
-      T3 => T1
-      } ;
 ------------------ :) what a releif 

    mk2Dig : Str -> Str -> TDigit = \c,o -> mk3Dig c o  ;