X-Git-Url: http://lambda.jimpryor.net/git/gitweb.cgi?p=lambda.git;a=blobdiff_plain;f=assignment1.mdwn;h=560d288ebc4e7687af786a57f1eccb4a67b05fca;hp=b65cc177f76ebe872a1897d574068ce013b72def;hb=8f9abe589a3b7c615b72adc6cbf57e7de1d931d3;hpb=7958db26a9129e5264f05f835090ae894b4f828b diff --git a/assignment1.mdwn b/assignment1.mdwn index b65cc177..560d288e 100644 --- a/assignment1.mdwn +++ b/assignment1.mdwn @@ -84,8 +84,8 @@ To extract the first element of a pair p, you write: Here are some defintions in Racket: (define make-pair (lambda (fst) (lambda (snd) (lambda (f) ((f fst) snd))))) - (define get-first (lamda (fst) (lambda (snd) fst))) - (define get-second (lamda (fst) (lambda (snd) snd))) + (define get-first (lambda (fst) (lambda (snd) fst))) + (define get-second (lambda (fst) (lambda (snd) snd))) Now we can write: