get_crown_age function

Obtain the crown age of a phylogeny.