LAPACK  3.10.1
LAPACK: Linear Algebra PACKage

◆ second()

real function second

SECOND Using the INTERNAL function ETIME.

Purpose:
  SECOND returns the user time for a process in seconds.
  This version gets the time from the INTERNAL function ETIME.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.

Definition at line 34 of file second_INT_ETIME.f.

35 *
36 * -- LAPACK auxiliary routine --
37 * -- LAPACK is a software package provided by Univ. of Tennessee, --
38 * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
39 *
40 * =====================================================================
41 *
42 * .. Local Scalars ..
43  REAL T1
44 * ..
45 * .. Local Arrays ..
46  REAL TARRAY( 2 )
47 * ..
48 * .. Intrinsic Functions ..
49  REAL ETIME
50  INTRINSIC etime
51 * ..
52 * .. Executable Statements ..
53 *
54  t1 = etime( tarray )
55  second = tarray( 1 )
56  RETURN
57 *
58 * End of SECOND
59 *
real function second()
SECOND Using ETIME
Here is the call graph for this function: