X-Git-Url: http://lambda.jimpryor.net/git/gitweb.cgi?p=lambda.git;a=blobdiff_plain;f=hints%2Fassignment_4_hint_3_alternate_1.mdwn;h=ca4f9f5a6daabcccd3602dc735432218bf0b5ec4;hp=c8bb62c51fafc17b85aa54e62166fb90b6a3ff77;hb=d6c8426cbbb0f40315cd0b2e9e4f27021d12da66;hpb=d437f108ffa48fa141665ffb0b836a9ad53093e7 diff --git a/hints/assignment_4_hint_3_alternate_1.mdwn b/hints/assignment_4_hint_3_alternate_1.mdwn index c8bb62c5..ca4f9f5a 100644 --- a/hints/assignment_4_hint_3_alternate_1.mdwn +++ b/hints/assignment_4_hint_3_alternate_1.mdwn @@ -48,7 +48,7 @@ Alternate strategy for Y1, Y2 let Yw = \ff gg. Y ( \w h. (\g. gg (Yv ff g h) g h) ( w h)) in let Y3of3 = \ff gg hh. Y ( \h. (\g. hh (Yv ff g h) g h) (Yw ff gg h)) in let Y2of3 = \ff gg hh. Yw ff gg (Y3of3 ff gg hh) in - let Y1of3 = \ff gg hh. Yv ff (Y2of3 ff gg hh) (Y3of3 ff gg hh) in + let Y1of3 = \ff gg hh. Yv ff (Y2of3 ff gg hh) (Y3of3 ff gg hh) in let f = Y1of3 (\f g h. A) (\f g h. B) (\f g h. C) in let g = Y2of3 (\f g h. A) (\f g h. B) (\f g h. C) in let h = Y3of3 (\f g h. A) (\f g h. B) (\f g h. C) in