FTIMER - time your program's procedure calls.

Usage:

CALL FTIMER    (in main program)
  (or)
$  USE   FTIMER  (after $ OPTION FORT77)
  (or)
or specify Use=ftimer on the F77 command.

In addition you must specify the +FDS and +SlowFormat options on the F77 command, or the CLEAR and OLDFORMAT options on the $FORT77 card in batch.

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; however, results in TSS may not be too accurate, because of the poor resolution of DRL TIME.

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