Redo make-random-binary using Yule-Harding model
Add tree-make-ultrametric function