+
+ <!--
+ Or in Y1of3, Y2of3, Y3of3 form:
+
+ let Yv = \ff. Y (\v g h. ff ( v g h) g h) in
+ 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 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
+ D
+ -->
+