\documentclass{ppex}
\nonstopmode
\usepackage [graph,frame]{xy}
\pagestyle{empty}
\setlength\textwidth{183.0pt}
\begin{document}
\ResetPreambleCommands
\ReadyForTheFray
\usepackage [graph,frame]{xy}
\[\xygraph{
[] *+[o]+[F]{1}
 (-[dl] *+=[o]+[F]{11}
 ,-[d]  *+=[o]+[F]{12}
   (-[dl] *+=[o]+[F]{121}
   ,-[d]  *+=[o]+[F]{122}
   ,-[dr] *+=[o]+[F]{123}
   )
 ,-[dr] *+=[o]+[F]{13}
 )
}\]
\end{document}