A timing function

A nanosecond (actually 10ns) resolution timing function that return a number of seconds with high resolution. Using weak symbols in can be called from both C and Fortran.