LAPACK  3.4.2
LAPACK: Linear Algebra PACKage
 All Files Functions Groups
second_NONE.f
Go to the documentation of this file.
1 *> \brief \b SECOND returns nothing
2 *
3 * =========== DOCUMENTATION ===========
4 *
5 * Online html documentation available at
6 * http://www.netlib.org/lapack/explore-html/
7 *
8 * Definition:
9 * ===========
10 *
11 * REAL FUNCTION SECOND( )
12 *
13 *
14 *> \par Purpose:
15 * =============
16 *>
17 *> \verbatim
18 *>
19 *> SECOND returns nothing instead of returning the user time for a process in seconds.
20 *> If you are using that routine, it means that neither EXTERNAL ETIME,
21 *> EXTERNAL ETIME_, INTERNAL ETIME, INTERNAL CPU_TIME is available on
22 *> your machine.
23 *> \endverbatim
24 *
25 * Authors:
26 * ========
27 *
28 *> \author Univ. of Tennessee
29 *> \author Univ. of California Berkeley
30 *> \author Univ. of Colorado Denver
31 *> \author NAG Ltd.
32 *
33 *> \date November 2011
34 *
35 *> \ingroup auxOTHERauxiliary
36 *
37 * =====================================================================
38  REAL FUNCTION second( )
39 *
40 * -- LAPACK auxiliary routine (version 3.4.0) --
41 * -- LAPACK is a software package provided by Univ. of Tennessee, --
42 * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
43 * November 2011
44 *
45 * =====================================================================
46 *
47  second = 0.0e+0
48  return
49 *
50 * End of SECOND
51 *
52  END