From 0248ed34ce3d05228bc5084669c3a27933be0c2e Mon Sep 17 00:00:00 2001
From: Nathan Lasseter <nathan.je.lasseter@googlemail.com>
Date: Sun, 4 Oct 2009 00:56:56 +0100
Subject: first commit

---
 p20e | 4 ++++
 1 file changed, 4 insertions(+)
 create mode 100755 p20e

(limited to 'p20e')

diff --git a/p20e b/p20e
new file mode 100755
index 0000000..34f984d
--- /dev/null
+++ b/p20e
@@ -0,0 +1,4 @@
+#! /usr/bin/env escript
+
+main(_) -> io:format("~w~n",[lists:sum([X-48 || X <- integer_to_list(fact(100))])]).
+fact(1) -> 1; fact(X) -> X * fact(X-1).
-- 
cgit v1.2.3