X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=randdist%2Ftest.icl;fp=randdist%2Ftest.icl;h=0000000000000000000000000000000000000000;hb=4b62b5d397d86147e393c05b3083af74a3a0c4af;hp=0f38841913d705a508a94136897b431c3bd09e82;hpb=e5305ee9d4290e1aa803a2e62a14f32e5cd29782;p=clean-tests.git

diff --git a/randdist/test.icl b/randdist/test.icl
deleted file mode 100644
index 0f38841..0000000
--- a/randdist/test.icl
+++ /dev/null
@@ -1,14 +0,0 @@
-module test
-
-import Data.Func, Math.Random
-import StdArray, StdList, StdFunc, StdArrayExtensions
-
-num :== 1000000
-lim :== 100
-
-Start :: {!Int}
-Start
-	= foldl (flip (updateArrElt inc)) (createArray lim 0)
-	$ map (flip (rem) lim)
-	$ take num
-	$ genRandInt 42