M tests/num.min → tests/num.min

@@ -40,6 +40,17 @@ 
   ((1 3 5 7) med 4.0 ==) assert
   ((1 3 5 7 9) med 5 ==) assert
 
+  ((1 5) range (1 2 3 4 5) ==) assert
+  ((5 1) range (5 4 3 2 1) ==) assert
+  ((4 7) range (4 5 6 7) ==) assert
+  ((7 4) range (7 6 5 4) ==) assert
+  ((1 6 2) range (1 3 5) ==) assert
+  ((1 6 3) range (1 4) ==) assert
+  ((0 6 2) range (0 2 4 6) ==) assert
+  ((6 1 2) range (6 4 2) ==) assert
+  ((6 1 3) range (6 3) ==) assert
+  ((6 0 2) range (6 4 2 0) ==) assert
+  
   (0 :c
     (c 10 <) (c succ @c) while
     c 10 ==) assert