K-Ar dating calculation