added constant SECONDS_PER_HOUR = 3600.d0