INSTALL/second_NONE.f

   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 December 2016
  34 *
  35 *> \ingroup auxOTHERauxiliary
  36 *
  37 *  =====================================================================
  38       REAL FUNCTION SECOND( )
  39 *
  40 *  -- LAPACK auxiliary routine (version 3.7.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 *     December 2016
  44 *
  45 * =====================================================================
  46 *
  47       SECOND = 0.0E+0
  48       RETURN
  49 *
  50 *     End of SECOND
  51 *
  52       END