Fortran: melhor maneira de cronometrar seções do seu código?

Às vezes, ao otimizar o código, é necessário cronometrar determinadas partes do código, eu venho usando o seguinte há anos, mas fiquei imaginando se existe uma maneira melhor / mais simples de fazer isso? call system_clock(count_rate=clock_rate) !Find the time rate call