From 7b7bf727da3250907284368b98b0083a4b4e2386 Mon Sep 17 00:00:00 2001 From: mryouse Date: Sat, 3 Jun 2023 20:22:18 +0000 Subject: initial commit --- rosetta/sum-of-squares.neb | 2 ++ 1 file changed, 2 insertions(+) create mode 100644 rosetta/sum-of-squares.neb (limited to 'rosetta/sum-of-squares.neb') diff --git a/rosetta/sum-of-squares.neb b/rosetta/sum-of-squares.neb new file mode 100644 index 0000000..be76194 --- /dev/null +++ b/rosetta/sum-of-squares.neb @@ -0,0 +1,2 @@ +(func sum-of-squares (lst :[:int]) + (reduce + (map (lambda (x) (* x x)) lst) 0)) -- cgit v1.2.3