real function second

(

)

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

December 2016

Definition at line 37 of file second_EXT_ETIME.f.

*
*  -- LAPACK auxiliary routine (version 3.7.0) --
*  -- LAPACK is a software package provided by Univ. of Tennessee,    --
*  -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
*     December 2016
*
* =====================================================================
*
*     .. Local Scalars ..
      REAL               t1
*     ..
*     .. Local Arrays ..
      REAL               tarray( 2 )
*     ..
*     .. External Functions ..
      REAL               etime
      EXTERNAL           etime
*     ..
*     .. Executable Statements ..
*
      t1 = etime( tarray )
      second = tarray( 1 )
      RETURN
*
*     End of SECOND
*

Here is the caller graph for this function: