X-Git-Url: http://lambda.jimpryor.net/git/gitweb.cgi?p=lambda.git;a=blobdiff_plain;f=assignment1.mdwn;h=560d288ebc4e7687af786a57f1eccb4a67b05fca;hp=bbb393b9546d68b8986cedf5a3f1a8010973eed0;hb=8f9abe589a3b7c615b72adc6cbf57e7de1d931d3;hpb=2e244b24ef343b5d85a25fc50b5058a1f221f178;ds=sidebyside diff --git a/assignment1.mdwn b/assignment1.mdwn index bbb393b9..560d288e 100644 --- a/assignment1.mdwn +++ b/assignment1.mdwn @@ -41,6 +41,7 @@ evaluates to 10. * Define an "and" operator. * Define an "xor" operator. + (If you haven't seen this term before, here's a truth table: true xor true = false @@ -83,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: