From 11a550753ae31714fb4618c2cf6d2acd5e7ae712 Mon Sep 17 00:00:00 2001 From: Camil Staps Date: Sat, 24 Sep 2016 14:57:17 +0200 Subject: Removed strictness --- examples/strict.fusp | 10 ---------- 1 file changed, 10 deletions(-) delete mode 100644 examples/strict.fusp (limited to 'examples') diff --git a/examples/strict.fusp b/examples/strict.fusp deleted file mode 100644 index 5795112..0000000 --- a/examples/strict.fusp +++ /dev/null @@ -1,10 +0,0 @@ -sub a b = code sub a b; - -take 0 _ = []; -take _ [] = []; -take n ![x:xs] = [x:take (sub 1 n) xs]; - -repeat 0 x = []; -repeat n x = [x:repeat (sub 1 n) x]; - -main = take 1 (repeat 200 5); -- cgit v1.2.3