Как рассчитать максимальную высоту дерева в полученном лесу?

Question

for i from 1 to 60:
  MakeSet(i)
for i from 1 to 30:
  Union(i, 2*i)
for i from 1 to 20:
  Union(i, 3*i)
for i from 1 to 12:
  Union(i, 5*i)
for i from 1 to 60:
  Find(i)

Предположим, что структура данных непересекающихся множеств реализована в виде непересекающихся деревьев с объединением по рангу heuristi c и с heuristi сжатия пути c.

Вычисление максимальной высоты дерева в результирующий лес.