X-Git-Url: http://lambda.jimpryor.net/git/gitweb.cgi?a=blobdiff_plain;f=week1.mdwn;h=6b9dd41f4fe6e1aa4d68019de45a5cd7866096ae;hb=c73a02174f69cc7d96bdfa080caf5343b9486389;hp=1765c6b1d97bdba7046a7772aab164399cbe9a19;hpb=8a3b979f1f663fae452ba677e394acd329ee2e2d;p=lambda.git diff --git a/week1.mdwn b/week1.mdwn index 1765c6b1..6b9dd41f 100644 --- a/week1.mdwn +++ b/week1.mdwn @@ -561,9 +561,9 @@ It may be helpful to contrast these recursive-style definitons to the way one wo   `tail match` λ `xs.` *this definition left as an exercise*;   `length match` λ `xs. let`                                          `n := 0;` -              `while not (empty? xs) do` -                `n := n + 1;` -                `xs := tail xs` -              `end` -            `in n` +                                         `while not (empty? xs) do` +                                           `n := n + 1;` +                                           `xs := tail xs` +                                         `end` +                                      `in n`