LAPACK  3.6.1
LAPACK: Linear Algebra PACKage
real function second ( )

SECOND Using ETIME

SECOND returns nothing

SECOND Using the INTERNAL function ETIME.

SECOND Using INTERNAL function CPU_TIME.

SECOND Using ETIME_

Purpose: 
  SECOND returns the user time for a process in seconds.
  This version gets the time from the EXTERNAL system function ETIME.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Purpose: 
  SECOND returns the user time for a process in seconds.
  This version gets the time from the system function ETIME_.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Purpose: 
  SECOND returns the user time for a process in seconds.
  This version gets the time from the INTERNAL function CPU_TIME.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
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.
Date
November 2011
Purpose: 
  SECOND returns nothing instead of returning the user time for a process in seconds.
  If you are using that routine, it means that neither EXTERNAL ETIME,
  EXTERNAL ETIME_, INTERNAL ETIME, INTERNAL CPU_TIME is available  on
  your machine.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011

Definition at line 37 of file second_EXT_ETIME.f.

37 *
38 * -- LAPACK auxiliary routine (version 3.4.0) --
39 * -- LAPACK is a software package provided by Univ. of Tennessee, --
40 * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
41 * November 2011
42 *
43 * =====================================================================
44 *
45 * .. Local Scalars ..
46  REAL t1
47 * ..
48 * .. Local Arrays ..
49  REAL tarray( 2 )
50 * ..
51 * .. External Functions ..
52  REAL etime
53  EXTERNAL etime
54 * ..
55 * .. Executable Statements ..
56 *
57  t1 = etime( tarray )
58  second = tarray( 1 )
59  RETURN
60 *
61 * End of SECOND
62 *
second
real function second()
SECOND Using ETIME
Definition: second_EXT_ETIME.f:37

Here is the caller graph for this function: