From 013bbded12194c683b96569d302b876409c08438 Mon Sep 17 00:00:00 2001 From: Correl Roush Date: Mon, 2 Jun 2014 11:41:46 -0400 Subject: [PATCH] Exercise 1.41 --- 1-3.org | 16 +++++++++++++++- 1 file changed, 15 insertions(+), 1 deletion(-) diff --git a/1-3.org b/1-3.org index 3f6f723..426f221 100644 --- a/1-3.org +++ b/1-3.org @@ -577,7 +577,21 @@ layout: org #+begin_src scheme (((double (double double)) inc) 5) #+end_src - + + ---------------------------------------------------------------------- + + #+begin_src scheme :tangle yes + ;; ------------------------------------------------------------------- + ;; Exercise 1.41 + ;; ------------------------------------------------------------------- + + (define (double f) + (lambda (x) (f (f x)))) + + (((double (double double)) inc) 5) + ;Value: 21 + + #+end_src ** Exercise 1.42 Let f and g be two one-argument functions. The "composition" f after g is defined to be the function x |-> f(g(x)). Define a