\setlength{\unitlength}{0.01cm} \nop{ } \nop{ } \begin{picture}(1050,750)(0,0) \small \bezier{100}(290,615)(290,615)(160,510) \bezier{100}(310,615)(310,615)(440,510) \bezier{100}(440,490)(440,490)(310,385) \bezier{100}(460,490)(460,490)(590,385) \bezier{100}(590,365)(590,365)(460,260) \bezier{100}(610,365)(610,365)(740,260) \bezier{100}(440,240)(440,240)(310,135) \put(300,625){ . \makebox(0,0)[l]{ <- number(X), X = s(s(0)) } } \put(140,500){ . \makebox(0,0)[l]{ <- X = s(s(0)) } } \put(450,500){ . \makebox(0,0)[l]{ <- number(s(X1)) } } \put(290,375){ . \makebox(0,0)[l]{ <- X = s(s(0)) } } \put(440,240){ . \makebox(0,0)[l]{ <- X = s(s(0)) } } \put(600,375){ . \makebox(0,0)[l]{ <- number(s(s(X2))) } } \put(300,115){ \makebox(0,0)[t]{ [] } } \put(750,250){ . \makebox(0,0)[l]{ <- number(s(s(s(X3)))) } } \put(215,562){\makebox(0,0)[r]{ \footnotesize {X/0} } } \put(385,562){\makebox(0,0)[l]{ \footnotesize {X/s(X1)} } } \put(365,437){\makebox(0,0)[r]{ \footnotesize {X1/0} } } \put(535,437){\makebox(0,0)[l]{ \footnotesize {X1/s(X2)} } } \put(515,312){\makebox(0,0)[r]{ \footnotesize {X2/0} } } \put(685,312){\makebox(0,0)[l]{ \footnotesize {X2/s(X3)} } } \end{picture}