LAPACK
3.5.0
LAPACK: Linear Algebra PACKage
Main Page
Files
File List
File Members
All
Files
Functions
Typedefs
Macros
dsecnd_EXT_ETIME_.f
Go to the documentation of this file.
1
*> \brief \b DSECND Using 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 system 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 November 2011
32
*
33
*> \ingroup auxOTHERauxiliary
34
*
35
* =====================================================================
36
DOUBLE PRECISION
FUNCTION
dsecnd
( )
37
*
38
* -- LAPACK auxiliary routine (version 3.4.0) --
39
* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd..
40
* February 2007
41
* =====================================================================
42
*
43
* .. Local Scalars ..
44
REAL
T1
45
* ..
46
* .. Local Arrays ..
47
REAL
TARRAY( 2 )
48
* ..
49
* .. External Functions ..
50
REAL
ETIME_
51
EXTERNAL
etime_
52
* ..
53
* .. Executable Statements ..
54
*
55
t1 = etime_( tarray )
56
dsecnd
= tarray( 1 )
57
RETURN
58
*
59
* End of DSECND
60
*
61
END
dsecnd
double precision function dsecnd()
DSECND Using ETIME
Definition:
dsecnd_EXT_ETIME.f:36
install
dsecnd_EXT_ETIME_.f
Generated on Wed Oct 15 2014 20:02:22 for LAPACK by
1.8.8