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 53