8 extern Union *wards_cluster(float **clmat);
9 extern Union *neighbour_joining(float **clmat);
10 extern void printf_phylogeny(Union *tree, char *type);
13 /* Auxiliary information in a Union tree:
14 tree[0].set1 contains the number of elements of tree, i.e.,
15 tree[tree[0].set1-1]] is the last one !!