| author | Alpar Juttner <alpar@cs.elte.hu> |
| Mon, 06 Dec 2010 13:09:21 +0100 | |
| changeset 1 | c445c931472f |
| permissions | -rw-r--r-- |
| alpar@1 | 1 |
/* ========================================================================= */ |
| alpar@1 | 2 |
/* === AMD_defaults ======================================================== */ |
| alpar@1 | 3 |
/* ========================================================================= */ |
| alpar@1 | 4 |
|
| alpar@1 | 5 |
/* ------------------------------------------------------------------------- */ |
| alpar@1 | 6 |
/* AMD, Copyright (c) Timothy A. Davis, */ |
| alpar@1 | 7 |
/* Patrick R. Amestoy, and Iain S. Duff. See ../README.txt for License. */ |
| alpar@1 | 8 |
/* email: davis at cise.ufl.edu CISE Department, Univ. of Florida. */ |
| alpar@1 | 9 |
/* web: http://www.cise.ufl.edu/research/sparse/amd */ |
| alpar@1 | 10 |
/* ------------------------------------------------------------------------- */ |
| alpar@1 | 11 |
|
| alpar@1 | 12 |
/* User-callable. Sets default control parameters for AMD. See amd.h |
| alpar@1 | 13 |
* for details. |
| alpar@1 | 14 |
*/ |
| alpar@1 | 15 |
|
| alpar@1 | 16 |
#include "amd_internal.h" |
| alpar@1 | 17 |
|
| alpar@1 | 18 |
/* ========================================================================= */ |
| alpar@1 | 19 |
/* === AMD defaults ======================================================== */ |
| alpar@1 | 20 |
/* ========================================================================= */ |
| alpar@1 | 21 |
|
| alpar@1 | 22 |
GLOBAL void AMD_defaults |
| alpar@1 | 23 |
( |
| alpar@1 | 24 |
double Control [ ] |
| alpar@1 | 25 |
) |
| alpar@1 | 26 |
{
|
| alpar@1 | 27 |
Int i ; |
| alpar@1 | 28 |
|
| alpar@1 | 29 |
if (Control != (double *) NULL) |
| alpar@1 | 30 |
{
|
| alpar@1 | 31 |
for (i = 0 ; i < AMD_CONTROL ; i++) |
| alpar@1 | 32 |
{
|
| alpar@1 | 33 |
Control [i] = 0 ; |
| alpar@1 | 34 |
} |
| alpar@1 | 35 |
Control [AMD_DENSE] = AMD_DEFAULT_DENSE ; |
| alpar@1 | 36 |
Control [AMD_AGGRESSIVE] = AMD_DEFAULT_AGGRESSIVE ; |
| alpar@1 | 37 |
} |
| alpar@1 | 38 |
} |