From dc1ef25f1a7f8e36e93928e5b0288e203833e14a Mon Sep 17 00:00:00 2001 From: Jan Tuomi Date: Fri, 18 Feb 2022 09:39:53 +0200 Subject: Clean up --- samples/recursion.sample | 7 ------- 1 file changed, 7 deletions(-) delete mode 100644 samples/recursion.sample (limited to 'samples/recursion.sample') diff --git a/samples/recursion.sample b/samples/recursion.sample deleted file mode 100644 index 7dc833b..0000000 --- a/samples/recursion.sample +++ /dev/null @@ -1,7 +0,0 @@ -define factorial --- Integer -> Integer - dup 0 eq? not - [ dup 1 - factorial * ] - [ drop 1 ] cond ; - -5 factorial . -- cgit v1.3