LAPACK
3.7.0
LAPACK: Linear Algebra PACKage
Main Page
Modules
Data Types List
Files
File List
File Members
dsecnd_INT_ETIME.f
Go to the documentation of this file.
1
*> \brief \b DSECND Using the INTERNAL function ETIME.
2
*
3
* =========== DOCUMENTATION ===========
4
*
5
* Online html documentation available at
6
* http://www.netlib.org/lapack/explore-html/
7
*
8
* Definition:
9
* ===========
10
*
11
* DOUBLE PRECISION FUNCTION DSECND( )
12
*
13
*
14
*> \par Purpose:
15
* =============
16
*>
17
*> \verbatim
18
*>
19
*> DSECND returns the user time for a process in seconds.
20
*> This version gets the time from the INTERNAL function ETIME.
21
*> \endverbatim
22
*
23
* Authors:
24
* ========
25
*
26
*> \author Univ. of Tennessee
27
*> \author Univ. of California Berkeley
28
*> \author Univ. of Colorado Denver
29
*> \author NAG Ltd.
30
*
31
*> \date December 2016
32
*
33
*> \ingroup auxOTHERauxiliary
34
*
35
* =====================================================================
36
DOUBLE PRECISION
FUNCTION
dsecnd
( )
37
*
38
* -- LAPACK auxiliary routine (version 3.7.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
* December 2016
42
*
43
* =====================================================================
44
*
45
* .. Local Scalars ..
46
REAL
T1
47
* ..
48
* .. Local Arrays ..
49
REAL
TARRAY( 2 )
50
* ..
51
* .. Intrinsic Functions ..
52
REAL
ETIME
53
INTRINSIC
etime
54
* ..
55
* .. Executable Statements ..
56
*
57
t1 = etime( tarray )
58
dsecnd
= tarray( 1 )
59
RETURN
60
*
61
* End of DSECND
62
*
63
END
dsecnd
double precision function dsecnd()
DSECND Using ETIME
Definition:
dsecnd_EXT_ETIME.f:37
INSTALL
dsecnd_INT_ETIME.f
Generated on Fri Dec 23 2016 15:28:06 for LAPACK by
1.8.10