Skip to content
Browse files

Sum of Pairs: Scheme solution by me

  • Loading branch information...
1 parent 03a7c93 commit 4469a517c439b6d2346ee3e2659ff36be4b00f29 @apauley committed Sep 17, 2009
Showing with 4 additions and 0 deletions.
  1. +4 −0 CodeSnippets/SumPairs/sumpairs.scm
View
4 CodeSnippets/SumPairs/sumpairs.scm
@@ -0,0 +1,4 @@
+; Scheme solution by Andreas Pauley
+
+(define a '(1 2 3 4 5))
+(map + (cdr a) (reverse (cdr (reverse a))))

0 comments on commit 4469a51

Please sign in to comment.
Something went wrong with that request. Please try again.