second()

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.

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.

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.

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.

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.

Definition at line 34 of file second_EXT_ETIME.f.

*
*  -- LAPACK auxiliary routine --
*  -- LAPACK is a software package provided by Univ. of Tennessee,    --
*  -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
*
* =====================================================================
*
*     .. 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 call graph for this function:

Here is the caller graph for this function: