Amesos Package Browser (Single Doxygen Collection) Development
amesos_camd_control.c
Go to the documentation of this file.
00001 /* ========================================================================= */
00002 /* === CAMD_control ======================================================== */
00003 /* ========================================================================= */
00004 
00005 /* ------------------------------------------------------------------------- */
00006 /* CAMD, Copyright (c) Timothy A. Davis, Yanqing Chen,           */
00007 /* Patrick R. Amestoy, and Iain S. Duff.  See ../README.txt for License.     */
00008 /* email: davis at cise.ufl.edu    CISE Department, Univ. of Florida.        */
00009 /* web: http://www.cise.ufl.edu/research/sparse/camd                         */
00010 /* ------------------------------------------------------------------------- */
00011 
00012 /* User-callable.  Prints the control parameters for CAMD.  See camd.h
00013  * for details.  If the Control array is not present, the defaults are
00014  * printed instead.
00015  */
00016 
00017 #include "amesos_camd_internal.h"
00018 
00019 GLOBAL void CAMD_control
00020 (
00021     double Control [ ]
00022 )
00023 {
00024     double alpha ;
00025     Int aggressive ;
00026 
00027     if (Control != (double *) NULL)
00028     {
00029   alpha = Control [CAMD_DENSE] ;
00030   aggressive = Control [CAMD_AGGRESSIVE] != 0 ;
00031     }
00032     else
00033     {
00034   alpha = CAMD_DEFAULT_DENSE ;
00035   aggressive = CAMD_DEFAULT_AGGRESSIVE ;
00036     }
00037 
00038     PRINTF (("\ncamd version %d.%d, %s:  approximate minimum degree ordering:\n"
00039   "    dense row parameter: %g\n", CAMD_MAIN_VERSION, CAMD_SUB_VERSION,
00040   CAMD_DATE, alpha)) ;
00041 
00042     if (alpha < 0)
00043     {
00044   PRINTF (("    no rows treated as dense\n")) ;
00045     }
00046     else
00047     {
00048   PRINTF ((
00049   "    (rows with more than max (%g * sqrt (n), 16) entries are\n"
00050   "    considered \"dense\", and placed last in output permutation)\n",
00051   alpha)) ;
00052     }
00053 
00054     if (aggressive)
00055     {
00056   PRINTF (("    aggressive absorption:  yes\n\n")) ;
00057     }
00058     else
00059     {
00060   PRINTF (("    aggressive absorption:  no\n\n")) ;
00061     }
00062 }
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Defines