force.ultrametric function

Coerces a phylogenetic tree to be ultrametric