($result, $linkdist) = Algorithm::Cluster::treecluster(%param);