FTIMER - time your program's procedure calls.

Usage:

CALL FTIMER    (in main program)
  (or)
$  USE   FTIMER  (after $ OPTION FORTRAN)

Description:

For each subroutine in your program, FTIMER provides the number of times it was called, the time consumed by it alone and by it along with the subsidiary routines it may have called, the percentage of total execution time, and the average time per call. FTIMER also attempts to account for its own overhead, but results in TSS may not be too accurate, because of the poor resolution of DRL TIME.

Owing to the way FTIMER is implemented, calls to FDUMP and FDEBUG are ignored if FTIMER is bound in with your program.