Change ultrametric test algorithm

Before, it used to check whether the root-to-tip lengths were
equal to each other within some tolerance. Now, following the
implementation in the ape package in R, it checks whether the
variance of the root-to-tip lengths is less than some tolerance.