4.3BSD/usr/contrib/apl/lib/fn/time

time prog; FtiFm
FtiFm { NB21
E prog
L { ''
L { 'execution time is',(,B (.01XS((BN21)-FtiFm)%.6)), ' secs.'
''