Ingested CCOLAMD 2.9.5 from April 1, 2016
dellaert
parent
bcf34f0fea
commit
2c7d2dfff4
|
|
@ -0,0 +1,49 @@
|
||||||
|
#-----------------------------------------------------------------------------
|
||||||
|
# compile the CCOLAMD demo
|
||||||
|
#-----------------------------------------------------------------------------
|
||||||
|
|
||||||
|
default: all
|
||||||
|
|
||||||
|
include ../../SuiteSparse_config/SuiteSparse_config.mk
|
||||||
|
|
||||||
|
I = -I../../include
|
||||||
|
|
||||||
|
C = $(CC) $(CF) $(I)
|
||||||
|
|
||||||
|
LIB2 = $(LDFLAGS) -L../../lib -lccolamd -lsuitesparseconfig $(LDLIBS)
|
||||||
|
|
||||||
|
all: library ccolamd_example ccolamd_l_example
|
||||||
|
|
||||||
|
library:
|
||||||
|
( cd ../../SuiteSparse_config ; $(MAKE) )
|
||||||
|
( cd ../Lib ; $(MAKE) )
|
||||||
|
|
||||||
|
#------------------------------------------------------------------------------
|
||||||
|
# Create the demo program, run it, and compare the output
|
||||||
|
#------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
dist:
|
||||||
|
|
||||||
|
ccolamd_example: ccolamd_example.c
|
||||||
|
$(C) -o ccolamd_example ccolamd_example.c $(LIB2)
|
||||||
|
- ./ccolamd_example > my_ccolamd_example.out
|
||||||
|
- diff ccolamd_example.out my_ccolamd_example.out
|
||||||
|
|
||||||
|
ccolamd_l_example: ccolamd_l_example.c
|
||||||
|
$(C) -o ccolamd_l_example ccolamd_l_example.c $(LIB2)
|
||||||
|
- ./ccolamd_l_example > my_ccolamd_l_example.out
|
||||||
|
- diff ccolamd_l_example.out my_ccolamd_l_example.out
|
||||||
|
|
||||||
|
#------------------------------------------------------------------------------
|
||||||
|
# Remove all but the files in the original distribution
|
||||||
|
#------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
clean:
|
||||||
|
- $(RM) -r $(CLEAN)
|
||||||
|
|
||||||
|
purge: distclean
|
||||||
|
|
||||||
|
distclean: clean
|
||||||
|
- $(RM) ccolamd_example ccolamd_l_example
|
||||||
|
- $(RM) my_ccolamd_example.out my_ccolamd_l_example.out
|
||||||
|
- $(RM) -r $(PURGE)
|
||||||
|
|
@ -5,8 +5,6 @@
|
||||||
/* ----------------------------------------------------------------------------
|
/* ----------------------------------------------------------------------------
|
||||||
* CCOLAMD Copyright (C), Univ. of Florida. Authors: Timothy A. Davis,
|
* CCOLAMD Copyright (C), Univ. of Florida. Authors: Timothy A. Davis,
|
||||||
* Sivasankaran Rajamanickam, and Stefan Larimore
|
* Sivasankaran Rajamanickam, and Stefan Larimore
|
||||||
* See License.txt for the Version 2.1 of the GNU Lesser General Public License
|
|
||||||
* http://www.cise.ufl.edu/research/sparse
|
|
||||||
* -------------------------------------------------------------------------- */
|
* -------------------------------------------------------------------------- */
|
||||||
|
|
||||||
/*
|
/*
|
||||||
|
|
|
||||||
|
|
@ -15,7 +15,7 @@ Column 3, with 2 entries:
|
||||||
row 1
|
row 1
|
||||||
row 3
|
row 3
|
||||||
|
|
||||||
ccolamd version 2.7, Jan 25, 2011: OK.
|
ccolamd version 2.9, Apr 1, 2016: OK.
|
||||||
ccolamd: number of dense or empty rows ignored: 0
|
ccolamd: number of dense or empty rows ignored: 0
|
||||||
ccolamd: number of dense or empty columns ignored: 0
|
ccolamd: number of dense or empty columns ignored: 0
|
||||||
ccolamd: number of garbage collections performed: 0
|
ccolamd: number of garbage collections performed: 0
|
||||||
|
|
@ -38,7 +38,7 @@ Column 3, with 1 entries:
|
||||||
row 4
|
row 4
|
||||||
Column 4, with 0 entries:
|
Column 4, with 0 entries:
|
||||||
|
|
||||||
csymamd version 2.7, Jan 25, 2011: OK.
|
csymamd version 2.9, Apr 1, 2016: OK.
|
||||||
csymamd: number of dense or empty rows ignored: 0
|
csymamd: number of dense or empty rows ignored: 0
|
||||||
csymamd: number of dense or empty columns ignored: 0
|
csymamd: number of dense or empty columns ignored: 0
|
||||||
csymamd: number of garbage collections performed: 0
|
csymamd: number of garbage collections performed: 0
|
||||||
|
|
|
||||||
|
|
@ -1,12 +1,10 @@
|
||||||
/* ========================================================================== */
|
/* ========================================================================== */
|
||||||
/* === ccolamd and csymamd example (UF_long integer version) ================ */
|
/* === ccolamd and csymamd example (long integer version) =================== */
|
||||||
/* ========================================================================== */
|
/* ========================================================================== */
|
||||||
|
|
||||||
/* ----------------------------------------------------------------------------
|
/* ----------------------------------------------------------------------------
|
||||||
* CCOLAMD Copyright (C), Univ. of Florida. Authors: Timothy A. Davis,
|
* CCOLAMD Copyright (C), Univ. of Florida. Authors: Timothy A. Davis,
|
||||||
* Sivasankaran Rajamanickam, and Stefan Larimore
|
* Sivasankaran Rajamanickam, and Stefan Larimore
|
||||||
* See License.txt for the Version 2.1 of the GNU Lesser General Public License
|
|
||||||
* http://www.cise.ufl.edu/research/sparse
|
|
||||||
* -------------------------------------------------------------------------- */
|
* -------------------------------------------------------------------------- */
|
||||||
|
|
||||||
/*
|
/*
|
||||||
|
|
@ -46,9 +44,6 @@
|
||||||
#define B_NNZ 4
|
#define B_NNZ 4
|
||||||
#define B_N 5
|
#define B_N 5
|
||||||
|
|
||||||
/* define UF_long */
|
|
||||||
#include "UFconfig.h"
|
|
||||||
|
|
||||||
int main (void)
|
int main (void)
|
||||||
{
|
{
|
||||||
|
|
||||||
|
|
@ -56,14 +51,14 @@ int main (void)
|
||||||
/* input matrix A definition */
|
/* input matrix A definition */
|
||||||
/* ====================================================================== */
|
/* ====================================================================== */
|
||||||
|
|
||||||
UF_long A [ALEN] = {
|
SuiteSparse_long A [ALEN] = {
|
||||||
|
|
||||||
0, 1, 4, /* row indices of nonzeros in column 0 */
|
0, 1, 4, /* row indices of nonzeros in column 0 */
|
||||||
2, 4, /* row indices of nonzeros in column 1 */
|
2, 4, /* row indices of nonzeros in column 1 */
|
||||||
0, 1, 2, 3, /* row indices of nonzeros in column 2 */
|
0, 1, 2, 3, /* row indices of nonzeros in column 2 */
|
||||||
1, 3} ; /* row indices of nonzeros in column 3 */
|
1, 3} ; /* row indices of nonzeros in column 3 */
|
||||||
|
|
||||||
UF_long p [ ] = {
|
SuiteSparse_long p [ ] = {
|
||||||
|
|
||||||
0, /* column 0 is in A [0..2] */
|
0, /* column 0 is in A [0..2] */
|
||||||
3, /* column 1 is in A [3..4] */
|
3, /* column 1 is in A [3..4] */
|
||||||
|
|
@ -75,7 +70,7 @@ int main (void)
|
||||||
/* input matrix B definition */
|
/* input matrix B definition */
|
||||||
/* ====================================================================== */
|
/* ====================================================================== */
|
||||||
|
|
||||||
UF_long B [ ] = { /* Note: only strictly lower triangular part */
|
SuiteSparse_long B [ ] = { /* Note: only strictly lower triangular part */
|
||||||
/* is included, since symamd ignores the */
|
/* is included, since symamd ignores the */
|
||||||
/* diagonal and upper triangular part of B. */
|
/* diagonal and upper triangular part of B. */
|
||||||
|
|
||||||
|
|
@ -85,7 +80,7 @@ int main (void)
|
||||||
4 /* row indices of nonzeros in column 3 */
|
4 /* row indices of nonzeros in column 3 */
|
||||||
} ; /* row indices of nonzeros in column 4 (none) */
|
} ; /* row indices of nonzeros in column 4 (none) */
|
||||||
|
|
||||||
UF_long q [ ] = {
|
SuiteSparse_long q [ ] = {
|
||||||
|
|
||||||
0, /* column 0 is in B [0] */
|
0, /* column 0 is in B [0] */
|
||||||
1, /* column 1 is in B [1..2] */
|
1, /* column 1 is in B [1..2] */
|
||||||
|
|
@ -98,10 +93,9 @@ int main (void)
|
||||||
/* other variable definitions */
|
/* other variable definitions */
|
||||||
/* ====================================================================== */
|
/* ====================================================================== */
|
||||||
|
|
||||||
UF_long perm [B_N+1] ; /* note the size is N+1 */
|
SuiteSparse_long perm [B_N+1] ; /* note the size is N+1 */
|
||||||
UF_long stats [CCOLAMD_STATS] ; /* for ccolamd and csymamd output stats */
|
SuiteSparse_long stats [CCOLAMD_STATS] ; /* ccolamd/csymamd output stats */
|
||||||
|
SuiteSparse_long row, col, pp, length, ok ;
|
||||||
UF_long row, col, pp, length, ok ;
|
|
||||||
|
|
||||||
/* ====================================================================== */
|
/* ====================================================================== */
|
||||||
/* dump the input matrix A */
|
/* dump the input matrix A */
|
||||||
|
|
|
||||||
|
|
@ -15,7 +15,7 @@ Column 3, with 2 entries:
|
||||||
row 1
|
row 1
|
||||||
row 3
|
row 3
|
||||||
|
|
||||||
ccolamd version 2.7, Jan 25, 2011: OK.
|
ccolamd version 2.9, Apr 1, 2016: OK.
|
||||||
ccolamd: number of dense or empty rows ignored: 0
|
ccolamd: number of dense or empty rows ignored: 0
|
||||||
ccolamd: number of dense or empty columns ignored: 0
|
ccolamd: number of dense or empty columns ignored: 0
|
||||||
ccolamd: number of garbage collections performed: 0
|
ccolamd: number of garbage collections performed: 0
|
||||||
|
|
@ -38,7 +38,7 @@ Column 3, with 1 entries:
|
||||||
row 4
|
row 4
|
||||||
Column 4, with 0 entries:
|
Column 4, with 0 entries:
|
||||||
|
|
||||||
csymamd version 2.7, Jan 25, 2011: OK.
|
csymamd version 2.9, Apr 1, 2016: OK.
|
||||||
csymamd: number of dense or empty rows ignored: 0
|
csymamd: number of dense or empty rows ignored: 0
|
||||||
csymamd: number of dense or empty columns ignored: 0
|
csymamd: number of dense or empty columns ignored: 0
|
||||||
csymamd: number of garbage collections performed: 0
|
csymamd: number of garbage collections performed: 0
|
||||||
|
|
|
||||||
|
|
@ -1,3 +1,37 @@
|
||||||
|
Apr 1, 2016: version 2.9.5
|
||||||
|
|
||||||
|
* licensing simplified (no other change); refer to CCOLAMD/Doc/License.txt
|
||||||
|
|
||||||
|
Feb 1, 2016: version 2.9.4
|
||||||
|
|
||||||
|
* update to Makefiles
|
||||||
|
|
||||||
|
Jan 30, 2016: version 2.9.3
|
||||||
|
|
||||||
|
* modifications to Makefiles
|
||||||
|
|
||||||
|
Jan 1, 2016: version 2.9.2
|
||||||
|
|
||||||
|
* modified Makefile to create shared libraries
|
||||||
|
No change to C code except version number.
|
||||||
|
The empty file ccolamd_global.c removed.
|
||||||
|
|
||||||
|
Oct 10, 2014: version 2.9.1
|
||||||
|
|
||||||
|
modified MATLAB/ccolamd_make.m. No change to C code except version number.
|
||||||
|
|
||||||
|
July 31, 2013: version 2.9.0
|
||||||
|
|
||||||
|
* changed malloc and printf pointers to use SuiteSparse_config
|
||||||
|
|
||||||
|
Jun 1, 2012: version 2.8.0
|
||||||
|
|
||||||
|
* changed from UFconfig to SuiteSparse_config
|
||||||
|
|
||||||
|
Dec 7, 2011: version 2.7.4
|
||||||
|
|
||||||
|
* fixed the Makefile to better align with CFLAGS and other standards
|
||||||
|
|
||||||
Jan 25, 2011: version 2.7.3
|
Jan 25, 2011: version 2.7.3
|
||||||
|
|
||||||
* minor fix to "make install"
|
* minor fix to "make install"
|
||||||
|
|
|
||||||
|
|
@ -0,0 +1,21 @@
|
||||||
|
CCOLAMD: constrained column approximate minimum degree ordering
|
||||||
|
Copyright (C) 2005-2016, Univ. of Florida. Authors: Timothy A. Davis,
|
||||||
|
Sivasankaran Rajamanickam, and Stefan Larimore. Closely based on COLAMD by
|
||||||
|
Davis, Stefan Larimore, in collaboration with Esmond Ng, and John Gilbert.
|
||||||
|
http://www.suitesparse.com
|
||||||
|
|
||||||
|
--------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
CCOLAMD is free software; you can redistribute it and/or
|
||||||
|
modify it under the terms of the GNU Lesser General Public
|
||||||
|
License as published by the Free Software Foundation; either
|
||||||
|
version 2.1 of the License, or (at your option) any later version.
|
||||||
|
|
||||||
|
CCOLAMD is distributed in the hope that it will be useful,
|
||||||
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||||
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
||||||
|
Lesser General Public License for more details.
|
||||||
|
|
||||||
|
You should have received a copy of the GNU Lesser General Public
|
||||||
|
License along with this Module; if not, write to the Free Software
|
||||||
|
Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
|
||||||
|
|
@ -5,8 +5,6 @@
|
||||||
/* ----------------------------------------------------------------------------
|
/* ----------------------------------------------------------------------------
|
||||||
* CCOLAMD Copyright (C), Univ. of Florida. Authors: Timothy A. Davis,
|
* CCOLAMD Copyright (C), Univ. of Florida. Authors: Timothy A. Davis,
|
||||||
* Sivasankaran Rajamanickam, and Stefan Larimore
|
* Sivasankaran Rajamanickam, and Stefan Larimore
|
||||||
* See License.txt for the Version 2.1 of the GNU Lesser General Public License
|
|
||||||
* http://www.cise.ufl.edu/research/sparse
|
|
||||||
* -------------------------------------------------------------------------- */
|
* -------------------------------------------------------------------------- */
|
||||||
|
|
||||||
/*
|
/*
|
||||||
|
|
@ -32,24 +30,24 @@ extern "C" {
|
||||||
/* All versions of CCOLAMD will include the following definitions.
|
/* All versions of CCOLAMD will include the following definitions.
|
||||||
* As an example, to test if the version you are using is 1.3 or later:
|
* As an example, to test if the version you are using is 1.3 or later:
|
||||||
*
|
*
|
||||||
* if (CCOLAMD_VERSION >= CCOLAMD_VERSION_CODE (1,3)) ...
|
* if (CCOLAMD_VERSION >= CCOLAMD_VERSION_CODE (1,3)) ...
|
||||||
*
|
*
|
||||||
* This also works during compile-time:
|
* This also works during compile-time:
|
||||||
*
|
*
|
||||||
* #if CCOLAMD_VERSION >= CCOLAMD_VERSION_CODE (1,3)
|
* #if CCOLAMD_VERSION >= CCOLAMD_VERSION_CODE (1,3)
|
||||||
* printf ("This is version 1.3 or later\n") ;
|
* printf ("This is version 1.3 or later\n") ;
|
||||||
* #else
|
* #else
|
||||||
* printf ("This is an early version\n") ;
|
* printf ("This is an early version\n") ;
|
||||||
* #endif
|
* #endif
|
||||||
*/
|
*/
|
||||||
|
|
||||||
#define CCOLAMD_DATE "Jan 25, 2011"
|
#define CCOLAMD_DATE "Apr 1, 2016"
|
||||||
#define CCOLAMD_VERSION_CODE(main,sub) ((main) * 1000 + (sub))
|
#define CCOLAMD_VERSION_CODE(main,sub) ((main) * 1000 + (sub))
|
||||||
#define CCOLAMD_MAIN_VERSION 2
|
#define CCOLAMD_MAIN_VERSION 2
|
||||||
#define CCOLAMD_SUB_VERSION 7
|
#define CCOLAMD_SUB_VERSION 9
|
||||||
#define CCOLAMD_SUBSUB_VERSION 3
|
#define CCOLAMD_SUBSUB_VERSION 5
|
||||||
#define CCOLAMD_VERSION \
|
#define CCOLAMD_VERSION \
|
||||||
CCOLAMD_VERSION_CODE(CCOLAMD_MAIN_VERSION,CCOLAMD_SUB_VERSION)
|
CCOLAMD_VERSION_CODE(CCOLAMD_MAIN_VERSION,CCOLAMD_SUB_VERSION)
|
||||||
|
|
||||||
/* ========================================================================== */
|
/* ========================================================================== */
|
||||||
/* === Knob and statistics definitions ====================================== */
|
/* === Knob and statistics definitions ====================================== */
|
||||||
|
|
@ -94,106 +92,105 @@ extern "C" {
|
||||||
#define CCOLAMD_NEWLY_EMPTY_COL 10
|
#define CCOLAMD_NEWLY_EMPTY_COL 10
|
||||||
|
|
||||||
/* error codes returned in stats [3]: */
|
/* error codes returned in stats [3]: */
|
||||||
#define CCOLAMD_OK (0)
|
#define CCOLAMD_OK (0)
|
||||||
#define CCOLAMD_OK_BUT_JUMBLED (1)
|
#define CCOLAMD_OK_BUT_JUMBLED (1)
|
||||||
#define CCOLAMD_ERROR_A_not_present (-1)
|
#define CCOLAMD_ERROR_A_not_present (-1)
|
||||||
#define CCOLAMD_ERROR_p_not_present (-2)
|
#define CCOLAMD_ERROR_p_not_present (-2)
|
||||||
#define CCOLAMD_ERROR_nrow_negative (-3)
|
#define CCOLAMD_ERROR_nrow_negative (-3)
|
||||||
#define CCOLAMD_ERROR_ncol_negative (-4)
|
#define CCOLAMD_ERROR_ncol_negative (-4)
|
||||||
#define CCOLAMD_ERROR_nnz_negative (-5)
|
#define CCOLAMD_ERROR_nnz_negative (-5)
|
||||||
#define CCOLAMD_ERROR_p0_nonzero (-6)
|
#define CCOLAMD_ERROR_p0_nonzero (-6)
|
||||||
#define CCOLAMD_ERROR_A_too_small (-7)
|
#define CCOLAMD_ERROR_A_too_small (-7)
|
||||||
#define CCOLAMD_ERROR_col_length_negative (-8)
|
#define CCOLAMD_ERROR_col_length_negative (-8)
|
||||||
#define CCOLAMD_ERROR_row_index_out_of_bounds (-9)
|
#define CCOLAMD_ERROR_row_index_out_of_bounds (-9)
|
||||||
#define CCOLAMD_ERROR_out_of_memory (-10)
|
#define CCOLAMD_ERROR_out_of_memory (-10)
|
||||||
#define CCOLAMD_ERROR_invalid_cmember (-11)
|
#define CCOLAMD_ERROR_invalid_cmember (-11)
|
||||||
#define CCOLAMD_ERROR_internal_error (-999)
|
#define CCOLAMD_ERROR_internal_error (-999)
|
||||||
|
|
||||||
/* ========================================================================== */
|
/* ========================================================================== */
|
||||||
/* === Prototypes of user-callable routines ================================= */
|
/* === Prototypes of user-callable routines ================================= */
|
||||||
/* ========================================================================== */
|
/* ========================================================================== */
|
||||||
|
|
||||||
/* define UF_long */
|
#include "SuiteSparse_config.h"
|
||||||
#include "UFconfig.h"
|
|
||||||
|
|
||||||
size_t ccolamd_recommended /* returns recommended value of Alen, */
|
size_t ccolamd_recommended /* returns recommended value of Alen, */
|
||||||
/* or 0 if input arguments are erroneous */
|
/* or 0 if input arguments are erroneous */
|
||||||
(
|
(
|
||||||
int nnz, /* nonzeros in A */
|
int nnz, /* nonzeros in A */
|
||||||
int n_row, /* number of rows in A */
|
int n_row, /* number of rows in A */
|
||||||
int n_col /* number of columns in A */
|
int n_col /* number of columns in A */
|
||||||
) ;
|
) ;
|
||||||
|
|
||||||
size_t ccolamd_l_recommended /* returns recommended value of Alen, */
|
size_t ccolamd_l_recommended /* returns recommended value of Alen, */
|
||||||
/* or 0 if input arguments are erroneous */
|
/* or 0 if input arguments are erroneous */
|
||||||
(
|
(
|
||||||
UF_long nnz, /* nonzeros in A */
|
SuiteSparse_long nnz, /* nonzeros in A */
|
||||||
UF_long n_row, /* number of rows in A */
|
SuiteSparse_long n_row, /* number of rows in A */
|
||||||
UF_long n_col /* number of columns in A */
|
SuiteSparse_long n_col /* number of columns in A */
|
||||||
) ;
|
) ;
|
||||||
|
|
||||||
void ccolamd_set_defaults /* sets default parameters */
|
void ccolamd_set_defaults /* sets default parameters */
|
||||||
( /* knobs argument is modified on output */
|
( /* knobs argument is modified on output */
|
||||||
double knobs [CCOLAMD_KNOBS] /* parameter settings for ccolamd */
|
double knobs [CCOLAMD_KNOBS] /* parameter settings for ccolamd */
|
||||||
) ;
|
) ;
|
||||||
|
|
||||||
void ccolamd_l_set_defaults /* sets default parameters */
|
void ccolamd_l_set_defaults /* sets default parameters */
|
||||||
( /* knobs argument is modified on output */
|
( /* knobs argument is modified on output */
|
||||||
double knobs [CCOLAMD_KNOBS] /* parameter settings for ccolamd */
|
double knobs [CCOLAMD_KNOBS] /* parameter settings for ccolamd */
|
||||||
) ;
|
) ;
|
||||||
|
|
||||||
int ccolamd /* returns (1) if successful, (0) otherwise*/
|
int ccolamd /* returns (1) if successful, (0) otherwise*/
|
||||||
( /* A and p arguments are modified on output */
|
( /* A and p arguments are modified on output */
|
||||||
int n_row, /* number of rows in A */
|
int n_row, /* number of rows in A */
|
||||||
int n_col, /* number of columns in A */
|
int n_col, /* number of columns in A */
|
||||||
int Alen, /* size of the array A */
|
int Alen, /* size of the array A */
|
||||||
int A [ ], /* row indices of A, of size Alen */
|
int A [ ], /* row indices of A, of size Alen */
|
||||||
int p [ ], /* column pointers of A, of size n_col+1 */
|
int p [ ], /* column pointers of A, of size n_col+1 */
|
||||||
double knobs [CCOLAMD_KNOBS],/* parameter settings for ccolamd */
|
double knobs [CCOLAMD_KNOBS],/* parameter settings for ccolamd */
|
||||||
int stats [CCOLAMD_STATS], /* ccolamd output statistics and error codes */
|
int stats [CCOLAMD_STATS], /* ccolamd output statistics and error codes */
|
||||||
int cmember [ ] /* Constraint set of A, of size n_col */
|
int cmember [ ] /* Constraint set of A, of size n_col */
|
||||||
) ;
|
) ;
|
||||||
|
|
||||||
UF_long ccolamd_l /* same as ccolamd, but with UF_long integers */
|
SuiteSparse_long ccolamd_l /* as ccolamd w/ SuiteSparse_long integers */
|
||||||
(
|
(
|
||||||
UF_long n_row,
|
SuiteSparse_long n_row,
|
||||||
UF_long n_col,
|
SuiteSparse_long n_col,
|
||||||
UF_long Alen,
|
SuiteSparse_long Alen,
|
||||||
UF_long A [ ],
|
SuiteSparse_long A [ ],
|
||||||
UF_long p [ ],
|
SuiteSparse_long p [ ],
|
||||||
double knobs [CCOLAMD_KNOBS],
|
double knobs [CCOLAMD_KNOBS],
|
||||||
UF_long stats [CCOLAMD_STATS],
|
SuiteSparse_long stats [CCOLAMD_STATS],
|
||||||
UF_long cmember [ ]
|
SuiteSparse_long cmember [ ]
|
||||||
) ;
|
) ;
|
||||||
|
|
||||||
int csymamd /* return (1) if OK, (0) otherwise */
|
int csymamd /* return (1) if OK, (0) otherwise */
|
||||||
(
|
(
|
||||||
int n, /* number of rows and columns of A */
|
int n, /* number of rows and columns of A */
|
||||||
int A [ ], /* row indices of A */
|
int A [ ], /* row indices of A */
|
||||||
int p [ ], /* column pointers of A */
|
int p [ ], /* column pointers of A */
|
||||||
int perm [ ], /* output permutation, size n_col+1 */
|
int perm [ ], /* output permutation, size n_col+1 */
|
||||||
double knobs [CCOLAMD_KNOBS],/* parameters (uses defaults if NULL) */
|
double knobs [CCOLAMD_KNOBS],/* parameters (uses defaults if NULL) */
|
||||||
int stats [CCOLAMD_STATS], /* output statistics and error codes */
|
int stats [CCOLAMD_STATS], /* output statistics and error codes */
|
||||||
void * (*allocate) (size_t, size_t), /* pointer to calloc (ANSI C) or */
|
void * (*allocate) (size_t, size_t), /* pointer to calloc (ANSI C) or */
|
||||||
/* mxCalloc (for MATLAB mexFunction) */
|
/* mxCalloc (for MATLAB mexFunction) */
|
||||||
void (*release) (void *), /* pointer to free (ANSI C) or */
|
void (*release) (void *), /* pointer to free (ANSI C) or */
|
||||||
/* mxFree (for MATLAB mexFunction) */
|
/* mxFree (for MATLAB mexFunction) */
|
||||||
int cmember [ ], /* Constraint set of A */
|
int cmember [ ], /* Constraint set of A */
|
||||||
int stype /* 0: use both parts, >0: upper, <0: lower */
|
int stype /* 0: use both parts, >0: upper, <0: lower */
|
||||||
) ;
|
) ;
|
||||||
|
|
||||||
UF_long csymamd_l /* same as csymamd, but with UF_long integers */
|
SuiteSparse_long csymamd_l /* as csymamd, w/ SuiteSparse_long integers */
|
||||||
(
|
(
|
||||||
UF_long n,
|
SuiteSparse_long n,
|
||||||
UF_long A [ ],
|
SuiteSparse_long A [ ],
|
||||||
UF_long p [ ],
|
SuiteSparse_long p [ ],
|
||||||
UF_long perm [ ],
|
SuiteSparse_long perm [ ],
|
||||||
double knobs [CCOLAMD_KNOBS],
|
double knobs [CCOLAMD_KNOBS],
|
||||||
UF_long stats [CCOLAMD_STATS],
|
SuiteSparse_long stats [CCOLAMD_STATS],
|
||||||
void * (*allocate) (size_t, size_t),
|
void * (*allocate) (size_t, size_t),
|
||||||
void (*release) (void *),
|
void (*release) (void *),
|
||||||
UF_long cmember [ ],
|
SuiteSparse_long cmember [ ],
|
||||||
UF_long stype
|
SuiteSparse_long stype
|
||||||
) ;
|
) ;
|
||||||
|
|
||||||
void ccolamd_report
|
void ccolamd_report
|
||||||
|
|
@ -203,7 +200,7 @@ void ccolamd_report
|
||||||
|
|
||||||
void ccolamd_l_report
|
void ccolamd_l_report
|
||||||
(
|
(
|
||||||
UF_long stats [CCOLAMD_STATS]
|
SuiteSparse_long stats [CCOLAMD_STATS]
|
||||||
) ;
|
) ;
|
||||||
|
|
||||||
void csymamd_report
|
void csymamd_report
|
||||||
|
|
@ -213,7 +210,7 @@ void csymamd_report
|
||||||
|
|
||||||
void csymamd_l_report
|
void csymamd_l_report
|
||||||
(
|
(
|
||||||
UF_long stats [CCOLAMD_STATS]
|
SuiteSparse_long stats [CCOLAMD_STATS]
|
||||||
) ;
|
) ;
|
||||||
|
|
||||||
|
|
||||||
|
|
@ -227,42 +224,42 @@ void csymamd_l_report
|
||||||
*/
|
*/
|
||||||
|
|
||||||
int ccolamd2
|
int ccolamd2
|
||||||
( /* A and p arguments are modified on output */
|
( /* A and p arguments are modified on output */
|
||||||
int n_row, /* number of rows in A */
|
int n_row, /* number of rows in A */
|
||||||
int n_col, /* number of columns in A */
|
int n_col, /* number of columns in A */
|
||||||
int Alen, /* size of the array A */
|
int Alen, /* size of the array A */
|
||||||
int A [ ], /* row indices of A, of size Alen */
|
int A [ ], /* row indices of A, of size Alen */
|
||||||
int p [ ], /* column pointers of A, of size n_col+1 */
|
int p [ ], /* column pointers of A, of size n_col+1 */
|
||||||
double knobs [CCOLAMD_KNOBS],/* parameter settings for ccolamd */
|
double knobs [CCOLAMD_KNOBS],/* parameter settings for ccolamd */
|
||||||
int stats [CCOLAMD_STATS], /* ccolamd output statistics and error codes */
|
int stats [CCOLAMD_STATS], /* ccolamd output statistics and error codes */
|
||||||
/* each Front_ array is of size n_col+1: */
|
/* each Front_ array is of size n_col+1: */
|
||||||
int Front_npivcol [ ], /* # pivot cols in each front */
|
int Front_npivcol [ ], /* # pivot cols in each front */
|
||||||
int Front_nrows [ ], /* # of rows in each front (incl. pivot rows) */
|
int Front_nrows [ ], /* # of rows in each front (incl. pivot rows) */
|
||||||
int Front_ncols [ ], /* # of cols in each front (incl. pivot cols) */
|
int Front_ncols [ ], /* # of cols in each front (incl. pivot cols) */
|
||||||
int Front_parent [ ], /* parent of each front */
|
int Front_parent [ ], /* parent of each front */
|
||||||
int Front_cols [ ], /* link list of pivot columns for each front */
|
int Front_cols [ ], /* link list of pivot columns for each front */
|
||||||
int *p_nfr, /* total number of frontal matrices */
|
int *p_nfr, /* total number of frontal matrices */
|
||||||
int InFront [ ], /* InFront [row] = f if row in front f */
|
int InFront [ ], /* InFront [row] = f if row in front f */
|
||||||
int cmember [ ] /* Constraint set of A */
|
int cmember [ ] /* Constraint set of A */
|
||||||
) ;
|
) ;
|
||||||
|
|
||||||
UF_long ccolamd2_l /* same as ccolamd2, but with UF_long integers */
|
SuiteSparse_long ccolamd2_l /* as ccolamd2, w/ SuiteSparse_long integers */
|
||||||
(
|
(
|
||||||
UF_long n_row,
|
SuiteSparse_long n_row,
|
||||||
UF_long n_col,
|
SuiteSparse_long n_col,
|
||||||
UF_long Alen,
|
SuiteSparse_long Alen,
|
||||||
UF_long A [ ],
|
SuiteSparse_long A [ ],
|
||||||
UF_long p [ ],
|
SuiteSparse_long p [ ],
|
||||||
double knobs [CCOLAMD_KNOBS],
|
double knobs [CCOLAMD_KNOBS],
|
||||||
UF_long stats [CCOLAMD_STATS],
|
SuiteSparse_long stats [CCOLAMD_STATS],
|
||||||
UF_long Front_npivcol [ ],
|
SuiteSparse_long Front_npivcol [ ],
|
||||||
UF_long Front_nrows [ ],
|
SuiteSparse_long Front_nrows [ ],
|
||||||
UF_long Front_ncols [ ],
|
SuiteSparse_long Front_ncols [ ],
|
||||||
UF_long Front_parent [ ],
|
SuiteSparse_long Front_parent [ ],
|
||||||
UF_long Front_cols [ ],
|
SuiteSparse_long Front_cols [ ],
|
||||||
UF_long *p_nfr,
|
SuiteSparse_long *p_nfr,
|
||||||
UF_long InFront [ ],
|
SuiteSparse_long InFront [ ],
|
||||||
UF_long cmember [ ]
|
SuiteSparse_long cmember [ ]
|
||||||
) ;
|
) ;
|
||||||
|
|
||||||
void ccolamd_apply_order
|
void ccolamd_apply_order
|
||||||
|
|
@ -276,11 +273,11 @@ void ccolamd_apply_order
|
||||||
|
|
||||||
void ccolamd_l_apply_order
|
void ccolamd_l_apply_order
|
||||||
(
|
(
|
||||||
UF_long Front [ ],
|
SuiteSparse_long Front [ ],
|
||||||
const UF_long Order [ ],
|
const SuiteSparse_long Order [ ],
|
||||||
UF_long Temp [ ],
|
SuiteSparse_long Temp [ ],
|
||||||
UF_long nn,
|
SuiteSparse_long nn,
|
||||||
UF_long nfr
|
SuiteSparse_long nfr
|
||||||
) ;
|
) ;
|
||||||
|
|
||||||
|
|
||||||
|
|
@ -296,12 +293,12 @@ void ccolamd_fsize
|
||||||
|
|
||||||
void ccolamd_l_fsize
|
void ccolamd_l_fsize
|
||||||
(
|
(
|
||||||
UF_long nn,
|
SuiteSparse_long nn,
|
||||||
UF_long MaxFsize [ ],
|
SuiteSparse_long MaxFsize [ ],
|
||||||
UF_long Fnrows [ ],
|
SuiteSparse_long Fnrows [ ],
|
||||||
UF_long Fncols [ ],
|
SuiteSparse_long Fncols [ ],
|
||||||
UF_long Parent [ ],
|
SuiteSparse_long Parent [ ],
|
||||||
UF_long Npiv [ ]
|
SuiteSparse_long Npiv [ ]
|
||||||
) ;
|
) ;
|
||||||
|
|
||||||
void ccolamd_postorder
|
void ccolamd_postorder
|
||||||
|
|
@ -320,16 +317,16 @@ void ccolamd_postorder
|
||||||
|
|
||||||
void ccolamd_l_postorder
|
void ccolamd_l_postorder
|
||||||
(
|
(
|
||||||
UF_long nn,
|
SuiteSparse_long nn,
|
||||||
UF_long Parent [ ],
|
SuiteSparse_long Parent [ ],
|
||||||
UF_long Npiv [ ],
|
SuiteSparse_long Npiv [ ],
|
||||||
UF_long Fsize [ ],
|
SuiteSparse_long Fsize [ ],
|
||||||
UF_long Order [ ],
|
SuiteSparse_long Order [ ],
|
||||||
UF_long Child [ ],
|
SuiteSparse_long Child [ ],
|
||||||
UF_long Sibling [ ],
|
SuiteSparse_long Sibling [ ],
|
||||||
UF_long Stack [ ],
|
SuiteSparse_long Stack [ ],
|
||||||
UF_long Front_cols [ ],
|
SuiteSparse_long Front_cols [ ],
|
||||||
UF_long cmember [ ]
|
SuiteSparse_long cmember [ ]
|
||||||
) ;
|
) ;
|
||||||
|
|
||||||
int ccolamd_post_tree
|
int ccolamd_post_tree
|
||||||
|
|
@ -342,22 +339,16 @@ int ccolamd_post_tree
|
||||||
int Stack [ ]
|
int Stack [ ]
|
||||||
) ;
|
) ;
|
||||||
|
|
||||||
UF_long ccolamd_l_post_tree
|
SuiteSparse_long ccolamd_l_post_tree
|
||||||
(
|
(
|
||||||
UF_long root,
|
SuiteSparse_long root,
|
||||||
UF_long k,
|
SuiteSparse_long k,
|
||||||
UF_long Child [ ],
|
SuiteSparse_long Child [ ],
|
||||||
const UF_long Sibling [ ],
|
const SuiteSparse_long Sibling [ ],
|
||||||
UF_long Order [ ],
|
SuiteSparse_long Order [ ],
|
||||||
UF_long Stack [ ]
|
SuiteSparse_long Stack [ ]
|
||||||
) ;
|
) ;
|
||||||
|
|
||||||
#ifndef EXTERN
|
|
||||||
#define EXTERN extern
|
|
||||||
#endif
|
|
||||||
|
|
||||||
EXTERN int (*ccolamd_printf) (const char *, ...) ;
|
|
||||||
|
|
||||||
#ifdef __cplusplus
|
#ifdef __cplusplus
|
||||||
}
|
}
|
||||||
#endif
|
#endif
|
||||||
|
|
|
||||||
|
|
@ -0,0 +1,71 @@
|
||||||
|
#-------------------------------------------------------------------------------
|
||||||
|
# CCOLAMD Lib/Makefile
|
||||||
|
#-------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
LIBRARY = libccolamd
|
||||||
|
VERSION = 2.9.5
|
||||||
|
SO_VERSION = 2
|
||||||
|
|
||||||
|
default: library
|
||||||
|
|
||||||
|
include ../../SuiteSparse_config/SuiteSparse_config.mk
|
||||||
|
|
||||||
|
# CCOLAMD depends on SuiteSparse_config
|
||||||
|
LDLIBS += -lsuitesparseconfig
|
||||||
|
|
||||||
|
# compile and install in SuiteSparse/lib
|
||||||
|
library:
|
||||||
|
$(MAKE) install INSTALL=$(SUITESPARSE)
|
||||||
|
|
||||||
|
I = -I../Include -I../../SuiteSparse_config
|
||||||
|
|
||||||
|
INC = ../Include/ccolamd.h ../../SuiteSparse_config/SuiteSparse_config.h
|
||||||
|
|
||||||
|
SRC = ../Source/ccolamd.c
|
||||||
|
|
||||||
|
OBJ = ccolamd.o ccolamd_l.o
|
||||||
|
|
||||||
|
ccolamd.o: $(SRC) $(INC)
|
||||||
|
$(CC) $(CF) $(I) -c ../Source/ccolamd.c
|
||||||
|
|
||||||
|
ccolamd_l.o: $(SRC) $(INC)
|
||||||
|
$(CC) $(CF) $(I) -c ../Source/ccolamd.c -DDLONG -o ccolamd_l.o
|
||||||
|
|
||||||
|
# creates libccolamd.a, a C-callable CCOLAMD library
|
||||||
|
$(AR_TARGET): $(OBJ)
|
||||||
|
$(ARCHIVE) $@ $^
|
||||||
|
- $(RANLIB) $@
|
||||||
|
|
||||||
|
ccode: library
|
||||||
|
|
||||||
|
clean:
|
||||||
|
- $(RM) -r $(CLEAN)
|
||||||
|
|
||||||
|
purge: distclean
|
||||||
|
|
||||||
|
distclean: clean
|
||||||
|
- $(RM) -r $(PURGE)
|
||||||
|
|
||||||
|
# install CCOLAMD
|
||||||
|
install: $(AR_TARGET) $(INSTALL_LIB)/$(SO_TARGET)
|
||||||
|
|
||||||
|
$(INSTALL_LIB)/$(SO_TARGET): $(OBJ)
|
||||||
|
@mkdir -p $(INSTALL_LIB)
|
||||||
|
@mkdir -p $(INSTALL_INCLUDE)
|
||||||
|
@mkdir -p $(INSTALL_DOC)
|
||||||
|
$(CC) $(SO_OPTS) $^ -o $@ $(LDLIBS)
|
||||||
|
( cd $(INSTALL_LIB) ; ln -sf $(SO_TARGET) $(SO_PLAIN) )
|
||||||
|
( cd $(INSTALL_LIB) ; ln -sf $(SO_TARGET) $(SO_MAIN) )
|
||||||
|
$(CP) ../Include/ccolamd.h $(INSTALL_INCLUDE)
|
||||||
|
$(CP) ../README.txt $(INSTALL_DOC)/CCOLAMD_README.txt
|
||||||
|
chmod 755 $(INSTALL_LIB)/$(SO_TARGET)
|
||||||
|
chmod 644 $(INSTALL_INCLUDE)/ccolamd.h
|
||||||
|
chmod 644 $(INSTALL_DOC)/CCOLAMD_README.txt
|
||||||
|
|
||||||
|
uninstall:
|
||||||
|
$(RM) $(INSTALL_LIB)/$(SO_TARGET)
|
||||||
|
$(RM) $(INSTALL_LIB)/$(SO_PLAIN)
|
||||||
|
$(RM) $(INSTALL_LIB)/$(SO_MAIN)
|
||||||
|
$(RM) $(INSTALL_INCLUDE)/ccolamd.h
|
||||||
|
$(RM) $(INSTALL_DOC)/CCOLAMD_README.txt
|
||||||
|
|
||||||
|
|
@ -47,9 +47,8 @@ spparms ('default') ;
|
||||||
A = sprandn (n, n, 2/n) + speye (n) ;
|
A = sprandn (n, n, 2/n) + speye (n) ;
|
||||||
b = (1:n)' ;
|
b = (1:n)' ;
|
||||||
|
|
||||||
figure (1)
|
|
||||||
clf ;
|
clf ;
|
||||||
subplot (2,2,1)
|
subplot (3,4,1)
|
||||||
spy (A)
|
spy (A)
|
||||||
title ('original matrix')
|
title ('original matrix')
|
||||||
|
|
||||||
|
|
@ -62,7 +61,7 @@ fl = luflops (L, U) ;
|
||||||
x = Q * (U \ (L \ (P * b))) ;
|
x = Q * (U \ (L \ (P * b))) ;
|
||||||
fprintf (1, '\nFlop count for [L,U,P] = lu (A*Q): %d\n', fl) ;
|
fprintf (1, '\nFlop count for [L,U,P] = lu (A*Q): %d\n', fl) ;
|
||||||
fprintf (1, 'residual: %e\n', norm (A*x-b));
|
fprintf (1, 'residual: %e\n', norm (A*x-b));
|
||||||
subplot (2,2,2) ;
|
subplot (3,4,2) ;
|
||||||
spy (L|U) ;
|
spy (L|U) ;
|
||||||
title ('LU with ccolamd') ;
|
title ('LU with ccolamd') ;
|
||||||
|
|
||||||
|
|
@ -76,7 +75,7 @@ fl = luflops (L, U) ;
|
||||||
x = Q * (U \ (L \ (P * b))) ;
|
x = Q * (U \ (L \ (P * b))) ;
|
||||||
fprintf (1, '\nFlop count for [L,U,P] = lu (A*Q): %d\n', fl) ;
|
fprintf (1, '\nFlop count for [L,U,P] = lu (A*Q): %d\n', fl) ;
|
||||||
fprintf (1, 'residual: %e\n', norm (A*x-b));
|
fprintf (1, 'residual: %e\n', norm (A*x-b));
|
||||||
subplot (2,2,3) ;
|
subplot (3,4,3) ;
|
||||||
spy (L|U) ;
|
spy (L|U) ;
|
||||||
title ('LU with colamd') ;
|
title ('LU with colamd') ;
|
||||||
catch
|
catch
|
||||||
|
|
@ -89,7 +88,7 @@ fl = luflops (L, U) ;
|
||||||
x = U \ (L \ (P * b)) ;
|
x = U \ (L \ (P * b)) ;
|
||||||
fprintf (1, '\nFlop count for [L,U,P] = lu (A*Q): %d\n', fl) ;
|
fprintf (1, '\nFlop count for [L,U,P] = lu (A*Q): %d\n', fl) ;
|
||||||
fprintf (1, 'residual: %e\n', norm (A*x-b));
|
fprintf (1, 'residual: %e\n', norm (A*x-b));
|
||||||
subplot (2,2,4) ;
|
subplot (3,4,4) ;
|
||||||
spy (L|U) ;
|
spy (L|U) ;
|
||||||
title ('LU with no ordering') ;
|
title ('LU with no ordering') ;
|
||||||
|
|
||||||
|
|
@ -111,9 +110,7 @@ n = 1000 ;
|
||||||
fprintf (1, 'Generating a random %d-by-%d sparse matrix.\n', n, n) ;
|
fprintf (1, 'Generating a random %d-by-%d sparse matrix.\n', n, n) ;
|
||||||
A = sprandn (n, n, 2/n) + speye (n) ;
|
A = sprandn (n, n, 2/n) + speye (n) ;
|
||||||
|
|
||||||
figure (2)
|
subplot (3,4,5)
|
||||||
clf ;
|
|
||||||
subplot (2,2,1)
|
|
||||||
spy (A)
|
spy (A)
|
||||||
title ('original matrix')
|
title ('original matrix')
|
||||||
|
|
||||||
|
|
@ -121,7 +118,7 @@ fprintf (1, '\n\nUnordered matrix:\n') ;
|
||||||
[lnz,h,parent,post,R] = symbfact (A, 'col') ;
|
[lnz,h,parent,post,R] = symbfact (A, 'col') ;
|
||||||
fprintf (1, 'nz in Cholesky factors of A''A: %d\n', sum (lnz)) ;
|
fprintf (1, 'nz in Cholesky factors of A''A: %d\n', sum (lnz)) ;
|
||||||
fprintf (1, 'flop count for Cholesky of A''A: %d\n', sum (lnz.^2)) ;
|
fprintf (1, 'flop count for Cholesky of A''A: %d\n', sum (lnz.^2)) ;
|
||||||
subplot (2,2,4) ;
|
subplot (3,4,6) ;
|
||||||
spy (R) ;
|
spy (R) ;
|
||||||
title ('Cholesky with no ordering') ;
|
title ('Cholesky with no ordering') ;
|
||||||
|
|
||||||
|
|
@ -133,7 +130,7 @@ fprintf (1, '\n\nccolamd run time: %f\n', t) ;
|
||||||
fprintf (1, 'ccolamd ordering quality: \n') ;
|
fprintf (1, 'ccolamd ordering quality: \n') ;
|
||||||
fprintf (1, 'nz in Cholesky factors of A(:,p)''A(:,p): %d\n', sum (lnz)) ;
|
fprintf (1, 'nz in Cholesky factors of A(:,p)''A(:,p): %d\n', sum (lnz)) ;
|
||||||
fprintf (1, 'flop count for Cholesky of A(:,p)''A(:,p): %d\n', sum (lnz.^2)) ;
|
fprintf (1, 'flop count for Cholesky of A(:,p)''A(:,p): %d\n', sum (lnz.^2)) ;
|
||||||
subplot (2,2,2) ;
|
subplot (3,4,7) ;
|
||||||
spy (R) ;
|
spy (R) ;
|
||||||
title ('Cholesky with ccolamd') ;
|
title ('Cholesky with ccolamd') ;
|
||||||
|
|
||||||
|
|
@ -146,7 +143,7 @@ fprintf (1, '\n\ncolamd run time: %f\n', t) ;
|
||||||
fprintf (1, 'colamd ordering quality: \n') ;
|
fprintf (1, 'colamd ordering quality: \n') ;
|
||||||
fprintf (1, 'nz in Cholesky factors of A(:,p)''A(:,p): %d\n', sum (lnz)) ;
|
fprintf (1, 'nz in Cholesky factors of A(:,p)''A(:,p): %d\n', sum (lnz)) ;
|
||||||
fprintf (1, 'flop count for Cholesky of A(:,p)''A(:,p): %d\n', sum (lnz.^2)) ;
|
fprintf (1, 'flop count for Cholesky of A(:,p)''A(:,p): %d\n', sum (lnz.^2)) ;
|
||||||
subplot (2,2,3) ;
|
subplot (3,4,8) ;
|
||||||
spy (R) ;
|
spy (R) ;
|
||||||
title ('Cholesky with colamd') ;
|
title ('Cholesky with colamd') ;
|
||||||
catch
|
catch
|
||||||
|
|
@ -164,9 +161,7 @@ fprintf (1, '\n-----------------------------------------------------------\n') ;
|
||||||
fprintf (1, 'Generating a random symmetric %d-by-%d sparse matrix.\n', n, n) ;
|
fprintf (1, 'Generating a random symmetric %d-by-%d sparse matrix.\n', n, n) ;
|
||||||
A = A+A' ;
|
A = A+A' ;
|
||||||
|
|
||||||
figure (3)
|
subplot (3,4,9) ;
|
||||||
clf ;
|
|
||||||
subplot (2,2,1)
|
|
||||||
spy (A)
|
spy (A)
|
||||||
title ('original matrix')
|
title ('original matrix')
|
||||||
|
|
||||||
|
|
@ -174,7 +169,7 @@ fprintf (1, '\n\nUnordered matrix:\n') ;
|
||||||
[lnz,h,parent,post,R] = symbfact (A, 'sym') ;
|
[lnz,h,parent,post,R] = symbfact (A, 'sym') ;
|
||||||
fprintf (1, 'nz in Cholesky factors of A: %d\n', sum (lnz)) ;
|
fprintf (1, 'nz in Cholesky factors of A: %d\n', sum (lnz)) ;
|
||||||
fprintf (1, 'flop count for Cholesky of A: %d\n', sum (lnz.^2)) ;
|
fprintf (1, 'flop count for Cholesky of A: %d\n', sum (lnz.^2)) ;
|
||||||
subplot (2,2,4) ;
|
subplot (3,4,10) ;
|
||||||
spy (R) ;
|
spy (R) ;
|
||||||
title ('Cholesky with no ordering') ;
|
title ('Cholesky with no ordering') ;
|
||||||
|
|
||||||
|
|
@ -186,7 +181,7 @@ fprintf (1, '\n\ncsymamd run time: %f\n', t) ;
|
||||||
fprintf (1, 'csymamd ordering quality: \n') ;
|
fprintf (1, 'csymamd ordering quality: \n') ;
|
||||||
fprintf (1, 'nz in Cholesky factors of A(p,p): %d\n', sum (lnz)) ;
|
fprintf (1, 'nz in Cholesky factors of A(p,p): %d\n', sum (lnz)) ;
|
||||||
fprintf (1, 'flop count for Cholesky of A(p,p): %d\n', sum (lnz.^2)) ;
|
fprintf (1, 'flop count for Cholesky of A(p,p): %d\n', sum (lnz.^2)) ;
|
||||||
subplot (2,2,2) ;
|
subplot (3,4,11) ;
|
||||||
spy (R) ;
|
spy (R) ;
|
||||||
title ('Cholesky with csymamd') ;
|
title ('Cholesky with csymamd') ;
|
||||||
|
|
||||||
|
|
@ -199,7 +194,7 @@ fprintf (1, '\n\nsymamd run time: %f\n', t) ;
|
||||||
fprintf (1, 'symamd ordering quality: \n') ;
|
fprintf (1, 'symamd ordering quality: \n') ;
|
||||||
fprintf (1, 'nz in Cholesky factors of A(p,p): %d\n', sum (lnz)) ;
|
fprintf (1, 'nz in Cholesky factors of A(p,p): %d\n', sum (lnz)) ;
|
||||||
fprintf (1, 'flop count for Cholesky of A(p,p): %d\n', sum (lnz.^2)) ;
|
fprintf (1, 'flop count for Cholesky of A(p,p): %d\n', sum (lnz.^2)) ;
|
||||||
subplot (2,2,3) ;
|
subplot (3,4,12) ;
|
||||||
spy (R) ;
|
spy (R) ;
|
||||||
title ('Cholesky with symamd') ;
|
title ('Cholesky with symamd') ;
|
||||||
catch
|
catch
|
||||||
|
|
|
||||||
|
|
@ -14,14 +14,33 @@ d = '' ;
|
||||||
if (~isempty (strfind (computer, '64')))
|
if (~isempty (strfind (computer, '64')))
|
||||||
d = '-largeArrayDims' ;
|
d = '-largeArrayDims' ;
|
||||||
end
|
end
|
||||||
src = '../Source/ccolamd.c ../Source/ccolamd_global.c' ;
|
|
||||||
cmd = sprintf ('mex -DDLONG -O %s -I../../UFconfig -I../Include -output ', d) ;
|
% MATLAB 8.3.0 now has a -silent option to keep 'mex' from burbling too much
|
||||||
|
if (~verLessThan ('matlab', '8.3.0'))
|
||||||
|
d = ['-silent ' d] ;
|
||||||
|
end
|
||||||
|
|
||||||
|
src = '../Source/ccolamd.c ../../SuiteSparse_config/SuiteSparse_config.c' ;
|
||||||
|
cmd = sprintf ( ...
|
||||||
|
'mex -DDLONG -O %s -I../../SuiteSparse_config -I../Include -output ', d) ;
|
||||||
s = [cmd 'ccolamd ccolamdmex.c ' src] ;
|
s = [cmd 'ccolamd ccolamdmex.c ' src] ;
|
||||||
|
|
||||||
|
if (~(ispc || ismac))
|
||||||
|
% for POSIX timing routine
|
||||||
|
s = [s ' -lrt'] ;
|
||||||
|
end
|
||||||
if (details)
|
if (details)
|
||||||
fprintf ('%s\n', s) ;
|
fprintf ('%s\n', s) ;
|
||||||
end
|
end
|
||||||
eval (s) ;
|
eval (s) ;
|
||||||
|
|
||||||
s = [cmd 'csymamd csymamdmex.c ' src] ;
|
s = [cmd 'csymamd csymamdmex.c ' src] ;
|
||||||
|
|
||||||
|
if (~(ispc || ismac))
|
||||||
|
% for POSIX timing routine
|
||||||
|
s = [s ' -lrt'] ;
|
||||||
|
end
|
||||||
|
|
||||||
if (details)
|
if (details)
|
||||||
fprintf ('%s\n', s) ;
|
fprintf ('%s\n', s) ;
|
||||||
end
|
end
|
||||||
|
|
|
||||||
|
|
@ -22,8 +22,13 @@ csymamd_default_knobs = [10 1 0] ;
|
||||||
if (~isempty (strfind (computer, '64')))
|
if (~isempty (strfind (computer, '64')))
|
||||||
d = '-largeArrayDims' ;
|
d = '-largeArrayDims' ;
|
||||||
end
|
end
|
||||||
src = '../Source/ccolamd.c ../Source/ccolamd_global.c' ;
|
cmd = sprintf ( ...
|
||||||
cmd = sprintf ('mex -DDLONG -O %s -I../../UFconfig -I../Include ', d) ;
|
'mex -DDLONG -O %s -I../../SuiteSparse_config -I../Include ', d) ;
|
||||||
|
src = '../Source/ccolamd.c ../../SuiteSparse_config/SuiteSparse_config.c' ;
|
||||||
|
if (~(ispc || ismac))
|
||||||
|
% for POSIX timing routine
|
||||||
|
src = [src ' -lrt'] ;
|
||||||
|
end
|
||||||
eval ([cmd 'ccolamdtestmex.c ' src]) ;
|
eval ([cmd 'ccolamdtestmex.c ' src]) ;
|
||||||
eval ([cmd 'csymamdtestmex.c ' src]) ;
|
eval ([cmd 'csymamdtestmex.c ' src]) ;
|
||||||
fprintf ('Done compiling.\n') ;
|
fprintf ('Done compiling.\n') ;
|
||||||
|
|
|
||||||
|
|
@ -5,8 +5,6 @@
|
||||||
/* ----------------------------------------------------------------------------
|
/* ----------------------------------------------------------------------------
|
||||||
* CCOLAMD, Copyright (C), Univ. of Florida. Authors: Timothy A. Davis,
|
* CCOLAMD, Copyright (C), Univ. of Florida. Authors: Timothy A. Davis,
|
||||||
* Sivasankaran Rajamanickam, and Stefan Larimore
|
* Sivasankaran Rajamanickam, and Stefan Larimore
|
||||||
* See License.txt for the Version 2.1 of the GNU Lesser General Public License
|
|
||||||
* http://www.cise.ufl.edu/research/sparse
|
|
||||||
* -------------------------------------------------------------------------- */
|
* -------------------------------------------------------------------------- */
|
||||||
|
|
||||||
/*
|
/*
|
||||||
|
|
@ -26,7 +24,7 @@
|
||||||
#include "matrix.h"
|
#include "matrix.h"
|
||||||
#include <stdlib.h>
|
#include <stdlib.h>
|
||||||
#include <string.h>
|
#include <string.h>
|
||||||
#include "UFconfig.h"
|
#define Long SuiteSparse_long
|
||||||
|
|
||||||
/* ========================================================================== */
|
/* ========================================================================== */
|
||||||
/* === ccolamd mexFunction ================================================== */
|
/* === ccolamd mexFunction ================================================== */
|
||||||
|
|
@ -44,24 +42,24 @@ void mexFunction
|
||||||
{
|
{
|
||||||
/* === Local variables ================================================== */
|
/* === Local variables ================================================== */
|
||||||
|
|
||||||
UF_long *A ; /* ccolamd's copy of the matrix and workspace */
|
Long *A ; /* ccolamd's copy of the matrix and workspace */
|
||||||
UF_long *cmember ; /* ccolamd's copy of the constraint set */
|
Long *cmember ; /* ccolamd's copy of the constraint set */
|
||||||
double *in_cmember ; /* input constraint set */
|
double *in_cmember ; /* input constraint set */
|
||||||
UF_long *p ; /* ccolamd's copy of the column pointers */
|
Long *p ; /* ccolamd's copy of the column pointers */
|
||||||
UF_long Alen ; /* size of A */
|
Long Alen ; /* size of A */
|
||||||
UF_long cslen ; /* size of CS */
|
Long cslen ; /* size of CS */
|
||||||
UF_long n_col ; /* number of columns of A */
|
Long n_col ; /* number of columns of A */
|
||||||
UF_long n_row ; /* number of rows of A */
|
Long n_row ; /* number of rows of A */
|
||||||
UF_long nnz ; /* number of entries in A */
|
Long nnz ; /* number of entries in A */
|
||||||
UF_long full ; /* TRUE if input matrix full, FALSE if sparse */
|
Long full ; /* TRUE if input matrix full, FALSE if sparse */
|
||||||
double knobs [CCOLAMD_KNOBS] ; /* ccolamd user-controllable parameters */
|
double knobs [CCOLAMD_KNOBS] ; /* ccolamd user-controllable parameters */
|
||||||
double *out_perm ; /* output permutation vector */
|
double *out_perm ; /* output permutation vector */
|
||||||
double *out_stats ; /* output stats vector */
|
double *out_stats ; /* output stats vector */
|
||||||
double *in_knobs ; /* input knobs vector */
|
double *in_knobs ; /* input knobs vector */
|
||||||
UF_long i ; /* loop counter */
|
Long i ; /* loop counter */
|
||||||
mxArray *Ainput ; /* input matrix handle */
|
mxArray *Ainput ; /* input matrix handle */
|
||||||
UF_long spumoni ; /* verbosity variable */
|
Long spumoni ; /* verbosity variable */
|
||||||
UF_long stats [CCOLAMD_STATS] ; /* stats for ccolamd */
|
Long stats [CCOLAMD_STATS] ;/* stats for ccolamd */
|
||||||
|
|
||||||
/* === Check inputs ===================================================== */
|
/* === Check inputs ===================================================== */
|
||||||
|
|
||||||
|
|
@ -80,11 +78,11 @@ void mexFunction
|
||||||
cslen = mxGetNumberOfElements (pargin [2]) ;
|
cslen = mxGetNumberOfElements (pargin [2]) ;
|
||||||
if (cslen != 0)
|
if (cslen != 0)
|
||||||
{
|
{
|
||||||
cmember = (UF_long *) mxCalloc (cslen, sizeof (UF_long)) ;
|
cmember = (Long *) mxCalloc (cslen, sizeof (Long)) ;
|
||||||
for (i = 0 ; i < cslen ; i++)
|
for (i = 0 ; i < cslen ; i++)
|
||||||
{
|
{
|
||||||
/* convert cmember from 1-based to 0-based */
|
/* convert cmember from 1-based to 0-based */
|
||||||
cmember[i] = ((UF_long) in_cmember [i] - 1) ;
|
cmember[i] = ((Long) in_cmember [i] - 1) ;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
@ -157,10 +155,10 @@ void mexFunction
|
||||||
n_col = mxGetN (Ainput) ;
|
n_col = mxGetN (Ainput) ;
|
||||||
|
|
||||||
/* get column pointer vector */
|
/* get column pointer vector */
|
||||||
p = (UF_long *) mxCalloc (n_col+1, sizeof (UF_long)) ;
|
p = (Long *) mxCalloc (n_col+1, sizeof (Long)) ;
|
||||||
(void) memcpy (p, mxGetJc (Ainput), (n_col+1)*sizeof (UF_long)) ;
|
(void) memcpy (p, mxGetJc (Ainput), (n_col+1)*sizeof (Long)) ;
|
||||||
nnz = p [n_col] ;
|
nnz = p [n_col] ;
|
||||||
Alen = (UF_long) ccolamd_l_recommended (nnz, n_row, n_col) ;
|
Alen = (Long) ccolamd_l_recommended (nnz, n_row, n_col) ;
|
||||||
if (Alen == 0)
|
if (Alen == 0)
|
||||||
{
|
{
|
||||||
mexErrMsgTxt ("ccolamd: problem too large") ;
|
mexErrMsgTxt ("ccolamd: problem too large") ;
|
||||||
|
|
@ -168,8 +166,8 @@ void mexFunction
|
||||||
|
|
||||||
/* === Copy input matrix into workspace ================================= */
|
/* === Copy input matrix into workspace ================================= */
|
||||||
|
|
||||||
A = (UF_long *) mxCalloc (Alen, sizeof (UF_long)) ;
|
A = (Long *) mxCalloc (Alen, sizeof (Long)) ;
|
||||||
(void) memcpy (A, mxGetIr (Ainput), nnz*sizeof (UF_long)) ;
|
(void) memcpy (A, mxGetIr (Ainput), nnz*sizeof (Long)) ;
|
||||||
|
|
||||||
if (full)
|
if (full)
|
||||||
{
|
{
|
||||||
|
|
|
||||||
|
|
@ -5,8 +5,6 @@
|
||||||
/* ----------------------------------------------------------------------------
|
/* ----------------------------------------------------------------------------
|
||||||
* CCOLAMD Copyright (C), Univ. of Florida. Authors: Timothy A. Davis,
|
* CCOLAMD Copyright (C), Univ. of Florida. Authors: Timothy A. Davis,
|
||||||
* Sivasankaran Rajamanickam, and Stefan Larimore
|
* Sivasankaran Rajamanickam, and Stefan Larimore
|
||||||
* See License.txt for the Version 2.1 of the GNU Lesser General Public License
|
|
||||||
* http://www.cise.ufl.edu/research/sparse
|
|
||||||
* -------------------------------------------------------------------------- */
|
* -------------------------------------------------------------------------- */
|
||||||
|
|
||||||
/*
|
/*
|
||||||
|
|
@ -43,7 +41,7 @@
|
||||||
#include "matrix.h"
|
#include "matrix.h"
|
||||||
#include <stdlib.h>
|
#include <stdlib.h>
|
||||||
#include <string.h>
|
#include <string.h>
|
||||||
#include "UFconfig.h"
|
#define Long SuiteSparse_long
|
||||||
|
|
||||||
/* Here only for testing */
|
/* Here only for testing */
|
||||||
#undef MIN
|
#undef MIN
|
||||||
|
|
@ -61,15 +59,15 @@
|
||||||
|
|
||||||
static void dump_matrix
|
static void dump_matrix
|
||||||
(
|
(
|
||||||
UF_long A [ ],
|
Long A [ ],
|
||||||
UF_long p [ ],
|
Long p [ ],
|
||||||
UF_long n_row,
|
Long n_row,
|
||||||
UF_long n_col,
|
Long n_col,
|
||||||
UF_long Alen,
|
Long Alen,
|
||||||
UF_long limit
|
Long limit
|
||||||
)
|
)
|
||||||
{
|
{
|
||||||
UF_long col, k, row ;
|
Long col, k, row ;
|
||||||
|
|
||||||
mexPrintf ("dump matrix: nrow %d ncol %d Alen %d\n", n_row, n_col, Alen) ;
|
mexPrintf ("dump matrix: nrow %d ncol %d Alen %d\n", n_row, n_col, Alen) ;
|
||||||
|
|
||||||
|
|
@ -102,24 +100,24 @@ void mexFunction
|
||||||
{
|
{
|
||||||
/* === Local variables ================================================== */
|
/* === Local variables ================================================== */
|
||||||
|
|
||||||
UF_long *A ; /* ccolamd's copy of the matrix and workspace */
|
Long *A ; /* ccolamd's copy of the matrix and workspace */
|
||||||
UF_long *p ; /* ccolamd's copy of the column pointers */
|
Long *p ; /* ccolamd's copy of the column pointers */
|
||||||
UF_long Alen ; /* size of A */
|
Long Alen ; /* size of A */
|
||||||
UF_long n_col ; /* number of columns of A */
|
Long n_col ; /* number of columns of A */
|
||||||
UF_long n_row ; /* number of rows of A */
|
Long n_row ; /* number of rows of A */
|
||||||
UF_long nnz ; /* number of entries in A */
|
Long nnz ; /* number of entries in A */
|
||||||
UF_long full ; /* TRUE if input matrix full, FALSE if sparse */
|
Long full ; /* TRUE if input matrix full, FALSE if sparse */
|
||||||
double knobs [CCOLAMD_KNOBS] ; /* ccolamd user-controllable parameters */
|
double knobs [CCOLAMD_KNOBS] ; /* ccolamd user-controllable parameters */
|
||||||
double *out_perm ; /* output permutation vector */
|
double *out_perm ; /* output permutation vector */
|
||||||
double *out_stats ; /* output stats vector */
|
double *out_stats ; /* output stats vector */
|
||||||
double *in_knobs ; /* input knobs vector */
|
double *in_knobs ; /* input knobs vector */
|
||||||
UF_long i ; /* loop counter */
|
Long i ; /* loop counter */
|
||||||
mxArray *Ainput ; /* input matrix handle */
|
mxArray *Ainput ; /* input matrix handle */
|
||||||
UF_long spumoni ; /* verbosity variable */
|
Long spumoni ; /* verbosity variable */
|
||||||
UF_long stats2 [CCOLAMD_STATS] ; /* stats for ccolamd */
|
Long stats2 [CCOLAMD_STATS] ; /* stats for ccolamd */
|
||||||
|
|
||||||
UF_long *cp, *cp_end, result, col, length, ok ;
|
Long *cp, *cp_end, result, col, length, ok ;
|
||||||
UF_long *stats ;
|
Long *stats ;
|
||||||
stats = stats2 ;
|
stats = stats2 ;
|
||||||
|
|
||||||
/* === Check inputs ===================================================== */
|
/* === Check inputs ===================================================== */
|
||||||
|
|
@ -199,10 +197,10 @@ void mexFunction
|
||||||
n_col = mxGetN (Ainput) ;
|
n_col = mxGetN (Ainput) ;
|
||||||
|
|
||||||
/* get column pointer vector so we can find nnz */
|
/* get column pointer vector so we can find nnz */
|
||||||
p = (UF_long *) mxCalloc (n_col+1, sizeof (UF_long)) ;
|
p = (Long *) mxCalloc (n_col+1, sizeof (Long)) ;
|
||||||
(void) memcpy (p, mxGetJc (Ainput), (n_col+1)*sizeof (UF_long)) ;
|
(void) memcpy (p, mxGetJc (Ainput), (n_col+1)*sizeof (Long)) ;
|
||||||
nnz = p [n_col] ;
|
nnz = p [n_col] ;
|
||||||
Alen = (UF_long) ccolamd_l_recommended (nnz, n_row, n_col) ;
|
Alen = (Long) ccolamd_l_recommended (nnz, n_row, n_col) ;
|
||||||
if (Alen == 0)
|
if (Alen == 0)
|
||||||
{
|
{
|
||||||
mexErrMsgTxt ("ccolamd: problem too large") ;
|
mexErrMsgTxt ("ccolamd: problem too large") ;
|
||||||
|
|
@ -230,8 +228,8 @@ void mexFunction
|
||||||
|
|
||||||
/* === Copy input matrix into workspace ================================= */
|
/* === Copy input matrix into workspace ================================= */
|
||||||
|
|
||||||
A = (UF_long *) mxCalloc (Alen, sizeof (UF_long)) ;
|
A = (Long *) mxCalloc (Alen, sizeof (Long)) ;
|
||||||
(void) memcpy (A, mxGetIr (Ainput), nnz*sizeof (UF_long)) ;
|
(void) memcpy (A, mxGetIr (Ainput), nnz*sizeof (Long)) ;
|
||||||
|
|
||||||
if (full)
|
if (full)
|
||||||
{
|
{
|
||||||
|
|
@ -261,7 +259,7 @@ void mexFunction
|
||||||
*/
|
*/
|
||||||
|
|
||||||
/* jumble appropriately */
|
/* jumble appropriately */
|
||||||
switch ((UF_long) in_knobs [6])
|
switch ((Long) in_knobs [6])
|
||||||
{
|
{
|
||||||
|
|
||||||
case 0 :
|
case 0 :
|
||||||
|
|
@ -359,7 +357,7 @@ void mexFunction
|
||||||
mexPrintf ("ccolamdtest: A not present\n") ;
|
mexPrintf ("ccolamdtest: A not present\n") ;
|
||||||
}
|
}
|
||||||
result = 0 ; /* A not present */
|
result = 0 ; /* A not present */
|
||||||
A = (UF_long *) NULL ;
|
A = (Long *) NULL ;
|
||||||
break ;
|
break ;
|
||||||
|
|
||||||
case 8 :
|
case 8 :
|
||||||
|
|
@ -368,7 +366,7 @@ void mexFunction
|
||||||
mexPrintf ("ccolamdtest: p not present\n") ;
|
mexPrintf ("ccolamdtest: p not present\n") ;
|
||||||
}
|
}
|
||||||
result = 0 ; /* p not present */
|
result = 0 ; /* p not present */
|
||||||
p = (UF_long *) NULL ;
|
p = (Long *) NULL ;
|
||||||
break ;
|
break ;
|
||||||
|
|
||||||
case 9 :
|
case 9 :
|
||||||
|
|
@ -456,7 +454,7 @@ void mexFunction
|
||||||
mexPrintf ("ccolamdtest: stats not present\n") ;
|
mexPrintf ("ccolamdtest: stats not present\n") ;
|
||||||
}
|
}
|
||||||
result = 0 ; /* stats not present */
|
result = 0 ; /* stats not present */
|
||||||
stats = (UF_long *) NULL ;
|
stats = (Long *) NULL ;
|
||||||
break ;
|
break ;
|
||||||
|
|
||||||
case 13 :
|
case 13 :
|
||||||
|
|
|
||||||
|
|
@ -34,10 +34,10 @@ function [p, stats] = csymamd (S, knobs, cmember) %#ok
|
||||||
% p = csymamd(S) is about the same as p = symamd(S). knobs and its default
|
% p = csymamd(S) is about the same as p = symamd(S). knobs and its default
|
||||||
% values differ.
|
% values differ.
|
||||||
%
|
%
|
||||||
% Authors: S. Larimore, T. Davis (Univ of Florida), and S. Rajamanickam, in
|
% Authors: S. Larimore, T. Davis, and S. Rajamanickam, in
|
||||||
% collaboration with J. Gilbert and E. Ng. Supported by the National
|
% collaboration with J. Gilbert and E. Ng. Supported by the National
|
||||||
% Science Foundation (DMS-9504974, DMS-9803599, CCR-0203270), and a grant
|
% Science Foundation (DMS-9504974, DMS-9803599, CCR-0203270), and a grant
|
||||||
% from Sandia National Lab. See http://www.cise.ufl.edu/research/sparse
|
% from Sandia National Lab. See http://www.suitesparse.com
|
||||||
% for ccolamd, csymamd, amd, colamd, symamd, and other related orderings.
|
% for ccolamd, csymamd, amd, colamd, symamd, and other related orderings.
|
||||||
%
|
%
|
||||||
% See also AMD, CCOLAMD, COLAMD, SYMAMD, SYMRCM.
|
% See also AMD, CCOLAMD, COLAMD, SYMAMD, SYMRCM.
|
||||||
|
|
|
||||||
|
|
@ -5,8 +5,6 @@
|
||||||
/* ----------------------------------------------------------------------------
|
/* ----------------------------------------------------------------------------
|
||||||
* CCOLAMD, Copyright (C), Univ. of Florida. Authors: Timothy A. Davis,
|
* CCOLAMD, Copyright (C), Univ. of Florida. Authors: Timothy A. Davis,
|
||||||
* Sivasankaran Rajamanickam, and Stefan Larimore
|
* Sivasankaran Rajamanickam, and Stefan Larimore
|
||||||
* See License.txt for the Version 2.1 of the GNU Lesser General Public License
|
|
||||||
* http://www.cise.ufl.edu/research/sparse
|
|
||||||
* -------------------------------------------------------------------------- */
|
* -------------------------------------------------------------------------- */
|
||||||
|
|
||||||
/*
|
/*
|
||||||
|
|
@ -25,7 +23,7 @@
|
||||||
#include "mex.h"
|
#include "mex.h"
|
||||||
#include "matrix.h"
|
#include "matrix.h"
|
||||||
#include <stdlib.h>
|
#include <stdlib.h>
|
||||||
#include "UFconfig.h"
|
#define Long SuiteSparse_long
|
||||||
|
|
||||||
/* ========================================================================== */
|
/* ========================================================================== */
|
||||||
/* === csymamd mexFunction ================================================== */
|
/* === csymamd mexFunction ================================================== */
|
||||||
|
|
@ -43,23 +41,23 @@ void mexFunction
|
||||||
{
|
{
|
||||||
/* === Local variables ================================================== */
|
/* === Local variables ================================================== */
|
||||||
|
|
||||||
UF_long *A ; /* row indices of input matrix A */
|
Long *A ; /* row indices of input matrix A */
|
||||||
UF_long *perm ; /* column ordering of M and ordering of A */
|
Long *perm ; /* column ordering of M and ordering of A */
|
||||||
UF_long *cmember ; /* csymamd's copy of the constraint set */
|
Long *cmember ; /* csymamd's copy of the constraint set */
|
||||||
double *in_cmember ; /* input constraint set */
|
double *in_cmember ; /* input constraint set */
|
||||||
UF_long *p ; /* column pointers of input matrix A */
|
Long *p ; /* column pointers of input matrix A */
|
||||||
UF_long cslen ; /* size of constraint set */
|
Long cslen ; /* size of constraint set */
|
||||||
UF_long n_col ; /* number of columns of A */
|
Long n_col ; /* number of columns of A */
|
||||||
UF_long n_row ; /* number of rows of A */
|
Long n_row ; /* number of rows of A */
|
||||||
UF_long full ; /* TRUE if input matrix full, FALSE if sparse */
|
Long full ; /* TRUE if input matrix full, FALSE if sparse */
|
||||||
double knobs [CCOLAMD_KNOBS] ; /* csymamd user-controllable parameters */
|
double knobs [CCOLAMD_KNOBS] ; /* csymamd user-controllable parameters */
|
||||||
double *out_perm ; /* output permutation vector */
|
double *out_perm ; /* output permutation vector */
|
||||||
double *out_stats ; /* output stats vector */
|
double *out_stats ; /* output stats vector */
|
||||||
double *in_knobs ; /* input knobs vector */
|
double *in_knobs ; /* input knobs vector */
|
||||||
UF_long i ; /* loop counter */
|
Long i ; /* loop counter */
|
||||||
mxArray *Ainput ; /* input matrix handle */
|
mxArray *Ainput ; /* input matrix handle */
|
||||||
UF_long spumoni ; /* verbosity variable */
|
Long spumoni ; /* verbosity variable */
|
||||||
UF_long stats [CCOLAMD_STATS] ; /* stats for symamd */
|
Long stats [CCOLAMD_STATS] ;/* stats for symamd */
|
||||||
|
|
||||||
/* === Check inputs ===================================================== */
|
/* === Check inputs ===================================================== */
|
||||||
|
|
||||||
|
|
@ -78,11 +76,11 @@ void mexFunction
|
||||||
cslen = mxGetNumberOfElements (pargin [2]) ;
|
cslen = mxGetNumberOfElements (pargin [2]) ;
|
||||||
if (cslen != 0)
|
if (cslen != 0)
|
||||||
{
|
{
|
||||||
cmember = (UF_long *) mxCalloc (cslen, sizeof (UF_long)) ;
|
cmember = (Long *) mxCalloc (cslen, sizeof (Long)) ;
|
||||||
for (i = 0 ; i < cslen ; i++)
|
for (i = 0 ; i < cslen ; i++)
|
||||||
{
|
{
|
||||||
/* convert cmember from 1-based to 0-based */
|
/* convert cmember from 1-based to 0-based */
|
||||||
cmember[i] = ((UF_long) in_cmember [i] - 1) ;
|
cmember[i] = ((Long) in_cmember [i] - 1) ;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
@ -153,9 +151,9 @@ void mexFunction
|
||||||
mexErrMsgTxt ("csymamd: cmember must be of length equal to #cols of A");
|
mexErrMsgTxt ("csymamd: cmember must be of length equal to #cols of A");
|
||||||
}
|
}
|
||||||
|
|
||||||
A = (UF_long *) mxGetIr (Ainput) ;
|
A = (Long *) mxGetIr (Ainput) ;
|
||||||
p = (UF_long *) mxGetJc (Ainput) ;
|
p = (Long *) mxGetJc (Ainput) ;
|
||||||
perm = (UF_long *) mxCalloc (n_col+1, sizeof (UF_long)) ;
|
perm = (Long *) mxCalloc (n_col+1, sizeof (Long)) ;
|
||||||
|
|
||||||
/* === Order the rows and columns of A (does not destroy A) ============= */
|
/* === Order the rows and columns of A (does not destroy A) ============= */
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -5,8 +5,6 @@
|
||||||
/* ----------------------------------------------------------------------------
|
/* ----------------------------------------------------------------------------
|
||||||
* CCOLAMD Copyright (C), Univ. of Florida. Authors: Timothy A. Davis,
|
* CCOLAMD Copyright (C), Univ. of Florida. Authors: Timothy A. Davis,
|
||||||
* Sivasankaran Rajamanickam, and Stefan Larimore
|
* Sivasankaran Rajamanickam, and Stefan Larimore
|
||||||
* See License.txt for the Version 2.1 of the GNU Lesser General Public License
|
|
||||||
* http://www.cise.ufl.edu/research/sparse
|
|
||||||
* -------------------------------------------------------------------------- */
|
* -------------------------------------------------------------------------- */
|
||||||
|
|
||||||
/*
|
/*
|
||||||
|
|
@ -37,7 +35,7 @@
|
||||||
#include "matrix.h"
|
#include "matrix.h"
|
||||||
#include <stdlib.h>
|
#include <stdlib.h>
|
||||||
#include <string.h>
|
#include <string.h>
|
||||||
#include "UFconfig.h"
|
#define Long SuiteSparse_long
|
||||||
|
|
||||||
#ifdef MIN
|
#ifdef MIN
|
||||||
#undef MIN
|
#undef MIN
|
||||||
|
|
@ -47,15 +45,15 @@
|
||||||
|
|
||||||
static void dump_matrix
|
static void dump_matrix
|
||||||
(
|
(
|
||||||
UF_long A [ ],
|
Long A [ ],
|
||||||
UF_long p [ ],
|
Long p [ ],
|
||||||
UF_long n_row,
|
Long n_row,
|
||||||
UF_long n_col,
|
Long n_col,
|
||||||
UF_long Alen,
|
Long Alen,
|
||||||
UF_long limit
|
Long limit
|
||||||
)
|
)
|
||||||
{
|
{
|
||||||
UF_long col, k, row ;
|
Long col, k, row ;
|
||||||
|
|
||||||
mexPrintf ("dump matrix: nrow %d ncol %d Alen %d\n", n_row, n_col, Alen) ;
|
mexPrintf ("dump matrix: nrow %d ncol %d Alen %d\n", n_row, n_col, Alen) ;
|
||||||
|
|
||||||
|
|
@ -100,23 +98,23 @@ void mexFunction
|
||||||
{
|
{
|
||||||
/* === Local variables ================================================== */
|
/* === Local variables ================================================== */
|
||||||
|
|
||||||
UF_long *perm ; /* column ordering of M and ordering of A */
|
Long *perm ; /* column ordering of M and ordering of A */
|
||||||
UF_long *A ; /* row indices of input matrix A */
|
Long *A ; /* row indices of input matrix A */
|
||||||
UF_long *p ; /* column pointers of input matrix A */
|
Long *p ; /* column pointers of input matrix A */
|
||||||
UF_long n_col ; /* number of columns of A */
|
Long n_col ; /* number of columns of A */
|
||||||
UF_long n_row ; /* number of rows of A */
|
Long n_row ; /* number of rows of A */
|
||||||
UF_long full ; /* TRUE if input matrix full, FALSE if sparse */
|
Long full ; /* TRUE if input matrix full, FALSE if sparse */
|
||||||
double knobs [CCOLAMD_KNOBS] ; /* ccolamd user-controllable parameters */
|
double knobs [CCOLAMD_KNOBS] ; /* ccolamd user-controllable parameters */
|
||||||
double *out_perm ; /* output permutation vector */
|
double *out_perm ; /* output permutation vector */
|
||||||
double *out_stats ; /* output stats vector */
|
double *out_stats ; /* output stats vector */
|
||||||
double *in_knobs ; /* input knobs vector */
|
double *in_knobs ; /* input knobs vector */
|
||||||
UF_long i ; /* loop counter */
|
Long i ; /* loop counter */
|
||||||
mxArray *Ainput ; /* input matrix handle */
|
mxArray *Ainput ; /* input matrix handle */
|
||||||
UF_long spumoni ; /* verbosity variable */
|
Long spumoni ; /* verbosity variable */
|
||||||
UF_long stats2 [CCOLAMD_STATS] ;/* stats for csymamd */
|
Long stats2 [CCOLAMD_STATS] ;/* stats for csymamd */
|
||||||
|
|
||||||
UF_long *cp, *cp_end, result, nnz, col, length, ok ;
|
Long *cp, *cp_end, result, nnz, col, length, ok ;
|
||||||
UF_long *stats ;
|
Long *stats ;
|
||||||
stats = stats2 ;
|
stats = stats2 ;
|
||||||
|
|
||||||
/* === Check inputs ===================================================== */
|
/* === Check inputs ===================================================== */
|
||||||
|
|
@ -192,8 +190,8 @@ void mexFunction
|
||||||
}
|
}
|
||||||
|
|
||||||
/* p = mxGetJc (Ainput) ; */
|
/* p = mxGetJc (Ainput) ; */
|
||||||
p = (UF_long *) mxCalloc (n_col+1, sizeof (UF_long)) ;
|
p = (Long *) mxCalloc (n_col+1, sizeof (Long)) ;
|
||||||
(void) memcpy (p, mxGetJc (Ainput), (n_col+1)*sizeof (UF_long)) ;
|
(void) memcpy (p, mxGetJc (Ainput), (n_col+1)*sizeof (Long)) ;
|
||||||
|
|
||||||
nnz = p [n_col] ;
|
nnz = p [n_col] ;
|
||||||
if (spumoni)
|
if (spumoni)
|
||||||
|
|
@ -202,10 +200,10 @@ void mexFunction
|
||||||
}
|
}
|
||||||
|
|
||||||
/* A = mxGetIr (Ainput) ; */
|
/* A = mxGetIr (Ainput) ; */
|
||||||
A = (UF_long *) mxCalloc (nnz+1, sizeof (UF_long)) ;
|
A = (Long *) mxCalloc (nnz+1, sizeof (Long)) ;
|
||||||
(void) memcpy (A, mxGetIr (Ainput), nnz*sizeof (UF_long)) ;
|
(void) memcpy (A, mxGetIr (Ainput), nnz*sizeof (Long)) ;
|
||||||
|
|
||||||
perm = (UF_long *) mxCalloc (n_col+1, sizeof (UF_long)) ;
|
perm = (Long *) mxCalloc (n_col+1, sizeof (Long)) ;
|
||||||
|
|
||||||
/* === Jumble matrix ==================================================== */
|
/* === Jumble matrix ==================================================== */
|
||||||
|
|
||||||
|
|
@ -230,7 +228,7 @@ void mexFunction
|
||||||
*/
|
*/
|
||||||
|
|
||||||
/* jumble appropriately */
|
/* jumble appropriately */
|
||||||
switch ((UF_long) in_knobs [3])
|
switch ((Long) in_knobs [3])
|
||||||
{
|
{
|
||||||
|
|
||||||
case 0 :
|
case 0 :
|
||||||
|
|
@ -321,7 +319,7 @@ void mexFunction
|
||||||
mexPrintf ("csymamdtest: A not present\n") ;
|
mexPrintf ("csymamdtest: A not present\n") ;
|
||||||
}
|
}
|
||||||
result = 0 ; /* A not present */
|
result = 0 ; /* A not present */
|
||||||
A = (UF_long *) NULL ;
|
A = (Long *) NULL ;
|
||||||
break ;
|
break ;
|
||||||
|
|
||||||
case 8 :
|
case 8 :
|
||||||
|
|
@ -330,7 +328,7 @@ void mexFunction
|
||||||
mexPrintf ("csymamdtest: p not present\n") ;
|
mexPrintf ("csymamdtest: p not present\n") ;
|
||||||
}
|
}
|
||||||
result = 0 ; /* p not present */
|
result = 0 ; /* p not present */
|
||||||
p = (UF_long *) NULL ;
|
p = (Long *) NULL ;
|
||||||
break ;
|
break ;
|
||||||
|
|
||||||
case 9 :
|
case 9 :
|
||||||
|
|
@ -418,7 +416,7 @@ void mexFunction
|
||||||
mexPrintf ("csymamdtest: stats not present\n") ;
|
mexPrintf ("csymamdtest: stats not present\n") ;
|
||||||
}
|
}
|
||||||
result = 0 ; /* stats not present */
|
result = 0 ; /* stats not present */
|
||||||
stats = (UF_long *) NULL ;
|
stats = (Long *) NULL ;
|
||||||
break ;
|
break ;
|
||||||
|
|
||||||
case 13 :
|
case 13 :
|
||||||
|
|
|
||||||
|
|
@ -0,0 +1,51 @@
|
||||||
|
#------------------------------------------------------------------------------
|
||||||
|
# CCOLAMD Makefile
|
||||||
|
#------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
SUITESPARSE ?= $(realpath $(CURDIR)/..)
|
||||||
|
export SUITESPARSE
|
||||||
|
|
||||||
|
default: all
|
||||||
|
|
||||||
|
include ../SuiteSparse_config/SuiteSparse_config.mk
|
||||||
|
|
||||||
|
demos: all
|
||||||
|
|
||||||
|
# Compile all C code
|
||||||
|
all:
|
||||||
|
( cd Lib ; $(MAKE) )
|
||||||
|
( cd Demo ; $(MAKE) )
|
||||||
|
|
||||||
|
# compile just the C-callable libraries (not Demos)
|
||||||
|
library:
|
||||||
|
( cd Lib ; $(MAKE) )
|
||||||
|
|
||||||
|
# remove object files, but keep the compiled programs and library archives
|
||||||
|
clean:
|
||||||
|
( cd Lib ; $(MAKE) clean )
|
||||||
|
( cd Demo ; $(MAKE) clean )
|
||||||
|
( cd MATLAB ; $(RM) $(CLEAN) )
|
||||||
|
|
||||||
|
# clean, and then remove compiled programs and library archives
|
||||||
|
purge:
|
||||||
|
( cd Lib ; $(MAKE) purge )
|
||||||
|
( cd Demo ; $(MAKE) purge )
|
||||||
|
( cd MATLAB ; $(RM) $(CLEAN) ; $(RM) *.mex* )
|
||||||
|
|
||||||
|
distclean: purge
|
||||||
|
|
||||||
|
# get ready for distribution
|
||||||
|
dist: purge
|
||||||
|
( cd Demo ; $(MAKE) dist )
|
||||||
|
|
||||||
|
ccode: library
|
||||||
|
|
||||||
|
lib: library
|
||||||
|
|
||||||
|
# install CCOLAMD
|
||||||
|
install:
|
||||||
|
( cd Lib ; $(MAKE) install )
|
||||||
|
|
||||||
|
# uninstall CCOLAMD
|
||||||
|
uninstall:
|
||||||
|
( cd Lib ; $(MAKE) uninstall )
|
||||||
|
|
@ -1,8 +1,8 @@
|
||||||
CCOLAMD: constrained column approximate minimum degree ordering
|
CCOLAMD: constrained column approximate minimum degree ordering
|
||||||
Copyright (C) 2005-2011, Univ. of Florida. Authors: Timothy A. Davis,
|
Copyright (C) 2005-2016, Univ. of Florida. Authors: Timothy A. Davis,
|
||||||
Sivasankaran Rajamanickam, and Stefan Larimore. Closely based on COLAMD by
|
Sivasankaran Rajamanickam, and Stefan Larimore. Closely based on COLAMD by
|
||||||
Davis, Stefan Larimore, in collaboration with Esmond Ng, and John Gilbert.
|
Davis, Stefan Larimore, in collaboration with Esmond Ng, and John Gilbert.
|
||||||
http://www.cise.ufl.edu/research/sparse
|
http://www.suitesparse.com
|
||||||
-------------------------------------------------------------------------------
|
-------------------------------------------------------------------------------
|
||||||
|
|
||||||
The CCOLAMD column approximate minimum degree ordering algorithm computes
|
The CCOLAMD column approximate minimum degree ordering algorithm computes
|
||||||
|
|
@ -14,7 +14,8 @@ available as a MATLAB-callable function. It constructs a matrix M such
|
||||||
that M'*M has the same pattern as A, and then uses CCOLAMD to compute a column
|
that M'*M has the same pattern as A, and then uses CCOLAMD to compute a column
|
||||||
ordering of M.
|
ordering of M.
|
||||||
|
|
||||||
Requires UFconfig, in the ../UFconfig directory relative to this directory.
|
Requires SuiteSparse_config, in the ../SuiteSparse_config directory relative to
|
||||||
|
this directory.
|
||||||
|
|
||||||
To compile and install the ccolamd m-files and mexFunctions, just cd to
|
To compile and install the ccolamd m-files and mexFunctions, just cd to
|
||||||
CCOLAMD/MATLAB and type ccolamd_install in the MATLAB command window.
|
CCOLAMD/MATLAB and type ccolamd_install in the MATLAB command window.
|
||||||
|
|
@ -22,47 +23,27 @@ A short demo will run. Optionally, type ccolamd_test to run an extensive tests.
|
||||||
Type "make" in Unix in the CCOLAMD directory to compile the C-callable
|
Type "make" in Unix in the CCOLAMD directory to compile the C-callable
|
||||||
library and to run a short demo.
|
library and to run a short demo.
|
||||||
|
|
||||||
If you have MATLAB 7.2 or earlier, you must first edit UFconfig/UFconfig.h to
|
|
||||||
remove the "-largeArrayDims" option from the MEX command (or just use
|
|
||||||
ccolamd_install.m inside MATLAB).
|
|
||||||
|
|
||||||
Other "make" targets:
|
Other "make" targets:
|
||||||
|
|
||||||
make mex compiles MATLAB mexFunctions only
|
make library compiles a C-callable library containing ccolamd
|
||||||
make libccolamd.a compiles a C-callable library containing ccolamd
|
make clean removes all files not in the distribution
|
||||||
make clean removes all files not in the distribution, except for
|
but keeps the compiled libraries.
|
||||||
libccolamd.a
|
|
||||||
make distclean removes all files not in the distribution
|
make distclean removes all files not in the distribution
|
||||||
|
make install installs the library in /usr/local/lib and
|
||||||
|
/usr/local/include
|
||||||
|
make uninstall uninstalls the library from /usr/local/lib and
|
||||||
|
/usr/local/include
|
||||||
|
|
||||||
To use ccolamd and csymamd within an application written in C, all you need are
|
To use ccolamd and csymamd within an application written in C, all you need are
|
||||||
ccolamd.c and ccolamd.h, which are the C-callable ccolamd/csymamd codes.
|
ccolamd.c and ccolamd.h, which are the C-callable ccolamd/csymamd codes.
|
||||||
See ccolamd.c for more information on how to call ccolamd from a C program.
|
See ccolamd.c for more information on how to call ccolamd from a C program.
|
||||||
It contains a complete description of the C-interface to CCOLAMD and CSYMAMD.
|
It contains a complete description of the C-interface to CCOLAMD and CSYMAMD.
|
||||||
|
|
||||||
Copyright (c) 1998-2007 by the University of Florida.
|
|
||||||
All Rights Reserved.
|
|
||||||
|
|
||||||
Licensed under the GNU LESSER GENERAL PUBLIC LICENSE.
|
See CCOLAMD/Doc/License.txt for the license.
|
||||||
|
|
||||||
-------------------------------------------------------------------------------
|
-------------------------------------------------------------------------------
|
||||||
|
|
||||||
This library is free software; you can redistribute it and/or
|
|
||||||
modify it under the terms of the GNU Lesser General Public
|
|
||||||
License as published by the Free Software Foundation; either
|
|
||||||
version 2.1 of the License, or (at your option) any later version.
|
|
||||||
|
|
||||||
This library is distributed in the hope that it will be useful,
|
|
||||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
||||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
||||||
Lesser General Public License for more details.
|
|
||||||
|
|
||||||
You should have received a copy of the GNU Lesser General Public
|
|
||||||
License along with this library; if not, write to the Free Software
|
|
||||||
Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
|
|
||||||
|
|
||||||
-------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
|
|
||||||
Related papers:
|
Related papers:
|
||||||
|
|
||||||
T. A. Davis and W. W. Hager, Rajamanickam, Multiple-rank updates
|
T. A. Davis and W. W. Hager, Rajamanickam, Multiple-rank updates
|
||||||
|
|
@ -86,21 +67,18 @@ Related papers:
|
||||||
"An approximate minimum degree column ordering algorithm",
|
"An approximate minimum degree column ordering algorithm",
|
||||||
S. I. Larimore, MS Thesis, Dept. of Computer and Information
|
S. I. Larimore, MS Thesis, Dept. of Computer and Information
|
||||||
Science and Engineering, University of Florida, Gainesville, FL,
|
Science and Engineering, University of Florida, Gainesville, FL,
|
||||||
1998. CISE Tech Report TR-98-016. Available at
|
1998. CISE Tech Report TR-98-016.
|
||||||
ftp://ftp.cise.ufl.edu/cis/tech-reports/tr98/tr98-016.ps
|
|
||||||
via anonymous ftp.
|
|
||||||
|
|
||||||
Approximate Deficiency for Ordering the Columns of a Matrix,
|
Approximate Deficiency for Ordering the Columns of a Matrix,
|
||||||
J. L. Kern, Senior Thesis, Dept. of Computer and Information
|
J. L. Kern, Senior Thesis, Dept. of Computer and Information
|
||||||
Science and Engineering, University of Florida, Gainesville, FL,
|
Science and Engineering, University of Florida, Gainesville, FL,
|
||||||
1999. Available at http://www.cise.ufl.edu/~davis/Kern/kern.ps
|
1999.
|
||||||
|
|
||||||
Authors: Timothy A. Davis, Sivasankaran Rajamanickam, and Stefan Larimore.
|
Authors: Timothy A. Davis, Sivasankaran Rajamanickam, and Stefan Larimore.
|
||||||
Closely based on COLAMD by Stefan I. Larimore and Timothy A. Davis,
|
Closely based on COLAMD by Stefan I. Larimore and Timothy A. Davis,
|
||||||
University of Florida, in collaboration with John Gilbert, Xerox PARC
|
in collaboration with John Gilbert, Xerox PARC (now at UC Santa
|
||||||
(now at UC Santa Barbara), and Esmong Ng, Lawrence Berkeley National
|
Barbara), and Esmong Ng, Lawrence Berkeley National Laboratory (much of
|
||||||
Laboratory (much of this work he did while at Oak Ridge National
|
this work he did while at Oak Ridge National Laboratory).
|
||||||
Laboratory).
|
|
||||||
|
|
||||||
CCOLAMD files:
|
CCOLAMD files:
|
||||||
|
|
||||||
|
|
@ -122,7 +100,6 @@ CCOLAMD files:
|
||||||
|
|
||||||
./Doc:
|
./Doc:
|
||||||
ChangeLog change log
|
ChangeLog change log
|
||||||
lesser.txt license
|
|
||||||
|
|
||||||
./Include:
|
./Include:
|
||||||
ccolamd.h include file
|
ccolamd.h include file
|
||||||
|
|
@ -147,4 +124,3 @@ CCOLAMD files:
|
||||||
|
|
||||||
./Source:
|
./Source:
|
||||||
ccolamd.c primary source code
|
ccolamd.c primary source code
|
||||||
ccolamd_global.c globally defined function pointers (malloc, free, ...)
|
|
||||||
|
|
|
||||||
|
|
@ -5,8 +5,6 @@
|
||||||
/* ----------------------------------------------------------------------------
|
/* ----------------------------------------------------------------------------
|
||||||
* CCOLAMD, Copyright (C) Univ. of Florida. Authors: Timothy A. Davis,
|
* CCOLAMD, Copyright (C) Univ. of Florida. Authors: Timothy A. Davis,
|
||||||
* Sivasankaran Rajamanickam, and Stefan Larimore
|
* Sivasankaran Rajamanickam, and Stefan Larimore
|
||||||
* See License.txt for the Version 2.1 of the GNU Lesser General Public License
|
|
||||||
* http://www.cise.ufl.edu/research/sparse
|
|
||||||
* -------------------------------------------------------------------------- */
|
* -------------------------------------------------------------------------- */
|
||||||
|
|
||||||
/*
|
/*
|
||||||
|
|
@ -58,39 +56,13 @@
|
||||||
* COLAMD is also available under alternate licenses, contact T. Davis
|
* COLAMD is also available under alternate licenses, contact T. Davis
|
||||||
* for details.
|
* for details.
|
||||||
*
|
*
|
||||||
* This library is free software; you can redistribute it and/or
|
* See CCOLAMD/Doc/License.txt for the license.
|
||||||
* modify it under the terms of the GNU Lesser General Public
|
|
||||||
* License as published by the Free Software Foundation; either
|
|
||||||
* version 2.1 of the License, or (at your option) any later version.
|
|
||||||
*
|
|
||||||
* This library is distributed in the hope that it will be useful,
|
|
||||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
||||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
||||||
* Lesser General Public License for more details.
|
|
||||||
*
|
|
||||||
* You should have received a copy of the GNU Lesser General Public
|
|
||||||
* License along with this library; if not, write to the Free Software
|
|
||||||
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301
|
|
||||||
* USA
|
|
||||||
*
|
|
||||||
* Permission is hereby granted to use or copy this program under the
|
|
||||||
* terms of the GNU LGPL, provided that the Copyright, this License,
|
|
||||||
* and the Availability of the original version is retained on all copies.
|
|
||||||
* User documentation of any code that uses this code or any modified
|
|
||||||
* version of this code must cite the Copyright, this License, the
|
|
||||||
* Availability note, and "Used by permission." Permission to modify
|
|
||||||
* the code and to distribute modified code is granted, provided the
|
|
||||||
* Copyright, this License, and the Availability note are retained,
|
|
||||||
* and a notice that the code was modified is included.
|
|
||||||
*
|
*
|
||||||
* Availability:
|
* Availability:
|
||||||
*
|
*
|
||||||
* The CCOLAMD/CSYMAMD library is available at
|
* The CCOLAMD/CSYMAMD library is available at
|
||||||
*
|
*
|
||||||
* http://www.cise.ufl.edu/research/sparse/ccolamd/
|
* http://www.suitesparse.com
|
||||||
*
|
|
||||||
* This is the http://www.cise.ufl.edu/research/sparse/ccolamd/ccolamd.c
|
|
||||||
* file.
|
|
||||||
*
|
*
|
||||||
* See the ChangeLog file for changes since Version 1.0.
|
* See the ChangeLog file for changes since Version 1.0.
|
||||||
*/
|
*/
|
||||||
|
|
@ -99,10 +71,10 @@
|
||||||
/* === Description of user-callable routines ================================ */
|
/* === Description of user-callable routines ================================ */
|
||||||
/* ========================================================================== */
|
/* ========================================================================== */
|
||||||
|
|
||||||
/* CCOLAMD includes both int and UF_long versions of all its routines. The
|
/* CCOLAMD includes both int and SuiteSparse_long versions of all its routines.
|
||||||
* description below is for the int version. For UF_long, all int arguments
|
* The description below is for the int version. For SuiteSparse_long, all
|
||||||
* become UF_long integers. UF_long is normally defined as long, except for
|
* int arguments become SuiteSparse_long integers. SuiteSparse_long is
|
||||||
* WIN64 */
|
* normally defined as long, except for WIN64 */
|
||||||
|
|
||||||
/* ----------------------------------------------------------------------------
|
/* ----------------------------------------------------------------------------
|
||||||
* ccolamd_recommended:
|
* ccolamd_recommended:
|
||||||
|
|
@ -112,8 +84,8 @@
|
||||||
*
|
*
|
||||||
* #include "ccolamd.h"
|
* #include "ccolamd.h"
|
||||||
* size_t ccolamd_recommended (int nnz, int n_row, int n_col) ;
|
* size_t ccolamd_recommended (int nnz, int n_row, int n_col) ;
|
||||||
* size_t ccolamd_l_recommended (UF_long nnz, UF_long n_row,
|
* size_t ccolamd_l_recommended (SuiteSparse_long nnz,
|
||||||
* UF_long n_col) ;
|
* SuiteSparse_long n_row, SuiteSparse_long n_col) ;
|
||||||
*
|
*
|
||||||
* Purpose:
|
* Purpose:
|
||||||
*
|
*
|
||||||
|
|
@ -209,9 +181,12 @@
|
||||||
* double knobs [CCOLAMD_KNOBS], int stats [CCOLAMD_STATS],
|
* double knobs [CCOLAMD_KNOBS], int stats [CCOLAMD_STATS],
|
||||||
* int *cmember) ;
|
* int *cmember) ;
|
||||||
*
|
*
|
||||||
* UF_long ccolamd_l (UF_long n_row, UF_long n_col, UF_long Alen,
|
* SuiteSparse_long ccolamd_l (SuiteSparse_long n_row,
|
||||||
* UF_long *A, UF_long *p, double knobs [CCOLAMD_KNOBS],
|
* SuiteSparse_long n_col, SuiteSparse_long Alen,
|
||||||
* UF_long stats [CCOLAMD_STATS], UF_long *cmember) ;
|
* SuiteSparse_long *A, SuiteSparse_long *p,
|
||||||
|
* double knobs [CCOLAMD_KNOBS],
|
||||||
|
* SuiteSparse_long stats [CCOLAMD_STATS],
|
||||||
|
* SuiteSparse_long *cmember) ;
|
||||||
*
|
*
|
||||||
* Purpose:
|
* Purpose:
|
||||||
*
|
*
|
||||||
|
|
@ -385,9 +360,7 @@
|
||||||
*
|
*
|
||||||
* Example:
|
* Example:
|
||||||
*
|
*
|
||||||
* See
|
* See ccolamd_example.c for a complete example.
|
||||||
* http://www.cise.ufl.edu/research/sparse/ccolamd/ccolamd_example.c
|
|
||||||
* for a complete example.
|
|
||||||
*
|
*
|
||||||
* To order the columns of a 5-by-4 matrix with 11 nonzero entries in
|
* To order the columns of a 5-by-4 matrix with 11 nonzero entries in
|
||||||
* the following nonzero pattern
|
* the following nonzero pattern
|
||||||
|
|
@ -423,10 +396,12 @@
|
||||||
* void (*allocate) (size_t, size_t), void (*release) (void *),
|
* void (*allocate) (size_t, size_t), void (*release) (void *),
|
||||||
* int *cmember, int stype) ;
|
* int *cmember, int stype) ;
|
||||||
*
|
*
|
||||||
* UF_long csymamd_l (UF_long n, UF_long *A, UF_long *p, UF_long *perm,
|
* SuiteSparse_long csymamd_l (SuiteSparse_long n,
|
||||||
* double knobs [CCOLAMD_KNOBS], UF_long stats [CCOLAMD_STATS],
|
* SuiteSparse_long *A, SuiteSparse_long *p,
|
||||||
* void (*allocate) (size_t, size_t), void (*release) (void *),
|
* SuiteSparse_long *perm, double knobs [CCOLAMD_KNOBS],
|
||||||
* UF_long *cmember, UF_long stype) ;
|
* SuiteSparse_long stats [CCOLAMD_STATS], void (*allocate)
|
||||||
|
* (size_t, size_t), void (*release) (void *),
|
||||||
|
* SuiteSparse_long *cmember, SuiteSparse_long stype) ;
|
||||||
*
|
*
|
||||||
* Purpose:
|
* Purpose:
|
||||||
*
|
*
|
||||||
|
|
@ -562,7 +537,7 @@
|
||||||
*
|
*
|
||||||
* #include "ccolamd.h"
|
* #include "ccolamd.h"
|
||||||
* ccolamd_report (int stats [CCOLAMD_STATS]) ;
|
* ccolamd_report (int stats [CCOLAMD_STATS]) ;
|
||||||
* ccolamd_l_report (UF_long stats [CCOLAMD_STATS]) ;
|
* ccolamd_l_report (SuiteSparse_long stats [CCOLAMD_STATS]) ;
|
||||||
*
|
*
|
||||||
* Purpose:
|
* Purpose:
|
||||||
*
|
*
|
||||||
|
|
@ -583,7 +558,7 @@
|
||||||
*
|
*
|
||||||
* #include "ccolamd.h"
|
* #include "ccolamd.h"
|
||||||
* csymamd_report (int stats [CCOLAMD_STATS]) ;
|
* csymamd_report (int stats [CCOLAMD_STATS]) ;
|
||||||
* csymamd_l_report (UF_long stats [CCOLAMD_STATS]) ;
|
* csymamd_l_report (SuiteSparse_long stats [CCOLAMD_STATS]) ;
|
||||||
*
|
*
|
||||||
* Purpose:
|
* Purpose:
|
||||||
*
|
*
|
||||||
|
|
@ -617,12 +592,11 @@
|
||||||
|
|
||||||
#include "ccolamd.h"
|
#include "ccolamd.h"
|
||||||
|
|
||||||
|
#include <stdlib.h>
|
||||||
#include <math.h>
|
#include <math.h>
|
||||||
#include <limits.h>
|
#include <limits.h>
|
||||||
|
|
||||||
#ifdef MATLAB_MEX_FILE
|
#ifdef MATLAB_MEX_FILE
|
||||||
#include <stdint.h>
|
|
||||||
typedef uint16_t char16_t;
|
|
||||||
#include "mex.h"
|
#include "mex.h"
|
||||||
#include "matrix.h"
|
#include "matrix.h"
|
||||||
#endif
|
#endif
|
||||||
|
|
@ -636,17 +610,14 @@ typedef uint16_t char16_t;
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
/* ========================================================================== */
|
/* ========================================================================== */
|
||||||
/* === int or UF_long ======================================================= */
|
/* === int or SuiteSparse_long ============================================== */
|
||||||
/* ========================================================================== */
|
/* ========================================================================== */
|
||||||
|
|
||||||
/* define UF_long */
|
|
||||||
#include "UFconfig.h"
|
|
||||||
|
|
||||||
#ifdef DLONG
|
#ifdef DLONG
|
||||||
|
|
||||||
#define Int UF_long
|
#define Int SuiteSparse_long
|
||||||
#define ID UF_long_id
|
#define ID SuiteSparse_long_id
|
||||||
#define Int_MAX UF_long_max
|
#define Int_MAX SuiteSparse_long_max
|
||||||
|
|
||||||
#define CCOLAMD_recommended ccolamd_l_recommended
|
#define CCOLAMD_recommended ccolamd_l_recommended
|
||||||
#define CCOLAMD_set_defaults ccolamd_l_set_defaults
|
#define CCOLAMD_set_defaults ccolamd_l_set_defaults
|
||||||
|
|
@ -811,9 +782,6 @@ typedef struct CColamd_Row_struct
|
||||||
#define INDEX(i) (i)
|
#define INDEX(i) (i)
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
/* All output goes through the PRINTF macro. */
|
|
||||||
#define PRINTF(params) { if (ccolamd_printf != NULL) (void) ccolamd_printf params ; }
|
|
||||||
|
|
||||||
|
|
||||||
/* ========================================================================== */
|
/* ========================================================================== */
|
||||||
/* === Debugging prototypes and definitions ================================= */
|
/* === Debugging prototypes and definitions ================================= */
|
||||||
|
|
@ -827,11 +795,11 @@ typedef struct CColamd_Row_struct
|
||||||
PRIVATE Int ccolamd_debug ;
|
PRIVATE Int ccolamd_debug ;
|
||||||
|
|
||||||
/* debug print statements */
|
/* debug print statements */
|
||||||
#define DEBUG0(params) { PRINTF (params) ; }
|
#define DEBUG0(params) { SUITESPARSE_PRINTF (params) ; }
|
||||||
#define DEBUG1(params) { if (ccolamd_debug >= 1) PRINTF (params) ; }
|
#define DEBUG1(params) { if (ccolamd_debug >= 1) SUITESPARSE_PRINTF (params) ; }
|
||||||
#define DEBUG2(params) { if (ccolamd_debug >= 2) PRINTF (params) ; }
|
#define DEBUG2(params) { if (ccolamd_debug >= 2) SUITESPARSE_PRINTF (params) ; }
|
||||||
#define DEBUG3(params) { if (ccolamd_debug >= 3) PRINTF (params) ; }
|
#define DEBUG3(params) { if (ccolamd_debug >= 3) SUITESPARSE_PRINTF (params) ; }
|
||||||
#define DEBUG4(params) { if (ccolamd_debug >= 4) PRINTF (params) ; }
|
#define DEBUG4(params) { if (ccolamd_debug >= 4) SUITESPARSE_PRINTF (params) ; }
|
||||||
|
|
||||||
#ifdef MATLAB_MEX_FILE
|
#ifdef MATLAB_MEX_FILE
|
||||||
#define ASSERT(expression) (mxAssert ((expression), ""))
|
#define ASSERT(expression) (mxAssert ((expression), ""))
|
||||||
|
|
@ -3752,12 +3720,12 @@ PRIVATE void print_report
|
||||||
|
|
||||||
Int i1, i2, i3 ;
|
Int i1, i2, i3 ;
|
||||||
|
|
||||||
PRINTF (("\n%s version %d.%d, %s: ", method,
|
SUITESPARSE_PRINTF (("\n%s version %d.%d, %s: ", method,
|
||||||
CCOLAMD_MAIN_VERSION, CCOLAMD_SUB_VERSION, CCOLAMD_DATE)) ;
|
CCOLAMD_MAIN_VERSION, CCOLAMD_SUB_VERSION, CCOLAMD_DATE)) ;
|
||||||
|
|
||||||
if (!stats)
|
if (!stats)
|
||||||
{
|
{
|
||||||
PRINTF (("No statistics available.\n")) ;
|
SUITESPARSE_PRINTF (("No statistics available.\n")) ;
|
||||||
return ;
|
return ;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
@ -3767,11 +3735,11 @@ PRIVATE void print_report
|
||||||
|
|
||||||
if (stats [CCOLAMD_STATUS] >= 0)
|
if (stats [CCOLAMD_STATUS] >= 0)
|
||||||
{
|
{
|
||||||
PRINTF(("OK. ")) ;
|
SUITESPARSE_PRINTF(("OK. ")) ;
|
||||||
}
|
}
|
||||||
else
|
else
|
||||||
{
|
{
|
||||||
PRINTF(("ERROR. ")) ;
|
SUITESPARSE_PRINTF(("ERROR. ")) ;
|
||||||
}
|
}
|
||||||
|
|
||||||
switch (stats [CCOLAMD_STATUS])
|
switch (stats [CCOLAMD_STATUS])
|
||||||
|
|
@ -3779,91 +3747,105 @@ PRIVATE void print_report
|
||||||
|
|
||||||
case CCOLAMD_OK_BUT_JUMBLED:
|
case CCOLAMD_OK_BUT_JUMBLED:
|
||||||
|
|
||||||
PRINTF(("Matrix has unsorted or duplicate row indices.\n")) ;
|
SUITESPARSE_PRINTF((
|
||||||
|
"Matrix has unsorted or duplicate row indices.\n")) ;
|
||||||
|
|
||||||
PRINTF(("%s: duplicate or out-of-order row indices: "ID"\n",
|
SUITESPARSE_PRINTF((
|
||||||
method, i3)) ;
|
"%s: duplicate or out-of-order row indices: "ID"\n",
|
||||||
|
method, i3)) ;
|
||||||
|
|
||||||
PRINTF(("%s: last seen duplicate or out-of-order row: "ID"\n",
|
SUITESPARSE_PRINTF((
|
||||||
method, INDEX (i2))) ;
|
"%s: last seen duplicate or out-of-order row: "ID"\n",
|
||||||
|
method, INDEX (i2))) ;
|
||||||
|
|
||||||
PRINTF(("%s: last seen in column: "ID"",
|
SUITESPARSE_PRINTF((
|
||||||
method, INDEX (i1))) ;
|
"%s: last seen in column: "ID"",
|
||||||
|
method, INDEX (i1))) ;
|
||||||
|
|
||||||
/* no break - fall through to next case instead */
|
/* no break - fall through to next case instead */
|
||||||
|
|
||||||
case CCOLAMD_OK:
|
case CCOLAMD_OK:
|
||||||
|
|
||||||
PRINTF(("\n")) ;
|
SUITESPARSE_PRINTF(("\n")) ;
|
||||||
|
|
||||||
PRINTF(("%s: number of dense or empty rows ignored: "ID"\n",
|
SUITESPARSE_PRINTF((
|
||||||
method, stats [CCOLAMD_DENSE_ROW])) ;
|
"%s: number of dense or empty rows ignored: "ID"\n",
|
||||||
|
method, stats [CCOLAMD_DENSE_ROW])) ;
|
||||||
|
|
||||||
PRINTF(("%s: number of dense or empty columns ignored: "ID"\n",
|
SUITESPARSE_PRINTF((
|
||||||
method, stats [CCOLAMD_DENSE_COL])) ;
|
"%s: number of dense or empty columns ignored: "ID"\n",
|
||||||
|
method, stats [CCOLAMD_DENSE_COL])) ;
|
||||||
|
|
||||||
PRINTF(("%s: number of garbage collections performed: "ID"\n",
|
SUITESPARSE_PRINTF((
|
||||||
method, stats [CCOLAMD_DEFRAG_COUNT])) ;
|
"%s: number of garbage collections performed: "ID"\n",
|
||||||
|
method, stats [CCOLAMD_DEFRAG_COUNT])) ;
|
||||||
break ;
|
break ;
|
||||||
|
|
||||||
case CCOLAMD_ERROR_A_not_present:
|
case CCOLAMD_ERROR_A_not_present:
|
||||||
|
|
||||||
PRINTF(("Array A (row indices of matrix) not present.\n")) ;
|
SUITESPARSE_PRINTF((
|
||||||
|
"Array A (row indices of matrix) not present.\n")) ;
|
||||||
break ;
|
break ;
|
||||||
|
|
||||||
case CCOLAMD_ERROR_p_not_present:
|
case CCOLAMD_ERROR_p_not_present:
|
||||||
|
|
||||||
PRINTF(("Array p (column pointers for matrix) not present.\n")) ;
|
SUITESPARSE_PRINTF((
|
||||||
|
"Array p (column pointers for matrix) not present.\n")) ;
|
||||||
break ;
|
break ;
|
||||||
|
|
||||||
case CCOLAMD_ERROR_nrow_negative:
|
case CCOLAMD_ERROR_nrow_negative:
|
||||||
|
|
||||||
PRINTF(("Invalid number of rows ("ID").\n", i1)) ;
|
SUITESPARSE_PRINTF(("Invalid number of rows ("ID").\n", i1)) ;
|
||||||
break ;
|
break ;
|
||||||
|
|
||||||
case CCOLAMD_ERROR_ncol_negative:
|
case CCOLAMD_ERROR_ncol_negative:
|
||||||
|
|
||||||
PRINTF(("Invalid number of columns ("ID").\n", i1)) ;
|
SUITESPARSE_PRINTF(("Invalid number of columns ("ID").\n", i1)) ;
|
||||||
break ;
|
break ;
|
||||||
|
|
||||||
case CCOLAMD_ERROR_nnz_negative:
|
case CCOLAMD_ERROR_nnz_negative:
|
||||||
|
|
||||||
PRINTF(("Invalid number of nonzero entries ("ID").\n", i1)) ;
|
SUITESPARSE_PRINTF((
|
||||||
|
"Invalid number of nonzero entries ("ID").\n", i1)) ;
|
||||||
break ;
|
break ;
|
||||||
|
|
||||||
case CCOLAMD_ERROR_p0_nonzero:
|
case CCOLAMD_ERROR_p0_nonzero:
|
||||||
|
|
||||||
PRINTF(("Invalid column pointer, p [0] = "ID", must be 0.\n", i1)) ;
|
SUITESPARSE_PRINTF((
|
||||||
|
"Invalid column pointer, p [0] = "ID", must be 0.\n", i1)) ;
|
||||||
break ;
|
break ;
|
||||||
|
|
||||||
case CCOLAMD_ERROR_A_too_small:
|
case CCOLAMD_ERROR_A_too_small:
|
||||||
|
|
||||||
PRINTF(("Array A too small.\n")) ;
|
SUITESPARSE_PRINTF(("Array A too small.\n")) ;
|
||||||
PRINTF((" Need Alen >= "ID", but given only Alen = "ID".\n",
|
SUITESPARSE_PRINTF((
|
||||||
i1, i2)) ;
|
" Need Alen >= "ID", but given only Alen = "ID".\n",
|
||||||
|
i1, i2)) ;
|
||||||
break ;
|
break ;
|
||||||
|
|
||||||
case CCOLAMD_ERROR_col_length_negative:
|
case CCOLAMD_ERROR_col_length_negative:
|
||||||
|
|
||||||
PRINTF(("Column "ID" has a negative number of entries ("ID").\n",
|
SUITESPARSE_PRINTF((
|
||||||
INDEX (i1), i2)) ;
|
"Column "ID" has a negative number of entries ("ID").\n",
|
||||||
|
INDEX (i1), i2)) ;
|
||||||
break ;
|
break ;
|
||||||
|
|
||||||
case CCOLAMD_ERROR_row_index_out_of_bounds:
|
case CCOLAMD_ERROR_row_index_out_of_bounds:
|
||||||
|
|
||||||
PRINTF(("Row index (row "ID") out of bounds ("ID" to "ID") in"
|
SUITESPARSE_PRINTF((
|
||||||
"column "ID".\n", INDEX (i2), INDEX (0), INDEX (i3-1),
|
"Row index (row "ID") out of bounds ("ID" to "ID") in"
|
||||||
INDEX (i1))) ;
|
"column "ID".\n", INDEX (i2), INDEX (0), INDEX (i3-1),
|
||||||
|
INDEX (i1))) ;
|
||||||
break ;
|
break ;
|
||||||
|
|
||||||
case CCOLAMD_ERROR_out_of_memory:
|
case CCOLAMD_ERROR_out_of_memory:
|
||||||
|
|
||||||
PRINTF(("Out of memory.\n")) ;
|
SUITESPARSE_PRINTF(("Out of memory.\n")) ;
|
||||||
break ;
|
break ;
|
||||||
|
|
||||||
case CCOLAMD_ERROR_invalid_cmember:
|
case CCOLAMD_ERROR_invalid_cmember:
|
||||||
|
|
||||||
PRINTF(("cmember invalid\n")) ;
|
SUITESPARSE_PRINTF(("cmember invalid\n")) ;
|
||||||
break ;
|
break ;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
|
||||||
|
|
@ -1,6 +1,6 @@
|
||||||
# install CCOLAMD headers
|
# install CCOLAMD headers
|
||||||
install(FILES CCOLAMD/Include/ccolamd.h DESTINATION include/gtsam/3rdparty/CCOLAMD)
|
install(FILES CCOLAMD/Include/ccolamd.h DESTINATION include/gtsam/3rdparty/CCOLAMD)
|
||||||
install(FILES UFconfig/UFconfig.h DESTINATION include/gtsam/3rdparty/UFconfig)
|
install(FILES SuiteSparse_config/SuiteSparse_config.h DESTINATION include/gtsam/3rdparty/SuiteSparse_config)
|
||||||
|
|
||||||
if(NOT GTSAM_USE_SYSTEM_EIGEN)
|
if(NOT GTSAM_USE_SYSTEM_EIGEN)
|
||||||
# Find plain .h files
|
# Find plain .h files
|
||||||
|
|
|
||||||
|
|
@ -0,0 +1,70 @@
|
||||||
|
#-------------------------------------------------------------------------------
|
||||||
|
# SuiteSparse_config Makefile
|
||||||
|
#-------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
SUITESPARSE ?= $(realpath $(CURDIR)/..)
|
||||||
|
export SUITESPARSE
|
||||||
|
|
||||||
|
# version of SuiteSparse_config is also version of SuiteSparse meta-package
|
||||||
|
LIBRARY = libsuitesparseconfig
|
||||||
|
VERSION = 4.5.2
|
||||||
|
SO_VERSION = 4
|
||||||
|
|
||||||
|
default: library
|
||||||
|
|
||||||
|
include SuiteSparse_config.mk
|
||||||
|
|
||||||
|
ccode: all
|
||||||
|
|
||||||
|
all: library
|
||||||
|
|
||||||
|
# compile and install in SuiteSparse/lib
|
||||||
|
library: $(AR_TARGET)
|
||||||
|
$(MAKE) install INSTALL=$(SUITESPARSE)
|
||||||
|
|
||||||
|
OBJ = SuiteSparse_config.o
|
||||||
|
|
||||||
|
SuiteSparse_config.o: SuiteSparse_config.c SuiteSparse_config.h
|
||||||
|
$(CC) $(CF) -c SuiteSparse_config.c
|
||||||
|
|
||||||
|
$(AR_TARGET): $(OBJ)
|
||||||
|
$(ARCHIVE) $(AR_TARGET) SuiteSparse_config.o
|
||||||
|
$(RANLIB) $(AR_TARGET)
|
||||||
|
|
||||||
|
distclean: purge
|
||||||
|
|
||||||
|
purge: clean
|
||||||
|
( cd xerbla ; $(MAKE) purge )
|
||||||
|
- $(RM) -r $(PURGE)
|
||||||
|
|
||||||
|
clean:
|
||||||
|
( cd xerbla ; $(MAKE) clean )
|
||||||
|
- $(RM) -r $(CLEAN)
|
||||||
|
|
||||||
|
# install SuiteSparse_config
|
||||||
|
install: $(AR_TARGET) $(INSTALL_LIB)/$(SO_TARGET)
|
||||||
|
|
||||||
|
$(INSTALL_LIB)/$(SO_TARGET): $(OBJ)
|
||||||
|
@mkdir -p $(INSTALL_LIB)
|
||||||
|
@mkdir -p $(INSTALL_INCLUDE)
|
||||||
|
@mkdir -p $(INSTALL_DOC)
|
||||||
|
$(CC) $(SO_OPTS) $^ -o $@ $(LDLIBS)
|
||||||
|
( cd $(INSTALL_LIB) ; ln -sf $(SO_TARGET) $(SO_PLAIN) )
|
||||||
|
( cd $(INSTALL_LIB) ; ln -sf $(SO_TARGET) $(SO_MAIN) )
|
||||||
|
$(CP) SuiteSparse_config.h $(INSTALL_INCLUDE)
|
||||||
|
$(CP) README.txt $(INSTALL_DOC)/SUITESPARSECONFIG_README.txt
|
||||||
|
chmod 755 $(INSTALL_LIB)/$(SO_TARGET)
|
||||||
|
chmod 755 $(INSTALL_LIB)/$(SO_PLAIN)
|
||||||
|
chmod 644 $(INSTALL_INCLUDE)/SuiteSparse_config.h
|
||||||
|
chmod 644 $(INSTALL_DOC)/SUITESPARSECONFIG_README.txt
|
||||||
|
|
||||||
|
# uninstall SuiteSparse_config
|
||||||
|
uninstall:
|
||||||
|
$(RM) $(INSTALL_LIB)/$(SO_TARGET)
|
||||||
|
$(RM) $(INSTALL_LIB)/$(SO_PLAIN)
|
||||||
|
$(RM) $(INSTALL_LIB)/$(SO_MAIN)
|
||||||
|
$(RM) $(INSTALL_INCLUDE)/SuiteSparse_config.h
|
||||||
|
$(RM) $(INSTALL_DOC)/SUITESPARSECONFIG_README.txt
|
||||||
|
( cd xerbla ; $(MAKE) uninstall )
|
||||||
|
|
||||||
|
|
||||||
|
|
@ -0,0 +1,51 @@
|
||||||
|
SuiteSparse_config, 2016, Timothy A. Davis, http://www.suitesparse.com
|
||||||
|
(formerly the UFconfig package)
|
||||||
|
|
||||||
|
This directory contains a default SuiteSparse_config.mk file. It tries to
|
||||||
|
detect your system (Linux, SunOS, or Mac), which compiler to use (icc or cc),
|
||||||
|
which BLAS and LAPACK library to use (OpenBLAS or MKL), and whether or not to
|
||||||
|
compile with CUDA.
|
||||||
|
|
||||||
|
For alternatives, see the comments in the SuiteSparse_config.mk file.
|
||||||
|
|
||||||
|
License: No licensing restrictions apply to this file or to the
|
||||||
|
SuiteSparse_config directory.
|
||||||
|
|
||||||
|
--------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
SuiteSparse_config contains configuration settings for all many of the software
|
||||||
|
packages that I develop or co-author. Note that older versions of some of
|
||||||
|
these packages do not require SuiteSparse_config.
|
||||||
|
|
||||||
|
Package Description
|
||||||
|
------- -----------
|
||||||
|
AMD approximate minimum degree ordering
|
||||||
|
CAMD constrained AMD
|
||||||
|
COLAMD column approximate minimum degree ordering
|
||||||
|
CCOLAMD constrained approximate minimum degree ordering
|
||||||
|
UMFPACK sparse LU factorization, with the BLAS
|
||||||
|
CXSparse int/long/real/complex version of CSparse
|
||||||
|
CHOLMOD sparse Cholesky factorization, update/downdate
|
||||||
|
KLU sparse LU factorization, BLAS-free
|
||||||
|
BTF permutation to block triangular form
|
||||||
|
LDL concise sparse LDL'
|
||||||
|
LPDASA LP Dual Active Set Algorithm
|
||||||
|
RBio read/write files in Rutherford/Boeing format
|
||||||
|
SPQR sparse QR factorization (full name: SuiteSparseQR)
|
||||||
|
|
||||||
|
SuiteSparse_config is not required by these packages:
|
||||||
|
|
||||||
|
CSparse a Concise Sparse matrix package
|
||||||
|
MATLAB_Tools toolboxes for use in MATLAB
|
||||||
|
|
||||||
|
In addition, the xerbla/ directory contains Fortan and C versions of the
|
||||||
|
BLAS/LAPACK xerbla routine, which is called when an invalid input is passed to
|
||||||
|
the BLAS or LAPACK. The xerbla provided here does not print any message, so
|
||||||
|
the entire Fortran I/O library does not need to be linked into a C application.
|
||||||
|
Most versions of the BLAS contain xerbla, but those from K. Goto do not. Use
|
||||||
|
this if you need too.
|
||||||
|
|
||||||
|
If you edit this directory (SuiteSparse_config.mk in particular) then you
|
||||||
|
must do "make purge ; make" in the parent directory to recompile all of
|
||||||
|
SuiteSparse. Otherwise, the changes will not necessarily be applied.
|
||||||
|
|
||||||
|
|
@ -0,0 +1,531 @@
|
||||||
|
/* ========================================================================== */
|
||||||
|
/* === SuiteSparse_config =================================================== */
|
||||||
|
/* ========================================================================== */
|
||||||
|
|
||||||
|
/* SuiteSparse configuration : memory manager and printf functions. */
|
||||||
|
|
||||||
|
/* Copyright (c) 2013, Timothy A. Davis. No licensing restrictions
|
||||||
|
* apply to this file or to the SuiteSparse_config directory.
|
||||||
|
* Author: Timothy A. Davis.
|
||||||
|
*/
|
||||||
|
|
||||||
|
#include <math.h>
|
||||||
|
#include <stdlib.h>
|
||||||
|
|
||||||
|
#ifndef NPRINT
|
||||||
|
#include <stdio.h>
|
||||||
|
#endif
|
||||||
|
|
||||||
|
#ifdef MATLAB_MEX_FILE
|
||||||
|
#include "mex.h"
|
||||||
|
#include "matrix.h"
|
||||||
|
#endif
|
||||||
|
|
||||||
|
#ifndef NULL
|
||||||
|
#define NULL ((void *) 0)
|
||||||
|
#endif
|
||||||
|
|
||||||
|
#include "SuiteSparse_config.h"
|
||||||
|
|
||||||
|
/* -------------------------------------------------------------------------- */
|
||||||
|
/* SuiteSparse_config : a global extern struct */
|
||||||
|
/* -------------------------------------------------------------------------- */
|
||||||
|
|
||||||
|
/* The SuiteSparse_config struct is available to all SuiteSparse functions and
|
||||||
|
to all applications that use those functions. It must be modified with
|
||||||
|
care, particularly in a multithreaded context. Normally, the application
|
||||||
|
will initialize this object once, via SuiteSparse_start, possibily followed
|
||||||
|
by application-specific modifications if the applications wants to use
|
||||||
|
alternative memory manager functions.
|
||||||
|
|
||||||
|
The user can redefine these global pointers at run-time to change the
|
||||||
|
memory manager and printf function used by SuiteSparse.
|
||||||
|
|
||||||
|
If -DNMALLOC is defined at compile-time, then no memory-manager is
|
||||||
|
specified. You must define them at run-time, after calling
|
||||||
|
SuiteSparse_start.
|
||||||
|
|
||||||
|
If -DPRINT is defined a compile time, then printf is disabled, and
|
||||||
|
SuiteSparse will not use printf.
|
||||||
|
*/
|
||||||
|
|
||||||
|
struct SuiteSparse_config_struct SuiteSparse_config =
|
||||||
|
{
|
||||||
|
|
||||||
|
/* memory management functions */
|
||||||
|
#ifndef NMALLOC
|
||||||
|
#ifdef MATLAB_MEX_FILE
|
||||||
|
/* MATLAB mexFunction: */
|
||||||
|
mxMalloc, mxCalloc, mxRealloc, mxFree,
|
||||||
|
#else
|
||||||
|
/* standard ANSI C: */
|
||||||
|
malloc, calloc, realloc, free,
|
||||||
|
#endif
|
||||||
|
#else
|
||||||
|
/* no memory manager defined; you must define one at run-time: */
|
||||||
|
NULL, NULL, NULL, NULL,
|
||||||
|
#endif
|
||||||
|
|
||||||
|
/* printf function */
|
||||||
|
#ifndef NPRINT
|
||||||
|
#ifdef MATLAB_MEX_FILE
|
||||||
|
/* MATLAB mexFunction: */
|
||||||
|
mexPrintf,
|
||||||
|
#else
|
||||||
|
/* standard ANSI C: */
|
||||||
|
printf,
|
||||||
|
#endif
|
||||||
|
#else
|
||||||
|
/* printf is disabled */
|
||||||
|
NULL,
|
||||||
|
#endif
|
||||||
|
|
||||||
|
SuiteSparse_hypot,
|
||||||
|
SuiteSparse_divcomplex
|
||||||
|
|
||||||
|
} ;
|
||||||
|
|
||||||
|
/* -------------------------------------------------------------------------- */
|
||||||
|
/* SuiteSparse_start */
|
||||||
|
/* -------------------------------------------------------------------------- */
|
||||||
|
|
||||||
|
/* All applications that use SuiteSparse should call SuiteSparse_start prior
|
||||||
|
to using any SuiteSparse function. Only a single thread should call this
|
||||||
|
function, in a multithreaded application. Currently, this function is
|
||||||
|
optional, since all this function currently does is to set the four memory
|
||||||
|
function pointers to NULL (which tells SuiteSparse to use the default
|
||||||
|
functions). In a multi- threaded application, only a single thread should
|
||||||
|
call this function.
|
||||||
|
|
||||||
|
Future releases of SuiteSparse might enforce a requirement that
|
||||||
|
SuiteSparse_start be called prior to calling any SuiteSparse function.
|
||||||
|
*/
|
||||||
|
|
||||||
|
void SuiteSparse_start ( void )
|
||||||
|
{
|
||||||
|
|
||||||
|
/* memory management functions */
|
||||||
|
#ifndef NMALLOC
|
||||||
|
#ifdef MATLAB_MEX_FILE
|
||||||
|
/* MATLAB mexFunction: */
|
||||||
|
SuiteSparse_config.malloc_func = mxMalloc ;
|
||||||
|
SuiteSparse_config.calloc_func = mxCalloc ;
|
||||||
|
SuiteSparse_config.realloc_func = mxRealloc ;
|
||||||
|
SuiteSparse_config.free_func = mxFree ;
|
||||||
|
#else
|
||||||
|
/* standard ANSI C: */
|
||||||
|
SuiteSparse_config.malloc_func = malloc ;
|
||||||
|
SuiteSparse_config.calloc_func = calloc ;
|
||||||
|
SuiteSparse_config.realloc_func = realloc ;
|
||||||
|
SuiteSparse_config.free_func = free ;
|
||||||
|
#endif
|
||||||
|
#else
|
||||||
|
/* no memory manager defined; you must define one after calling
|
||||||
|
SuiteSparse_start */
|
||||||
|
SuiteSparse_config.malloc_func = NULL ;
|
||||||
|
SuiteSparse_config.calloc_func = NULL ;
|
||||||
|
SuiteSparse_config.realloc_func = NULL ;
|
||||||
|
SuiteSparse_config.free_func = NULL ;
|
||||||
|
#endif
|
||||||
|
|
||||||
|
/* printf function */
|
||||||
|
#ifndef NPRINT
|
||||||
|
#ifdef MATLAB_MEX_FILE
|
||||||
|
/* MATLAB mexFunction: */
|
||||||
|
SuiteSparse_config.printf_func = mexPrintf ;
|
||||||
|
#else
|
||||||
|
/* standard ANSI C: */
|
||||||
|
SuiteSparse_config.printf_func = printf ;
|
||||||
|
#endif
|
||||||
|
#else
|
||||||
|
/* printf is disabled */
|
||||||
|
SuiteSparse_config.printf_func = NULL ;
|
||||||
|
#endif
|
||||||
|
|
||||||
|
/* math functions */
|
||||||
|
SuiteSparse_config.hypot_func = SuiteSparse_hypot ;
|
||||||
|
SuiteSparse_config.divcomplex_func = SuiteSparse_divcomplex ;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* -------------------------------------------------------------------------- */
|
||||||
|
/* SuiteSparse_finish */
|
||||||
|
/* -------------------------------------------------------------------------- */
|
||||||
|
|
||||||
|
/* This currently does nothing, but in the future, applications should call
|
||||||
|
SuiteSparse_start before calling any SuiteSparse function, and then
|
||||||
|
SuiteSparse_finish after calling the last SuiteSparse function, just before
|
||||||
|
exiting. In a multithreaded application, only a single thread should call
|
||||||
|
this function.
|
||||||
|
|
||||||
|
Future releases of SuiteSparse might use this function for any
|
||||||
|
SuiteSparse-wide cleanup operations or finalization of statistics.
|
||||||
|
*/
|
||||||
|
|
||||||
|
void SuiteSparse_finish ( void )
|
||||||
|
{
|
||||||
|
/* do nothing */ ;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* -------------------------------------------------------------------------- */
|
||||||
|
/* SuiteSparse_malloc: malloc wrapper */
|
||||||
|
/* -------------------------------------------------------------------------- */
|
||||||
|
|
||||||
|
void *SuiteSparse_malloc /* pointer to allocated block of memory */
|
||||||
|
(
|
||||||
|
size_t nitems, /* number of items to malloc */
|
||||||
|
size_t size_of_item /* sizeof each item */
|
||||||
|
)
|
||||||
|
{
|
||||||
|
void *p ;
|
||||||
|
size_t size ;
|
||||||
|
if (nitems < 1) nitems = 1 ;
|
||||||
|
if (size_of_item < 1) size_of_item = 1 ;
|
||||||
|
size = nitems * size_of_item ;
|
||||||
|
|
||||||
|
if (size != ((double) nitems) * size_of_item)
|
||||||
|
{
|
||||||
|
/* size_t overflow */
|
||||||
|
p = NULL ;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
p = (void *) (SuiteSparse_config.malloc_func) (size) ;
|
||||||
|
}
|
||||||
|
return (p) ;
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
/* -------------------------------------------------------------------------- */
|
||||||
|
/* SuiteSparse_calloc: calloc wrapper */
|
||||||
|
/* -------------------------------------------------------------------------- */
|
||||||
|
|
||||||
|
void *SuiteSparse_calloc /* pointer to allocated block of memory */
|
||||||
|
(
|
||||||
|
size_t nitems, /* number of items to calloc */
|
||||||
|
size_t size_of_item /* sizeof each item */
|
||||||
|
)
|
||||||
|
{
|
||||||
|
void *p ;
|
||||||
|
size_t size ;
|
||||||
|
if (nitems < 1) nitems = 1 ;
|
||||||
|
if (size_of_item < 1) size_of_item = 1 ;
|
||||||
|
size = nitems * size_of_item ;
|
||||||
|
|
||||||
|
if (size != ((double) nitems) * size_of_item)
|
||||||
|
{
|
||||||
|
/* size_t overflow */
|
||||||
|
p = NULL ;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
p = (void *) (SuiteSparse_config.calloc_func) (nitems, size_of_item) ;
|
||||||
|
}
|
||||||
|
return (p) ;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* -------------------------------------------------------------------------- */
|
||||||
|
/* SuiteSparse_realloc: realloc wrapper */
|
||||||
|
/* -------------------------------------------------------------------------- */
|
||||||
|
|
||||||
|
/* If p is non-NULL on input, it points to a previously allocated object of
|
||||||
|
size nitems_old * size_of_item. The object is reallocated to be of size
|
||||||
|
nitems_new * size_of_item. If p is NULL on input, then a new object of that
|
||||||
|
size is allocated. On success, a pointer to the new object is returned,
|
||||||
|
and ok is returned as 1. If the allocation fails, ok is set to 0 and a
|
||||||
|
pointer to the old (unmodified) object is returned.
|
||||||
|
*/
|
||||||
|
|
||||||
|
void *SuiteSparse_realloc /* pointer to reallocated block of memory, or
|
||||||
|
to original block if the realloc failed. */
|
||||||
|
(
|
||||||
|
size_t nitems_new, /* new number of items in the object */
|
||||||
|
size_t nitems_old, /* old number of items in the object */
|
||||||
|
size_t size_of_item, /* sizeof each item */
|
||||||
|
void *p, /* old object to reallocate */
|
||||||
|
int *ok /* 1 if successful, 0 otherwise */
|
||||||
|
)
|
||||||
|
{
|
||||||
|
size_t size ;
|
||||||
|
if (nitems_old < 1) nitems_old = 1 ;
|
||||||
|
if (nitems_new < 1) nitems_new = 1 ;
|
||||||
|
if (size_of_item < 1) size_of_item = 1 ;
|
||||||
|
size = nitems_new * size_of_item ;
|
||||||
|
|
||||||
|
if (size != ((double) nitems_new) * size_of_item)
|
||||||
|
{
|
||||||
|
/* size_t overflow */
|
||||||
|
(*ok) = 0 ;
|
||||||
|
}
|
||||||
|
else if (p == NULL)
|
||||||
|
{
|
||||||
|
/* a fresh object is being allocated */
|
||||||
|
p = SuiteSparse_malloc (nitems_new, size_of_item) ;
|
||||||
|
(*ok) = (p != NULL) ;
|
||||||
|
}
|
||||||
|
else if (nitems_old == nitems_new)
|
||||||
|
{
|
||||||
|
/* the object does not change; do nothing */
|
||||||
|
(*ok) = 1 ;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
/* change the size of the object from nitems_old to nitems_new */
|
||||||
|
void *pnew ;
|
||||||
|
pnew = (void *) (SuiteSparse_config.realloc_func) (p, size) ;
|
||||||
|
if (pnew == NULL)
|
||||||
|
{
|
||||||
|
if (nitems_new < nitems_old)
|
||||||
|
{
|
||||||
|
/* the attempt to reduce the size of the block failed, but
|
||||||
|
the old block is unchanged. So pretend to succeed. */
|
||||||
|
(*ok) = 1 ;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
/* out of memory */
|
||||||
|
(*ok) = 0 ;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
/* success */
|
||||||
|
p = pnew ;
|
||||||
|
(*ok) = 1 ;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
return (p) ;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* -------------------------------------------------------------------------- */
|
||||||
|
/* SuiteSparse_free: free wrapper */
|
||||||
|
/* -------------------------------------------------------------------------- */
|
||||||
|
|
||||||
|
void *SuiteSparse_free /* always returns NULL */
|
||||||
|
(
|
||||||
|
void *p /* block to free */
|
||||||
|
)
|
||||||
|
{
|
||||||
|
if (p)
|
||||||
|
{
|
||||||
|
(SuiteSparse_config.free_func) (p) ;
|
||||||
|
}
|
||||||
|
return (NULL) ;
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
/* -------------------------------------------------------------------------- */
|
||||||
|
/* SuiteSparse_tic: return current wall clock time */
|
||||||
|
/* -------------------------------------------------------------------------- */
|
||||||
|
|
||||||
|
/* Returns the number of seconds (tic [0]) and nanoseconds (tic [1]) since some
|
||||||
|
* unspecified but fixed time in the past. If no timer is installed, zero is
|
||||||
|
* returned. A scalar double precision value for 'tic' could be used, but this
|
||||||
|
* might cause loss of precision because clock_getttime returns the time from
|
||||||
|
* some distant time in the past. Thus, an array of size 2 is used.
|
||||||
|
*
|
||||||
|
* The timer is enabled by default. To disable the timer, compile with
|
||||||
|
* -DNTIMER. If enabled on a POSIX C 1993 system, the timer requires linking
|
||||||
|
* with the -lrt library.
|
||||||
|
*
|
||||||
|
* example:
|
||||||
|
*
|
||||||
|
* double tic [2], r, s, t ;
|
||||||
|
* SuiteSparse_tic (tic) ; // start the timer
|
||||||
|
* // do some work A
|
||||||
|
* t = SuiteSparse_toc (tic) ; // t is time for work A, in seconds
|
||||||
|
* // do some work B
|
||||||
|
* s = SuiteSparse_toc (tic) ; // s is time for work A and B, in seconds
|
||||||
|
* SuiteSparse_tic (tic) ; // restart the timer
|
||||||
|
* // do some work C
|
||||||
|
* r = SuiteSparse_toc (tic) ; // s is time for work C, in seconds
|
||||||
|
*
|
||||||
|
* A double array of size 2 is used so that this routine can be more easily
|
||||||
|
* ported to non-POSIX systems. The caller does not rely on the POSIX
|
||||||
|
* <time.h> include file.
|
||||||
|
*/
|
||||||
|
|
||||||
|
#ifdef SUITESPARSE_TIMER_ENABLED
|
||||||
|
|
||||||
|
#include <time.h>
|
||||||
|
|
||||||
|
void SuiteSparse_tic
|
||||||
|
(
|
||||||
|
double tic [2] /* output, contents undefined on input */
|
||||||
|
)
|
||||||
|
{
|
||||||
|
/* POSIX C 1993 timer, requires -librt */
|
||||||
|
struct timespec t ;
|
||||||
|
clock_gettime (CLOCK_MONOTONIC, &t) ;
|
||||||
|
tic [0] = (double) (t.tv_sec) ;
|
||||||
|
tic [1] = (double) (t.tv_nsec) ;
|
||||||
|
}
|
||||||
|
|
||||||
|
#else
|
||||||
|
|
||||||
|
void SuiteSparse_tic
|
||||||
|
(
|
||||||
|
double tic [2] /* output, contents undefined on input */
|
||||||
|
)
|
||||||
|
{
|
||||||
|
/* no timer installed */
|
||||||
|
tic [0] = 0 ;
|
||||||
|
tic [1] = 0 ;
|
||||||
|
}
|
||||||
|
|
||||||
|
#endif
|
||||||
|
|
||||||
|
|
||||||
|
/* -------------------------------------------------------------------------- */
|
||||||
|
/* SuiteSparse_toc: return time since last tic */
|
||||||
|
/* -------------------------------------------------------------------------- */
|
||||||
|
|
||||||
|
/* Assuming SuiteSparse_tic is accurate to the nanosecond, this function is
|
||||||
|
* accurate down to the nanosecond for 2^53 nanoseconds since the last call to
|
||||||
|
* SuiteSparse_tic, which is sufficient for SuiteSparse (about 104 days). If
|
||||||
|
* additional accuracy is required, the caller can use two calls to
|
||||||
|
* SuiteSparse_tic and do the calculations differently.
|
||||||
|
*/
|
||||||
|
|
||||||
|
double SuiteSparse_toc /* returns time in seconds since last tic */
|
||||||
|
(
|
||||||
|
double tic [2] /* input, not modified from last call to SuiteSparse_tic */
|
||||||
|
)
|
||||||
|
{
|
||||||
|
double toc [2] ;
|
||||||
|
SuiteSparse_tic (toc) ;
|
||||||
|
return ((toc [0] - tic [0]) + 1e-9 * (toc [1] - tic [1])) ;
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
/* -------------------------------------------------------------------------- */
|
||||||
|
/* SuiteSparse_time: return current wallclock time in seconds */
|
||||||
|
/* -------------------------------------------------------------------------- */
|
||||||
|
|
||||||
|
/* This function might not be accurate down to the nanosecond. */
|
||||||
|
|
||||||
|
double SuiteSparse_time /* returns current wall clock time in seconds */
|
||||||
|
(
|
||||||
|
void
|
||||||
|
)
|
||||||
|
{
|
||||||
|
double toc [2] ;
|
||||||
|
SuiteSparse_tic (toc) ;
|
||||||
|
return (toc [0] + 1e-9 * toc [1]) ;
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
/* -------------------------------------------------------------------------- */
|
||||||
|
/* SuiteSparse_version: return the current version of SuiteSparse */
|
||||||
|
/* -------------------------------------------------------------------------- */
|
||||||
|
|
||||||
|
int SuiteSparse_version
|
||||||
|
(
|
||||||
|
int version [3]
|
||||||
|
)
|
||||||
|
{
|
||||||
|
if (version != NULL)
|
||||||
|
{
|
||||||
|
version [0] = SUITESPARSE_MAIN_VERSION ;
|
||||||
|
version [1] = SUITESPARSE_SUB_VERSION ;
|
||||||
|
version [2] = SUITESPARSE_SUBSUB_VERSION ;
|
||||||
|
}
|
||||||
|
return (SUITESPARSE_VERSION) ;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* -------------------------------------------------------------------------- */
|
||||||
|
/* SuiteSparse_hypot */
|
||||||
|
/* -------------------------------------------------------------------------- */
|
||||||
|
|
||||||
|
/* There is an equivalent routine called hypot in <math.h>, which conforms
|
||||||
|
* to ANSI C99. However, SuiteSparse does not assume that ANSI C99 is
|
||||||
|
* available. You can use the ANSI C99 hypot routine with:
|
||||||
|
*
|
||||||
|
* #include <math.h>
|
||||||
|
*i SuiteSparse_config.hypot_func = hypot ;
|
||||||
|
*
|
||||||
|
* Default value of the SuiteSparse_config.hypot_func pointer is
|
||||||
|
* SuiteSparse_hypot, defined below.
|
||||||
|
*
|
||||||
|
* s = hypot (x,y) computes s = sqrt (x*x + y*y) but does so more accurately.
|
||||||
|
* The NaN cases for the double relops x >= y and x+y == x are safely ignored.
|
||||||
|
*
|
||||||
|
* Source: Algorithm 312, "Absolute value and square root of a complex number,"
|
||||||
|
* P. Friedland, Comm. ACM, vol 10, no 10, October 1967, page 665.
|
||||||
|
*/
|
||||||
|
|
||||||
|
double SuiteSparse_hypot (double x, double y)
|
||||||
|
{
|
||||||
|
double s, r ;
|
||||||
|
x = fabs (x) ;
|
||||||
|
y = fabs (y) ;
|
||||||
|
if (x >= y)
|
||||||
|
{
|
||||||
|
if (x + y == x)
|
||||||
|
{
|
||||||
|
s = x ;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
r = y / x ;
|
||||||
|
s = x * sqrt (1.0 + r*r) ;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
if (y + x == y)
|
||||||
|
{
|
||||||
|
s = y ;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
r = x / y ;
|
||||||
|
s = y * sqrt (1.0 + r*r) ;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
return (s) ;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* -------------------------------------------------------------------------- */
|
||||||
|
/* SuiteSparse_divcomplex */
|
||||||
|
/* -------------------------------------------------------------------------- */
|
||||||
|
|
||||||
|
/* c = a/b where c, a, and b are complex. The real and imaginary parts are
|
||||||
|
* passed as separate arguments to this routine. The NaN case is ignored
|
||||||
|
* for the double relop br >= bi. Returns 1 if the denominator is zero,
|
||||||
|
* 0 otherwise.
|
||||||
|
*
|
||||||
|
* This uses ACM Algo 116, by R. L. Smith, 1962, which tries to avoid
|
||||||
|
* underflow and overflow.
|
||||||
|
*
|
||||||
|
* c can be the same variable as a or b.
|
||||||
|
*
|
||||||
|
* Default value of the SuiteSparse_config.divcomplex_func pointer is
|
||||||
|
* SuiteSparse_divcomplex.
|
||||||
|
*/
|
||||||
|
|
||||||
|
int SuiteSparse_divcomplex
|
||||||
|
(
|
||||||
|
double ar, double ai, /* real and imaginary parts of a */
|
||||||
|
double br, double bi, /* real and imaginary parts of b */
|
||||||
|
double *cr, double *ci /* real and imaginary parts of c */
|
||||||
|
)
|
||||||
|
{
|
||||||
|
double tr, ti, r, den ;
|
||||||
|
if (fabs (br) >= fabs (bi))
|
||||||
|
{
|
||||||
|
r = bi / br ;
|
||||||
|
den = br + r * bi ;
|
||||||
|
tr = (ar + ai * r) / den ;
|
||||||
|
ti = (ai - ar * r) / den ;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
r = br / bi ;
|
||||||
|
den = r * br + bi ;
|
||||||
|
tr = (ar * r + ai) / den ;
|
||||||
|
ti = (ai * r - ar) / den ;
|
||||||
|
}
|
||||||
|
*cr = tr ;
|
||||||
|
*ci = ti ;
|
||||||
|
return (den == 0.) ;
|
||||||
|
}
|
||||||
|
|
@ -0,0 +1,248 @@
|
||||||
|
/* ========================================================================== */
|
||||||
|
/* === SuiteSparse_config =================================================== */
|
||||||
|
/* ========================================================================== */
|
||||||
|
|
||||||
|
/* Configuration file for SuiteSparse: a Suite of Sparse matrix packages
|
||||||
|
* (AMD, COLAMD, CCOLAMD, CAMD, CHOLMOD, UMFPACK, CXSparse, and others).
|
||||||
|
*
|
||||||
|
* SuiteSparse_config.h provides the definition of the long integer. On most
|
||||||
|
* systems, a C program can be compiled in LP64 mode, in which long's and
|
||||||
|
* pointers are both 64-bits, and int's are 32-bits. Windows 64, however, uses
|
||||||
|
* the LLP64 model, in which int's and long's are 32-bits, and long long's and
|
||||||
|
* pointers are 64-bits.
|
||||||
|
*
|
||||||
|
* SuiteSparse packages that include long integer versions are
|
||||||
|
* intended for the LP64 mode. However, as a workaround for Windows 64
|
||||||
|
* (and perhaps other systems), the long integer can be redefined.
|
||||||
|
*
|
||||||
|
* If _WIN64 is defined, then the __int64 type is used instead of long.
|
||||||
|
*
|
||||||
|
* The long integer can also be defined at compile time. For example, this
|
||||||
|
* could be added to SuiteSparse_config.mk:
|
||||||
|
*
|
||||||
|
* CFLAGS = -O -D'SuiteSparse_long=long long' \
|
||||||
|
* -D'SuiteSparse_long_max=9223372036854775801' -D'SuiteSparse_long_idd="lld"'
|
||||||
|
*
|
||||||
|
* This file defines SuiteSparse_long as either long (on all but _WIN64) or
|
||||||
|
* __int64 on Windows 64. The intent is that a SuiteSparse_long is always a
|
||||||
|
* 64-bit integer in a 64-bit code. ptrdiff_t might be a better choice than
|
||||||
|
* long; it is always the same size as a pointer.
|
||||||
|
*
|
||||||
|
* This file also defines the SUITESPARSE_VERSION and related definitions.
|
||||||
|
*
|
||||||
|
* Copyright (c) 2012, Timothy A. Davis. No licensing restrictions apply
|
||||||
|
* to this file or to the SuiteSparse_config directory.
|
||||||
|
* Author: Timothy A. Davis.
|
||||||
|
*/
|
||||||
|
|
||||||
|
#ifndef SUITESPARSE_CONFIG_H
|
||||||
|
#define SUITESPARSE_CONFIG_H
|
||||||
|
|
||||||
|
#ifdef __cplusplus
|
||||||
|
extern "C" {
|
||||||
|
#endif
|
||||||
|
|
||||||
|
#include <limits.h>
|
||||||
|
#include <stdlib.h>
|
||||||
|
|
||||||
|
/* ========================================================================== */
|
||||||
|
/* === SuiteSparse_long ===================================================== */
|
||||||
|
/* ========================================================================== */
|
||||||
|
|
||||||
|
#ifndef SuiteSparse_long
|
||||||
|
|
||||||
|
#ifdef _WIN64
|
||||||
|
|
||||||
|
#define SuiteSparse_long __int64
|
||||||
|
#define SuiteSparse_long_max _I64_MAX
|
||||||
|
#define SuiteSparse_long_idd "I64d"
|
||||||
|
|
||||||
|
#else
|
||||||
|
|
||||||
|
#define SuiteSparse_long long
|
||||||
|
#define SuiteSparse_long_max LONG_MAX
|
||||||
|
#define SuiteSparse_long_idd "ld"
|
||||||
|
|
||||||
|
#endif
|
||||||
|
#define SuiteSparse_long_id "%" SuiteSparse_long_idd
|
||||||
|
#endif
|
||||||
|
|
||||||
|
/* ========================================================================== */
|
||||||
|
/* === SuiteSparse_config parameters and functions ========================== */
|
||||||
|
/* ========================================================================== */
|
||||||
|
|
||||||
|
/* SuiteSparse-wide parameters are placed in this struct. It is meant to be
|
||||||
|
an extern, globally-accessible struct. It is not meant to be updated
|
||||||
|
frequently by multiple threads. Rather, if an application needs to modify
|
||||||
|
SuiteSparse_config, it should do it once at the beginning of the application,
|
||||||
|
before multiple threads are launched.
|
||||||
|
|
||||||
|
The intent of these function pointers is that they not be used in your
|
||||||
|
application directly, except to assign them to the desired user-provided
|
||||||
|
functions. Rather, you should use the
|
||||||
|
*/
|
||||||
|
|
||||||
|
struct SuiteSparse_config_struct
|
||||||
|
{
|
||||||
|
void *(*malloc_func) (size_t) ; /* pointer to malloc */
|
||||||
|
void *(*calloc_func) (size_t, size_t) ; /* pointer to calloc */
|
||||||
|
void *(*realloc_func) (void *, size_t) ; /* pointer to realloc */
|
||||||
|
void (*free_func) (void *) ; /* pointer to free */
|
||||||
|
int (*printf_func) (const char *, ...) ; /* pointer to printf */
|
||||||
|
double (*hypot_func) (double, double) ; /* pointer to hypot */
|
||||||
|
int (*divcomplex_func) (double, double, double, double, double *, double *);
|
||||||
|
} ;
|
||||||
|
|
||||||
|
extern struct SuiteSparse_config_struct SuiteSparse_config ;
|
||||||
|
|
||||||
|
void SuiteSparse_start ( void ) ; /* called to start SuiteSparse */
|
||||||
|
|
||||||
|
void SuiteSparse_finish ( void ) ; /* called to finish SuiteSparse */
|
||||||
|
|
||||||
|
void *SuiteSparse_malloc /* pointer to allocated block of memory */
|
||||||
|
(
|
||||||
|
size_t nitems, /* number of items to malloc (>=1 is enforced) */
|
||||||
|
size_t size_of_item /* sizeof each item */
|
||||||
|
) ;
|
||||||
|
|
||||||
|
void *SuiteSparse_calloc /* pointer to allocated block of memory */
|
||||||
|
(
|
||||||
|
size_t nitems, /* number of items to calloc (>=1 is enforced) */
|
||||||
|
size_t size_of_item /* sizeof each item */
|
||||||
|
) ;
|
||||||
|
|
||||||
|
void *SuiteSparse_realloc /* pointer to reallocated block of memory, or
|
||||||
|
to original block if the realloc failed. */
|
||||||
|
(
|
||||||
|
size_t nitems_new, /* new number of items in the object */
|
||||||
|
size_t nitems_old, /* old number of items in the object */
|
||||||
|
size_t size_of_item, /* sizeof each item */
|
||||||
|
void *p, /* old object to reallocate */
|
||||||
|
int *ok /* 1 if successful, 0 otherwise */
|
||||||
|
) ;
|
||||||
|
|
||||||
|
void *SuiteSparse_free /* always returns NULL */
|
||||||
|
(
|
||||||
|
void *p /* block to free */
|
||||||
|
) ;
|
||||||
|
|
||||||
|
void SuiteSparse_tic /* start the timer */
|
||||||
|
(
|
||||||
|
double tic [2] /* output, contents undefined on input */
|
||||||
|
) ;
|
||||||
|
|
||||||
|
double SuiteSparse_toc /* return time in seconds since last tic */
|
||||||
|
(
|
||||||
|
double tic [2] /* input: from last call to SuiteSparse_tic */
|
||||||
|
) ;
|
||||||
|
|
||||||
|
double SuiteSparse_time /* returns current wall clock time in seconds */
|
||||||
|
(
|
||||||
|
void
|
||||||
|
) ;
|
||||||
|
|
||||||
|
/* returns sqrt (x^2 + y^2), computed reliably */
|
||||||
|
double SuiteSparse_hypot (double x, double y) ;
|
||||||
|
|
||||||
|
/* complex division of c = a/b */
|
||||||
|
int SuiteSparse_divcomplex
|
||||||
|
(
|
||||||
|
double ar, double ai, /* real and imaginary parts of a */
|
||||||
|
double br, double bi, /* real and imaginary parts of b */
|
||||||
|
double *cr, double *ci /* real and imaginary parts of c */
|
||||||
|
) ;
|
||||||
|
|
||||||
|
/* determine which timer to use, if any */
|
||||||
|
#ifndef NTIMER
|
||||||
|
#ifdef _POSIX_C_SOURCE
|
||||||
|
#if _POSIX_C_SOURCE >= 199309L
|
||||||
|
#define SUITESPARSE_TIMER_ENABLED
|
||||||
|
#endif
|
||||||
|
#endif
|
||||||
|
#endif
|
||||||
|
|
||||||
|
/* SuiteSparse printf macro */
|
||||||
|
#define SUITESPARSE_PRINTF(params) \
|
||||||
|
{ \
|
||||||
|
if (SuiteSparse_config.printf_func != NULL) \
|
||||||
|
{ \
|
||||||
|
(void) (SuiteSparse_config.printf_func) params ; \
|
||||||
|
} \
|
||||||
|
}
|
||||||
|
|
||||||
|
/* ========================================================================== */
|
||||||
|
/* === SuiteSparse version ================================================== */
|
||||||
|
/* ========================================================================== */
|
||||||
|
|
||||||
|
/* SuiteSparse is not a package itself, but a collection of packages, some of
|
||||||
|
* which must be used together (UMFPACK requires AMD, CHOLMOD requires AMD,
|
||||||
|
* COLAMD, CAMD, and CCOLAMD, etc). A version number is provided here for the
|
||||||
|
* collection itself. The versions of packages within each version of
|
||||||
|
* SuiteSparse are meant to work together. Combining one package from one
|
||||||
|
* version of SuiteSparse, with another package from another version of
|
||||||
|
* SuiteSparse, may or may not work.
|
||||||
|
*
|
||||||
|
* SuiteSparse contains the following packages:
|
||||||
|
*
|
||||||
|
* SuiteSparse_config version 4.5.2 (version always the same as SuiteSparse)
|
||||||
|
* AMD version 2.4.5
|
||||||
|
* BTF version 1.2.5
|
||||||
|
* CAMD version 2.4.5
|
||||||
|
* CCOLAMD version 2.9.5
|
||||||
|
* CHOLMOD version 3.0.10
|
||||||
|
* COLAMD version 2.9.5
|
||||||
|
* CSparse version 3.1.8
|
||||||
|
* CXSparse version 3.1.8
|
||||||
|
* GPUQREngine version 1.0.4
|
||||||
|
* KLU version 1.3.7
|
||||||
|
* LDL version 2.2.5
|
||||||
|
* RBio version 2.2.5
|
||||||
|
* SPQR version 2.0.6
|
||||||
|
* SuiteSparse_GPURuntime version 1.0.4
|
||||||
|
* UMFPACK version 5.7.5
|
||||||
|
* MATLAB_Tools various packages & M-files
|
||||||
|
* xerbla version 1.0.2
|
||||||
|
*
|
||||||
|
* Other package dependencies:
|
||||||
|
* BLAS required by CHOLMOD and UMFPACK
|
||||||
|
* LAPACK required by CHOLMOD
|
||||||
|
* METIS 5.1.0 required by CHOLMOD (optional) and KLU (optional)
|
||||||
|
* CUBLAS, CUDART NVIDIA libraries required by CHOLMOD and SPQR when
|
||||||
|
* they are compiled with GPU acceleration.
|
||||||
|
*/
|
||||||
|
|
||||||
|
|
||||||
|
int SuiteSparse_version /* returns SUITESPARSE_VERSION */
|
||||||
|
(
|
||||||
|
/* output, not defined on input. Not used if NULL. Returns
|
||||||
|
the three version codes in version [0..2]:
|
||||||
|
version [0] is SUITESPARSE_MAIN_VERSION
|
||||||
|
version [1] is SUITESPARSE_SUB_VERSION
|
||||||
|
version [2] is SUITESPARSE_SUBSUB_VERSION
|
||||||
|
*/
|
||||||
|
int version [3]
|
||||||
|
) ;
|
||||||
|
|
||||||
|
/* Versions prior to 4.2.0 do not have the above function. The following
|
||||||
|
code fragment will work with any version of SuiteSparse:
|
||||||
|
|
||||||
|
#ifdef SUITESPARSE_HAS_VERSION_FUNCTION
|
||||||
|
v = SuiteSparse_version (NULL) ;
|
||||||
|
#else
|
||||||
|
v = SUITESPARSE_VERSION ;
|
||||||
|
#endif
|
||||||
|
*/
|
||||||
|
#define SUITESPARSE_HAS_VERSION_FUNCTION
|
||||||
|
|
||||||
|
#define SUITESPARSE_DATE "Apr 1, 2016"
|
||||||
|
#define SUITESPARSE_VER_CODE(main,sub) ((main) * 1000 + (sub))
|
||||||
|
#define SUITESPARSE_MAIN_VERSION 4
|
||||||
|
#define SUITESPARSE_SUB_VERSION 5
|
||||||
|
#define SUITESPARSE_SUBSUB_VERSION 2
|
||||||
|
#define SUITESPARSE_VERSION \
|
||||||
|
SUITESPARSE_VER_CODE(SUITESPARSE_MAIN_VERSION,SUITESPARSE_SUB_VERSION)
|
||||||
|
|
||||||
|
#ifdef __cplusplus
|
||||||
|
}
|
||||||
|
#endif
|
||||||
|
#endif
|
||||||
|
|
@ -0,0 +1,600 @@
|
||||||
|
#===============================================================================
|
||||||
|
# SuiteSparse_config.mk: common configuration file for the SuiteSparse
|
||||||
|
#===============================================================================
|
||||||
|
|
||||||
|
# This file contains all configuration settings for all packages in SuiteSparse,
|
||||||
|
# except for CSparse (which is stand-alone) and the packages in MATLAB_Tools.
|
||||||
|
|
||||||
|
SUITESPARSE_VERSION = 4.5.2
|
||||||
|
|
||||||
|
#===============================================================================
|
||||||
|
# Options you can change without editing this file:
|
||||||
|
#===============================================================================
|
||||||
|
|
||||||
|
# To list the options you can modify at the 'make' command line, type
|
||||||
|
# 'make config', which also lists their default values. You can then
|
||||||
|
# change them with 'make OPTION=value'. For example, to use an INSTALL
|
||||||
|
# path of /my/path, and to use your own BLAS and LAPACK libraries, do:
|
||||||
|
#
|
||||||
|
# make install INSTALL=/my/path BLAS=-lmyblas LAPACK=-lmylapackgoeshere
|
||||||
|
#
|
||||||
|
# which will install the package into /my/path/lib and /my/path/include,
|
||||||
|
# and use -lmyblas -lmylapackgoes here when building the demo program.
|
||||||
|
|
||||||
|
#===============================================================================
|
||||||
|
# Defaults for any system
|
||||||
|
#===============================================================================
|
||||||
|
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
# SuiteSparse root directory
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
|
||||||
|
# Most Makefiles are in SuiteSparse/Pkg/Lib or SuiteSparse/Pkg/Demo, so
|
||||||
|
# the top-level of SuiteSparse is in ../.. unless otherwise specified.
|
||||||
|
# This is true for all but the SuiteSparse_config package.
|
||||||
|
SUITESPARSE ?= $(realpath $(CURDIR)/../..)
|
||||||
|
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
# installation location
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
|
||||||
|
# For "make install" and "make uninstall", the default location is
|
||||||
|
# SuiteSparse/lib, SuiteSparse/include, and
|
||||||
|
# SuiteSparse/share/doc/suitesparse-x.y.z
|
||||||
|
# If you do this:
|
||||||
|
# make install INSTALL=/usr/local
|
||||||
|
# then the libraries are installed in /usr/local/lib, include files in
|
||||||
|
# /usr/local/include, and documentation in
|
||||||
|
# /usr/local/share/doc/suitesparse-x.y.z.
|
||||||
|
# You can instead specify the install location of each of these 3 components
|
||||||
|
# separately, via (for example):
|
||||||
|
# make install INSTALL_LIB=/yada/mylibs INSTALL_INCLUDE=/yoda/myinc \
|
||||||
|
# INSTALL_DOC=/solo/mydox
|
||||||
|
# which puts the libraries in /yada/mylibs, include files in /yoda/myinc,
|
||||||
|
# and documentation in /solo/mydox.
|
||||||
|
INSTALL ?= $(SUITESPARSE)
|
||||||
|
INSTALL_LIB ?= $(INSTALL)/lib
|
||||||
|
INSTALL_INCLUDE ?= $(INSTALL)/include
|
||||||
|
INSTALL_DOC ?= $(INSTALL)/share/doc/suitesparse-$(SUITESPARSE_VERSION)
|
||||||
|
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
# optimization level
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
|
||||||
|
OPTIMIZATION ?= -O3
|
||||||
|
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
# statement coverage for */Tcov
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
|
||||||
|
ifeq ($(TCOV),yes)
|
||||||
|
# Each package has a */Tcov directory for extensive testing, including
|
||||||
|
# statement coverage. The Tcov tests require Linux and gcc, and use
|
||||||
|
# the vanilla BLAS. For those tests, the packages use 'make TCOV=yes',
|
||||||
|
# which overrides the following settings:
|
||||||
|
MKLROOT =
|
||||||
|
AUTOCC = no
|
||||||
|
CC = gcc
|
||||||
|
CXX = g++
|
||||||
|
BLAS = -lrefblas -lgfortran -lstdc++
|
||||||
|
LAPACK = -llapack
|
||||||
|
CFLAGS += --coverage
|
||||||
|
OPTIMIZATION = -g
|
||||||
|
LDFLAGS += --coverage
|
||||||
|
endif
|
||||||
|
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
# CFLAGS for the C/C++ compiler
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
|
||||||
|
# The CF macro is used by SuiteSparse Makefiles as a combination of
|
||||||
|
# CFLAGS, CPPFLAGS, TARGET_ARCH, and system-dependent settings.
|
||||||
|
CF ?= $(CFLAGS) $(CPPFLAGS) $(TARGET_ARCH) $(OPTIMIZATION) -fexceptions -fPIC
|
||||||
|
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
# OpenMP is used in CHOLMOD
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
|
||||||
|
# with gcc, enable OpenMP directives via -fopenmp
|
||||||
|
# This is not supported on Darwin, so this string is cleared, below.
|
||||||
|
CFOPENMP ?= -fopenmp
|
||||||
|
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
# compiler
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
|
||||||
|
# By default, look for the Intel compilers. If present, they are used
|
||||||
|
# instead of $(CC), $(CXX), and $(F77). To disable this feature and
|
||||||
|
# use the $(CC), $(CXX), and $(F77) compilers, use 'make AUTOCC=no'
|
||||||
|
|
||||||
|
AUTOCC ?= yes
|
||||||
|
|
||||||
|
ifneq ($(AUTOCC),no)
|
||||||
|
ifneq ($(shell which icc 2>/dev/null),)
|
||||||
|
# use the Intel icc compiler for C codes, and -qopenmp for OpenMP
|
||||||
|
CC = icc -D_GNU_SOURCE
|
||||||
|
CXX = $(CC)
|
||||||
|
CFOPENMP = -qopenmp -I$(MKLROOT)/include
|
||||||
|
endif
|
||||||
|
ifneq ($(shell which ifort 2>/dev/null),)
|
||||||
|
# use the Intel ifort compiler for Fortran codes
|
||||||
|
F77 = ifort
|
||||||
|
endif
|
||||||
|
endif
|
||||||
|
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
# code formatting (for Tcov only)
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
|
||||||
|
PRETTY ?= grep -v "^\#" | indent -bl -nce -bli0 -i4 -sob -l120
|
||||||
|
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
# required libraries
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
|
||||||
|
# SuiteSparse requires the BLAS, LAPACK, and -lm (Math) libraries.
|
||||||
|
# It places its shared *.so libraries in SuiteSparse/lib.
|
||||||
|
# Linux also requires the -lrt library (see below)
|
||||||
|
LDLIBS ?= -lm
|
||||||
|
LDFLAGS += -L$(INSTALL_LIB)
|
||||||
|
|
||||||
|
# See http://www.openblas.net for a recent and freely available optimzed
|
||||||
|
# BLAS. LAPACK is at http://www.netlib.org/lapack/ . You can use the
|
||||||
|
# standard Fortran LAPACK along with OpenBLAS to obtain very good
|
||||||
|
# performance. This script can also detect if the Intel MKL BLAS is
|
||||||
|
# installed.
|
||||||
|
|
||||||
|
LAPACK ?= -llapack
|
||||||
|
|
||||||
|
ifndef BLAS
|
||||||
|
ifdef MKLROOT
|
||||||
|
# use the Intel MKL for BLAS and LAPACK
|
||||||
|
# using static linking:
|
||||||
|
# BLAS = -Wl,--start-group \
|
||||||
|
# $(MKLROOT)/lib/intel64/libmkl_intel_lp64.a \
|
||||||
|
# $(MKLROOT)/lib/intel64/libmkl_core.a \
|
||||||
|
# $(MKLROOT)/lib/intel64/libmkl_intel_thread.a \
|
||||||
|
# -Wl,--end-group -lpthread -lm
|
||||||
|
# using dynamic linking:
|
||||||
|
BLAS = -lmkl_intel_lp64 -lmkl_core -lmkl_intel_thread -lpthread -lm
|
||||||
|
LAPACK =
|
||||||
|
else
|
||||||
|
# use the OpenBLAS at http://www.openblas.net
|
||||||
|
BLAS = -lopenblas
|
||||||
|
endif
|
||||||
|
endif
|
||||||
|
|
||||||
|
# For ACML, use this instead:
|
||||||
|
# make BLAS='-lacml -lgfortran'
|
||||||
|
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
# shell commands
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
|
||||||
|
# ranlib, and ar, for generating libraries. If you don't need ranlib,
|
||||||
|
# just change it to RANLAB = echo
|
||||||
|
RANLIB ?= ranlib
|
||||||
|
ARCHIVE ?= $(AR) $(ARFLAGS)
|
||||||
|
CP ?= cp -f
|
||||||
|
MV ?= mv -f
|
||||||
|
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
# Fortran compiler (not required for 'make' or 'make library')
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
|
||||||
|
# A Fortran compiler is optional. Only required for the optional Fortran
|
||||||
|
# interfaces to AMD and UMFPACK. Not needed by 'make' or 'make install'
|
||||||
|
F77 ?= gfortran
|
||||||
|
F77FLAGS ?= $(FFLAGS) $(OPTIMIZATION)
|
||||||
|
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
# NVIDIA CUDA configuration for CHOLMOD and SPQR
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
|
||||||
|
# CUDA is detected automatically, and used if found. To disable CUDA,
|
||||||
|
# use CUDA=no
|
||||||
|
|
||||||
|
ifneq ($(CUDA),no)
|
||||||
|
CUDA_PATH = $(shell which nvcc 2>/dev/null | sed "s/\/bin\/nvcc//")
|
||||||
|
endif
|
||||||
|
|
||||||
|
ifeq ($(wildcard $(CUDA_PATH)),)
|
||||||
|
# CUDA is not present
|
||||||
|
CUDA_PATH =
|
||||||
|
GPU_BLAS_PATH =
|
||||||
|
GPU_CONFIG =
|
||||||
|
CUDART_LIB =
|
||||||
|
CUBLAS_LIB =
|
||||||
|
CUDA_INC_PATH =
|
||||||
|
CUDA_INC =
|
||||||
|
NVCC = echo
|
||||||
|
NVCCFLAGS =
|
||||||
|
else
|
||||||
|
# with CUDA for CHOLMOD and SPQR
|
||||||
|
GPU_BLAS_PATH = $(CUDA_PATH)
|
||||||
|
# GPU_CONFIG must include -DGPU_BLAS to compile SuiteSparse for the
|
||||||
|
# GPU. You can add additional GPU-related flags to it as well.
|
||||||
|
# with 4 cores (default):
|
||||||
|
GPU_CONFIG = -DGPU_BLAS
|
||||||
|
# For example, to compile CHOLMOD for 10 CPU cores when using the GPU:
|
||||||
|
# GPU_CONFIG = -DGPU_BLAS -DCHOLMOD_OMP_NUM_THREADS=10
|
||||||
|
CUDART_LIB = $(CUDA_PATH)/lib64/libcudart.so
|
||||||
|
CUBLAS_LIB = $(CUDA_PATH)/lib64/libcublas.so
|
||||||
|
CUDA_INC_PATH = $(CUDA_PATH)/include/
|
||||||
|
CUDA_INC = -I$(CUDA_INC_PATH)
|
||||||
|
NVCC = $(CUDA_PATH)/bin/nvcc
|
||||||
|
NVCCFLAGS = -Xcompiler -fPIC -O3 \
|
||||||
|
-gencode=arch=compute_20,code=sm_20 \
|
||||||
|
-gencode=arch=compute_30,code=sm_30 \
|
||||||
|
-gencode=arch=compute_35,code=sm_35 \
|
||||||
|
-gencode=arch=compute_50,code=sm_50 \
|
||||||
|
-gencode=arch=compute_50,code=compute_50
|
||||||
|
endif
|
||||||
|
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
# UMFPACK configuration:
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
|
||||||
|
# Configuration for UMFPACK. See UMFPACK/Source/umf_config.h for details.
|
||||||
|
#
|
||||||
|
# -DNBLAS do not use the BLAS. UMFPACK will be very slow.
|
||||||
|
# -D'LONGBLAS=long' or -DLONGBLAS='long long' defines the integers used by
|
||||||
|
# LAPACK and the BLAS (defaults to 'int')
|
||||||
|
# -DNSUNPERF do not use the Sun Perf. Library on Solaris
|
||||||
|
# -DNRECIPROCAL do not multiply by the reciprocal
|
||||||
|
# -DNO_DIVIDE_BY_ZERO do not divide by zero
|
||||||
|
# -DNCHOLMOD do not use CHOLMOD as a ordering method. If -DNCHOLMOD is
|
||||||
|
# included in UMFPACK_CONFIG, then UMFPACK does not rely on
|
||||||
|
# CHOLMOD, CAMD, CCOLAMD, COLAMD, and METIS.
|
||||||
|
|
||||||
|
UMFPACK_CONFIG ?=
|
||||||
|
|
||||||
|
# For example, uncomment this line to compile UMFPACK without CHOLMOD:
|
||||||
|
# UMFPACK_CONFIG = -DNCHOLMOD
|
||||||
|
# or use 'make UMFPACK_CONFIG=-DNCHOLMOD'
|
||||||
|
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
# CHOLMOD configuration
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
|
||||||
|
# CHOLMOD Library Modules, which appear in -lcholmod
|
||||||
|
# Core requires: none
|
||||||
|
# Check requires: Core
|
||||||
|
# Cholesky requires: Core, AMD, COLAMD. optional: Partition, Supernodal
|
||||||
|
# MatrixOps requires: Core
|
||||||
|
# Modify requires: Core
|
||||||
|
# Partition requires: Core, CCOLAMD, METIS. optional: Cholesky
|
||||||
|
# Supernodal requires: Core, BLAS, LAPACK
|
||||||
|
#
|
||||||
|
# CHOLMOD test/demo Modules (these do not appear in -lcholmod):
|
||||||
|
# Tcov requires: Core, Check, Cholesky, MatrixOps, Modify, Supernodal
|
||||||
|
# optional: Partition
|
||||||
|
# Valgrind same as Tcov
|
||||||
|
# Demo requires: Core, Check, Cholesky, MatrixOps, Supernodal
|
||||||
|
# optional: Partition
|
||||||
|
#
|
||||||
|
# Configuration flags:
|
||||||
|
# -DNCHECK do not include the Check module.
|
||||||
|
# -DNCHOLESKY do not include the Cholesky module.
|
||||||
|
# -DNPARTITION do not include the Partition module.
|
||||||
|
# also do not include METIS.
|
||||||
|
# -DNCAMD do not use CAMD & CCOLAMD in Parition Module.
|
||||||
|
# -DNMATRIXOPS do not include the MatrixOps module.
|
||||||
|
# -DNMODIFY do not include the Modify module.
|
||||||
|
# -DNSUPERNODAL do not include the Supernodal module.
|
||||||
|
#
|
||||||
|
# -DNPRINT do not print anything.
|
||||||
|
# -D'LONGBLAS=long' or -DLONGBLAS='long long' defines the integers used by
|
||||||
|
# LAPACK and the BLAS (defaults to 'int')
|
||||||
|
# -DNSUNPERF for Solaris only. If defined, do not use the Sun
|
||||||
|
# Performance Library
|
||||||
|
# -DGPU_BLAS enable the use of the CUDA BLAS
|
||||||
|
|
||||||
|
CHOLMOD_CONFIG ?= $(GPU_CONFIG)
|
||||||
|
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
# SuiteSparseQR configuration:
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
|
||||||
|
# The SuiteSparseQR library can be compiled with the following options:
|
||||||
|
#
|
||||||
|
# -DNPARTITION do not include the CHOLMOD partition module
|
||||||
|
# -DNEXPERT do not include the functions in SuiteSparseQR_expert.cpp
|
||||||
|
# -DHAVE_TBB enable the use of Intel's Threading Building Blocks
|
||||||
|
# -DGPU_BLAS enable the use of the CUDA BLAS
|
||||||
|
|
||||||
|
SPQR_CONFIG ?= $(GPU_CONFIG)
|
||||||
|
|
||||||
|
# to compile with Intel's TBB, use TBB=-ltbb SPQR_CONFIG=-DHAVE_TBB
|
||||||
|
TBB ?=
|
||||||
|
|
||||||
|
# TODO: this *mk file should auto-detect the presence of Intel's TBB,
|
||||||
|
# and set the compiler flags accordingly.
|
||||||
|
|
||||||
|
#===============================================================================
|
||||||
|
# System-dependent configurations
|
||||||
|
#===============================================================================
|
||||||
|
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
# determine what system we are on
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
|
||||||
|
# To disable these auto configurations, use 'make UNAME=custom'
|
||||||
|
|
||||||
|
ifndef UNAME
|
||||||
|
ifeq ($(OS),Windows_NT)
|
||||||
|
# Cygwin Make on Windows has an $(OS) variable, but not uname.
|
||||||
|
# Note that this option is untested.
|
||||||
|
UNAME = Windows
|
||||||
|
else
|
||||||
|
# Linux and Darwin (Mac OSX) have been tested.
|
||||||
|
UNAME := $(shell uname)
|
||||||
|
endif
|
||||||
|
endif
|
||||||
|
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
# Linux
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
|
||||||
|
ifeq ($(UNAME),Linux)
|
||||||
|
# add the realtime library, librt, and SuiteSparse/lib
|
||||||
|
LDLIBS += -lrt -Wl,-rpath=$(INSTALL_LIB)
|
||||||
|
endif
|
||||||
|
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
# Mac
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
|
||||||
|
ifeq ($(UNAME), Darwin)
|
||||||
|
# To compile on the Mac, you must install Xcode. Then do this at the
|
||||||
|
# command line in the Terminal, before doing 'make':
|
||||||
|
# xcode-select --install
|
||||||
|
CF += -fno-common
|
||||||
|
BLAS = -framework Accelerate
|
||||||
|
LAPACK = -framework Accelerate
|
||||||
|
# OpenMP is not yet supported by default in clang
|
||||||
|
CFOPENMP =
|
||||||
|
endif
|
||||||
|
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
# Solaris
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
|
||||||
|
ifeq ($(UNAME), SunOS)
|
||||||
|
# Using the Sun compiler and the Sun Performance Library
|
||||||
|
# This hasn't been tested recently.
|
||||||
|
# I leave it here in case you need it. It likely needs updating.
|
||||||
|
CF += -fast -KPIC -xc99=%none -xlibmieee -xlibmil -m64 -Xc
|
||||||
|
F77FLAGS = -O -fast -KPIC -dalign -xlibmil -m64
|
||||||
|
BLAS = -xlic_lib=sunperf
|
||||||
|
LAPACK =
|
||||||
|
# Using the GCC compiler and the reference BLAS
|
||||||
|
## CC = gcc
|
||||||
|
## CXX = g++
|
||||||
|
## MAKE = gmake
|
||||||
|
## BLAS = -lrefblas -lgfortran
|
||||||
|
## LAPACK = -llapack
|
||||||
|
endif
|
||||||
|
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
# IBM AIX
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
|
||||||
|
ifeq ($(UNAME), AIX)
|
||||||
|
# hasn't been tested for a very long time...
|
||||||
|
# I leave it here in case you need it. It likely needs updating.
|
||||||
|
CF += -O4 -qipa -qmaxmem=16384 -q64 -qproto -DBLAS_NO_UNDERSCORE
|
||||||
|
F77FLAGS = -O4 -qipa -qmaxmem=16384 -q64
|
||||||
|
BLAS = -lessl
|
||||||
|
LAPACK =
|
||||||
|
endif
|
||||||
|
|
||||||
|
#===============================================================================
|
||||||
|
# finalize the CF compiler flags
|
||||||
|
#===============================================================================
|
||||||
|
|
||||||
|
CF += $(CFOPENMP)
|
||||||
|
|
||||||
|
#===============================================================================
|
||||||
|
# internal configuration
|
||||||
|
#===============================================================================
|
||||||
|
|
||||||
|
# The user should not have to change these definitions, and they are
|
||||||
|
# not displayed by 'make config'
|
||||||
|
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
# for removing files not in the distribution
|
||||||
|
#---------------------------------------------------------------------------
|
||||||
|
|
||||||
|
# remove object files, but keep compiled libraries via 'make clean'
|
||||||
|
CLEAN = *.o *.obj *.ln *.bb *.bbg *.da *.tcov *.gcov gmon.out *.bak *.d \
|
||||||
|
*.gcda *.gcno *.aux *.bbl *.blg *.log *.toc *.dvi *.lof *.lot
|
||||||
|
|
||||||
|
# also remove compiled libraries, via 'make distclean'
|
||||||
|
PURGE = *.so* *.a *.dll *.dylib *.dSYM
|
||||||
|
|
||||||
|
# location of TCOV test output
|
||||||
|
TCOV_TMP ?= /tmp
|
||||||
|
|
||||||
|
#===============================================================================
|
||||||
|
# Building the shared and static libraries
|
||||||
|
#===============================================================================
|
||||||
|
|
||||||
|
# How to build/install shared and static libraries for Mac and Linux/Unix.
|
||||||
|
# This assumes that LIBRARY and VERSION have already been defined by the
|
||||||
|
# Makefile that includes this file.
|
||||||
|
|
||||||
|
SO_OPTS = $(LDFLAGS)
|
||||||
|
|
||||||
|
ifeq ($(UNAME),Windows)
|
||||||
|
# Cygwin Make on Windows (untested)
|
||||||
|
AR_TARGET = $(LIBRARY).lib
|
||||||
|
SO_PLAIN = $(LIBRARY).dll
|
||||||
|
SO_MAIN = $(LIBRARY).$(SO_VERSION).dll
|
||||||
|
SO_TARGET = $(LIBRARY).$(VERSION).dll
|
||||||
|
SO_INSTALL_NAME = echo
|
||||||
|
else
|
||||||
|
# Mac or Linux/Unix
|
||||||
|
AR_TARGET = $(LIBRARY).a
|
||||||
|
ifeq ($(UNAME),Darwin)
|
||||||
|
# Mac
|
||||||
|
SO_PLAIN = $(LIBRARY).dylib
|
||||||
|
SO_MAIN = $(LIBRARY).$(SO_VERSION).dylib
|
||||||
|
SO_TARGET = $(LIBRARY).$(VERSION).dylib
|
||||||
|
SO_OPTS += -dynamiclib -compatibility_version $(SO_VERSION) \
|
||||||
|
-current_version $(VERSION) \
|
||||||
|
-shared -undefined dynamic_lookup
|
||||||
|
# When a Mac *.dylib file is moved, this command is required
|
||||||
|
# to change its internal name to match its location in the filesystem:
|
||||||
|
SO_INSTALL_NAME = install_name_tool -id
|
||||||
|
else
|
||||||
|
# Linux and other variants of Unix
|
||||||
|
SO_PLAIN = $(LIBRARY).so
|
||||||
|
SO_MAIN = $(LIBRARY).so.$(SO_VERSION)
|
||||||
|
SO_TARGET = $(LIBRARY).so.$(VERSION)
|
||||||
|
SO_OPTS += -shared -Wl,-soname -Wl,$(SO_MAIN) -Wl,--no-undefined
|
||||||
|
# Linux/Unix *.so files can be moved without modification:
|
||||||
|
SO_INSTALL_NAME = echo
|
||||||
|
endif
|
||||||
|
endif
|
||||||
|
|
||||||
|
#===============================================================================
|
||||||
|
# Configure CHOLMOD/Partition module with METIS, CAMD, and CCOLAMD
|
||||||
|
#===============================================================================
|
||||||
|
|
||||||
|
# By default, SuiteSparse uses METIS 5.1.0 in the SuiteSparse/metis-5.1.0
|
||||||
|
# directory. SuiteSparse's interface to METIS is only through the
|
||||||
|
# SuiteSparse/CHOLMOD/Partition module, which also requires SuiteSparse/CAMD
|
||||||
|
# and SuiteSparse/CCOLAMD.
|
||||||
|
#
|
||||||
|
# If you wish to use your own pre-installed copy of METIS, use the MY_METIS_LIB
|
||||||
|
# and MY_METIS_INC options passed to 'make'. For example:
|
||||||
|
# make MY_METIS_LIB=-lmetis
|
||||||
|
# make MY_METIS_LIB=/home/myself/mylibraries/libmetis.so
|
||||||
|
# make MY_METIS_LIB='-L/home/myself/mylibraries -lmetis'
|
||||||
|
# If you need to tell the compiler where to find the metis.h include file,
|
||||||
|
# then add MY_METIS_INC=/home/myself/metis-5.1.0/include as well, which points
|
||||||
|
# to the directory containing metis.h. If metis.h is already installed in
|
||||||
|
# a location known to the compiler (/usr/local/include/metis.h for example)
|
||||||
|
# then you do not need to add MY_METIS_INC.
|
||||||
|
|
||||||
|
I_WITH_PARTITION =
|
||||||
|
LIB_WITH_PARTITION =
|
||||||
|
CONFIG_PARTITION = -DNPARTITION -DNCAMD
|
||||||
|
# check if CAMD/CCOLAMD and METIS are requested and available
|
||||||
|
ifeq (,$(findstring -DNCAMD, $(CHOLMOD_CONFIG)))
|
||||||
|
# CAMD and CCOLAMD are requested. See if they are available in
|
||||||
|
# SuiteSparse/CAMD and SuiteSparse/CCOLAMD
|
||||||
|
ifneq (, $(wildcard $(SUITESPARSE)/CAMD))
|
||||||
|
ifneq (, $(wildcard $(SUITESPARSE)/CCOLAMD))
|
||||||
|
# CAMD and CCOLAMD are requested and available
|
||||||
|
LIB_WITH_PARTITION = -lccolamd -lcamd
|
||||||
|
I_WITH_PARTITION = -I$(SUITESPARSE)/CCOLAMD/Include -I$(SUITESPARSE)/CAMD/Include
|
||||||
|
CONFIG_PARTITION = -DNPARTITION
|
||||||
|
# check if METIS is requested and available
|
||||||
|
ifeq (,$(findstring -DNPARTITION, $(CHOLMOD_CONFIG)))
|
||||||
|
# METIS is requested. See if it is available.
|
||||||
|
ifneq (,$(MY_METIS_LIB))
|
||||||
|
# METIS 5.1.0 is provided elsewhere, and we are not using
|
||||||
|
# SuiteSparse/metis-5.1.0. To do so, we link with
|
||||||
|
# $(MY_METIS_LIB) and add the -I$(MY_METIS_INC) option for
|
||||||
|
# the compiler. The latter can be empty if you have METIS
|
||||||
|
# installed in a place where the compiler can find the
|
||||||
|
# metis.h include file by itself without any -I option
|
||||||
|
# (/usr/local/include/metis.h for example).
|
||||||
|
LIB_WITH_PARTITION += $(MY_METIS_LIB)
|
||||||
|
ifneq (,$(MY_METIS_INC))
|
||||||
|
I_WITH_PARTITION += -I$(MY_METIS_INC)
|
||||||
|
endif
|
||||||
|
CONFIG_PARTITION =
|
||||||
|
else
|
||||||
|
# see if METIS is in SuiteSparse/metis-5.1.0
|
||||||
|
ifneq (, $(wildcard $(SUITESPARSE)/metis-5.1.0))
|
||||||
|
# SuiteSparse/metis5.1.0 is available
|
||||||
|
ifeq ($(UNAME), Darwin)
|
||||||
|
LIB_WITH_PARTITION += $(SUITESPARSE)/lib/libmetis.dylib
|
||||||
|
else
|
||||||
|
LIB_WITH_PARTITION += -lmetis
|
||||||
|
endif
|
||||||
|
I_WITH_PARTITION += -I$(SUITESPARSE)/metis-5.1.0/include
|
||||||
|
CONFIG_PARTITION =
|
||||||
|
endif
|
||||||
|
endif
|
||||||
|
endif
|
||||||
|
endif
|
||||||
|
endif
|
||||||
|
endif
|
||||||
|
|
||||||
|
#===============================================================================
|
||||||
|
# display configuration
|
||||||
|
#===============================================================================
|
||||||
|
|
||||||
|
ifeq ($(LIBRARY),)
|
||||||
|
# placeholders, for 'make config' in the top-level SuiteSparse
|
||||||
|
LIBRARY=PackageNameWillGoHere
|
||||||
|
VERSION=x.y.z
|
||||||
|
SO_VERSION=x
|
||||||
|
endif
|
||||||
|
|
||||||
|
# 'make config' lists the primary installation options
|
||||||
|
config:
|
||||||
|
@echo ' '
|
||||||
|
@echo '----------------------------------------------------------------'
|
||||||
|
@echo 'SuiteSparse package compilation options:'
|
||||||
|
@echo '----------------------------------------------------------------'
|
||||||
|
@echo ' '
|
||||||
|
@echo 'SuiteSparse Version: ' '$(SUITESPARSE_VERSION)'
|
||||||
|
@echo 'SuiteSparse top folder: ' '$(SUITESPARSE)'
|
||||||
|
@echo 'Package: LIBRARY= ' '$(LIBRARY)'
|
||||||
|
@echo 'Version: VERSION= ' '$(VERSION)'
|
||||||
|
@echo 'SO version: SO_VERSION= ' '$(SO_VERSION)'
|
||||||
|
@echo 'System: UNAME= ' '$(UNAME)'
|
||||||
|
@echo 'Install directory: INSTALL= ' '$(INSTALL)'
|
||||||
|
@echo 'Install libraries in: INSTALL_LIB= ' '$(INSTALL_LIB)'
|
||||||
|
@echo 'Install include files in: INSTALL_INCLUDE=' '$(INSTALL_INCLUDE)'
|
||||||
|
@echo 'Install documentation in: INSTALL_DOC= ' '$(INSTALL_DOC)'
|
||||||
|
@echo 'Optimization level: OPTIMIZATION= ' '$(OPTIMIZATION)'
|
||||||
|
@echo 'BLAS library: BLAS= ' '$(BLAS)'
|
||||||
|
@echo 'LAPACK library: LAPACK= ' '$(LAPACK)'
|
||||||
|
@echo 'Intel TBB library: TBB= ' '$(TBB)'
|
||||||
|
@echo 'Other libraries: LDLIBS= ' '$(LDLIBS)'
|
||||||
|
@echo 'static library: AR_TARGET= ' '$(AR_TARGET)'
|
||||||
|
@echo 'shared library (full): SO_TARGET= ' '$(SO_TARGET)'
|
||||||
|
@echo 'shared library (main): SO_MAIN= ' '$(SO_MAIN)'
|
||||||
|
@echo 'shared library (short): SO_PLAIN= ' '$(SO_PLAIN)'
|
||||||
|
@echo 'shared library options: SO_OPTS= ' '$(SO_OPTS)'
|
||||||
|
@echo 'shared library name tool: SO_INSTALL_NAME=' '$(SO_INSTALL_NAME)'
|
||||||
|
@echo 'ranlib, for static libs: RANLIB= ' '$(RANLIB)'
|
||||||
|
@echo 'static library command: ARCHIVE= ' '$(ARCHIVE)'
|
||||||
|
@echo 'copy file: CP= ' '$(CP)'
|
||||||
|
@echo 'move file: MV= ' '$(MV)'
|
||||||
|
@echo 'remove file: RM= ' '$(RM)'
|
||||||
|
@echo 'pretty (for Tcov tests): PRETTY= ' '$(PRETTY)'
|
||||||
|
@echo 'C compiler: CC= ' '$(CC)'
|
||||||
|
@echo 'C++ compiler: CXX= ' '$(CXX)'
|
||||||
|
@echo 'CUDA compiler: NVCC= ' '$(NVCC)'
|
||||||
|
@echo 'CUDA root directory: CUDA_PATH= ' '$(CUDA_PATH)'
|
||||||
|
@echo 'OpenMP flags: CFOPENMP= ' '$(CFOPENMP)'
|
||||||
|
@echo 'C/C++ compiler flags: CF= ' '$(CF)'
|
||||||
|
@echo 'LD flags: LDFLAGS= ' '$(LDFLAGS)'
|
||||||
|
@echo 'Fortran compiler: F77= ' '$(F77)'
|
||||||
|
@echo 'Fortran flags: F77FLAGS= ' '$(F77FLAGS)'
|
||||||
|
@echo 'Intel MKL root: MKLROOT= ' '$(MKLROOT)'
|
||||||
|
@echo 'Auto detect Intel icc: AUTOCC= ' '$(AUTOCC)'
|
||||||
|
@echo 'UMFPACK config: UMFPACK_CONFIG= ' '$(UMFPACK_CONFIG)'
|
||||||
|
@echo 'CHOLMOD config: CHOLMOD_CONFIG= ' '$(CHOLMOD_CONFIG)'
|
||||||
|
@echo 'SuiteSparseQR config: SPQR_CONFIG= ' '$(SPQR_CONFIG)'
|
||||||
|
@echo 'CUDA library: CUDART_LIB= ' '$(CUDART_LIB)'
|
||||||
|
@echo 'CUBLAS library: CUBLAS_LIB= ' '$(CUBLAS_LIB)'
|
||||||
|
@echo 'METIS and CHOLMOD/Partition configuration:'
|
||||||
|
@echo 'Your METIS library: MY_METIS_LIB= ' '$(MY_METIS_LIB)'
|
||||||
|
@echo 'Your metis.h is in: MY_METIS_INC= ' '$(MY_METIS_INC)'
|
||||||
|
@echo 'METIS is used via the CHOLMOD/Partition module, configured as follows.'
|
||||||
|
@echo 'If the next line has -DNPARTITION then METIS will not be used:'
|
||||||
|
@echo 'CHOLMOD Partition config: ' '$(CONFIG_PARTITION)'
|
||||||
|
@echo 'CHOLMOD Partition libs: ' '$(LIB_WITH_PARTITION)'
|
||||||
|
@echo 'CHOLMOD Partition include:' '$(I_WITH_PARTITION)'
|
||||||
|
ifeq ($(TCOV),yes)
|
||||||
|
@echo 'TCOV=yes, for extensive testing only (gcc, g++, vanilla BLAS)'
|
||||||
|
endif
|
||||||
|
|
||||||
|
|
@ -0,0 +1,73 @@
|
||||||
|
# Makefile for null-output xerbla, both C and Fortran versions.
|
||||||
|
# By default, the C version (libcerbla.a and *.so) is compiled and installed.
|
||||||
|
# Set the USE_FORTRAN option to 1 to create the Fortran instead (libxerbla):
|
||||||
|
USE_FORTRAN = 0
|
||||||
|
# USE_FORTRAN = 1
|
||||||
|
|
||||||
|
VERSION = 1.0.2
|
||||||
|
SO_VERSION = 1
|
||||||
|
|
||||||
|
default: library
|
||||||
|
|
||||||
|
# compile and install in SuiteSparse/lib
|
||||||
|
library:
|
||||||
|
$(MAKE) install INSTALL=$(SUITESPARSE)
|
||||||
|
|
||||||
|
all: library
|
||||||
|
|
||||||
|
ifeq ($(USE_FORTRAN),0)
|
||||||
|
LIBRARY = libcerbla
|
||||||
|
else
|
||||||
|
LIBRARY = libxerbla
|
||||||
|
endif
|
||||||
|
|
||||||
|
include ../SuiteSparse_config.mk
|
||||||
|
|
||||||
|
ifeq ($(USE_FORTRAN),0)
|
||||||
|
COMPILE = $(CC) $(CF) -c xerbla.c
|
||||||
|
DEPENDS = xerbla.c xerbla.h
|
||||||
|
else
|
||||||
|
COMPILE = $(F77) $(F77FLAGS) -c xerbla.f
|
||||||
|
DEPENDS = xerbla.f
|
||||||
|
endif
|
||||||
|
|
||||||
|
ccode: all
|
||||||
|
|
||||||
|
fortran: all
|
||||||
|
|
||||||
|
$(AR_TARGET): $(DEPENDS)
|
||||||
|
$(COMPILE)
|
||||||
|
$(ARCHIVE) $(AR_TARGET) xerbla.o
|
||||||
|
- $(RANLIB) $(AR_TARGET)
|
||||||
|
- $(RM) xerbla.o
|
||||||
|
|
||||||
|
# install libcerbla / libxerbla
|
||||||
|
install: $(AR_TARGET) $(INSTALL_LIB)/$(SO_TARGET)
|
||||||
|
|
||||||
|
$(INSTALL_LIB)/$(SO_TARGET): $(DEPENDS)
|
||||||
|
@mkdir -p $(INSTALL_LIB)
|
||||||
|
@mkdir -p $(INSTALL_INCLUDE)
|
||||||
|
@mkdir -p $(INSTALL_DOC)
|
||||||
|
$(COMPILE)
|
||||||
|
$(CC) $(SO_OPTS) xerbla.o -o $@
|
||||||
|
- $(RM) xerbla.o
|
||||||
|
( cd $(INSTALL_LIB) ; ln -sf $(SO_TARGET) $(SO_PLAIN) )
|
||||||
|
( cd $(INSTALL_LIB) ; ln -sf $(SO_TARGET) $(SO_MAIN) )
|
||||||
|
$(CP) xerbla.h $(INSTALL_INCLUDE)
|
||||||
|
chmod 755 $(INSTALL_LIB)/$(SO_TARGET)
|
||||||
|
chmod 644 $(INSTALL_INCLUDE)/xerbla.h
|
||||||
|
|
||||||
|
# uninstall libcerbla / libxerbla
|
||||||
|
uninstall:
|
||||||
|
$(RM) $(INSTALL_LIB)/$(SO_TARGET)
|
||||||
|
$(RM) $(INSTALL_LIB)/$(SO_PLAIN)
|
||||||
|
$(RM) $(INSTALL_INCLUDE)/xerbla.h
|
||||||
|
|
||||||
|
distclean: purge
|
||||||
|
|
||||||
|
purge: clean
|
||||||
|
- $(RM) -r $(PURGE)
|
||||||
|
|
||||||
|
clean:
|
||||||
|
- $(RM) -r $(CLEAN)
|
||||||
|
|
||||||
|
|
@ -1,35 +0,0 @@
|
||||||
UFconfig contains configuration settings for all many of the software packages
|
|
||||||
that I develop or co-author. Note that older versions of some of these packages
|
|
||||||
do not require UFconfig.
|
|
||||||
|
|
||||||
Package Description
|
|
||||||
------- -----------
|
|
||||||
AMD approximate minimum degree ordering
|
|
||||||
CAMD constrained AMD
|
|
||||||
COLAMD column approximate minimum degree ordering
|
|
||||||
CCOLAMD constrained approximate minimum degree ordering
|
|
||||||
UMFPACK sparse LU factorization, with the BLAS
|
|
||||||
CXSparse int/long/real/complex version of CSparse
|
|
||||||
CHOLMOD sparse Cholesky factorization, update/downdate
|
|
||||||
KLU sparse LU factorization, BLAS-free
|
|
||||||
BTF permutation to block triangular form
|
|
||||||
LDL concise sparse LDL'
|
|
||||||
LPDASA LP Dual Active Set Algorithm
|
|
||||||
SuiteSparseQR sparse QR factorization
|
|
||||||
|
|
||||||
UFconfig is not required by:
|
|
||||||
|
|
||||||
CSparse a Concise Sparse matrix package
|
|
||||||
RBio read/write files in Rutherford/Boeing format
|
|
||||||
UFcollection tools for managing the UF Sparse Matrix Collection
|
|
||||||
LINFACTOR simple m-file to show how to use LU and CHOL to solve Ax=b
|
|
||||||
MESHND 2D and 3D mesh generation and nested dissection ordering
|
|
||||||
MATLAB_Tools misc collection of m-files
|
|
||||||
SSMULT sparse matrix times sparse matrix, for use in MATLAB
|
|
||||||
|
|
||||||
In addition, the xerbla/ directory contains Fortan and C versions of the
|
|
||||||
BLAS/LAPACK xerbla routine, which is called when an invalid input is passed to
|
|
||||||
the BLAS or LAPACK. The xerbla provided here does not print any message, so
|
|
||||||
the entire Fortran I/O library does not need to be linked into a C application.
|
|
||||||
Most versions of the BLAS contain xerbla, but those from K. Goto do not. Use
|
|
||||||
this if you need too.
|
|
||||||
|
|
@ -1,71 +0,0 @@
|
||||||
/* ========================================================================== */
|
|
||||||
/* === UFconfig ============================================================= */
|
|
||||||
/* ========================================================================== */
|
|
||||||
|
|
||||||
/* Copyright (c) 2009, University of Florida. No licensing restrictions
|
|
||||||
* apply to this file or to the UFconfig directory. Author: Timothy A. Davis.
|
|
||||||
*/
|
|
||||||
|
|
||||||
#include "UFconfig.h"
|
|
||||||
|
|
||||||
/* -------------------------------------------------------------------------- */
|
|
||||||
/* UFmalloc: malloc wrapper */
|
|
||||||
/* -------------------------------------------------------------------------- */
|
|
||||||
|
|
||||||
void *UFmalloc /* pointer to allocated block of memory */
|
|
||||||
(
|
|
||||||
size_t nitems, /* number of items to malloc (>=1 is enforced) */
|
|
||||||
size_t size_of_item, /* sizeof each item */
|
|
||||||
int *ok, /* TRUE if successful, FALSE otherwise */
|
|
||||||
UFconfig *config /* SuiteSparse-wide configuration */
|
|
||||||
)
|
|
||||||
{
|
|
||||||
void *p ;
|
|
||||||
if (nitems < 1) nitems = 1 ;
|
|
||||||
if (nitems * size_of_item != ((double) nitems) * size_of_item)
|
|
||||||
{
|
|
||||||
/* Int overflow */
|
|
||||||
*ok = 0 ;
|
|
||||||
return (NULL) ;
|
|
||||||
}
|
|
||||||
if (!config || config->malloc_memory == NULL)
|
|
||||||
{
|
|
||||||
/* use malloc by default */
|
|
||||||
p = (void *) malloc (nitems * size_of_item) ;
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
/* use the pointer to malloc in the config */
|
|
||||||
p = (void *) (config->malloc_memory) (nitems * size_of_item) ;
|
|
||||||
}
|
|
||||||
*ok = (p != NULL) ;
|
|
||||||
return (p) ;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
/* -------------------------------------------------------------------------- */
|
|
||||||
/* UFfree: free wrapper */
|
|
||||||
/* -------------------------------------------------------------------------- */
|
|
||||||
|
|
||||||
void *UFfree /* always returns NULL */
|
|
||||||
(
|
|
||||||
void *p, /* block to free */
|
|
||||||
UFconfig *config /* SuiteSparse-wide configuration */
|
|
||||||
)
|
|
||||||
{
|
|
||||||
if (p)
|
|
||||||
{
|
|
||||||
if (!config || config->free_memory == NULL)
|
|
||||||
{
|
|
||||||
/* use free by default */
|
|
||||||
free (p) ;
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
/* use the pointer to free in the config */
|
|
||||||
(config->free_memory) (p) ;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
return (NULL) ;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
@ -1,152 +0,0 @@
|
||||||
/* ========================================================================== */
|
|
||||||
/* === UFconfig.h =========================================================== */
|
|
||||||
/* ========================================================================== */
|
|
||||||
|
|
||||||
/* Configuration file for SuiteSparse: a Suite of Sparse matrix packages
|
|
||||||
* (AMD, COLAMD, CCOLAMD, CAMD, CHOLMOD, UMFPACK, CXSparse, and others).
|
|
||||||
*
|
|
||||||
* UFconfig.h provides the definition of the long integer. On most systems,
|
|
||||||
* a C program can be compiled in LP64 mode, in which long's and pointers are
|
|
||||||
* both 64-bits, and int's are 32-bits. Windows 64, however, uses the LLP64
|
|
||||||
* model, in which int's and long's are 32-bits, and long long's and pointers
|
|
||||||
* are 64-bits.
|
|
||||||
*
|
|
||||||
* SuiteSparse packages that include long integer versions are
|
|
||||||
* intended for the LP64 mode. However, as a workaround for Windows 64
|
|
||||||
* (and perhaps other systems), the long integer can be redefined.
|
|
||||||
*
|
|
||||||
* If _WIN64 is defined, then the __int64 type is used instead of long.
|
|
||||||
*
|
|
||||||
* The long integer can also be defined at compile time. For example, this
|
|
||||||
* could be added to UFconfig.mk:
|
|
||||||
*
|
|
||||||
* CFLAGS = -O -D'UF_long=long long' -D'UF_long_max=9223372036854775801' \
|
|
||||||
* -D'UF_long_idd="lld"'
|
|
||||||
*
|
|
||||||
* This file defines UF_long as either long (on all but _WIN64) or
|
|
||||||
* __int64 on Windows 64. The intent is that a UF_long is always a 64-bit
|
|
||||||
* integer in a 64-bit code. ptrdiff_t might be a better choice than long;
|
|
||||||
* it is always the same size as a pointer.
|
|
||||||
*
|
|
||||||
* This file also defines the SUITESPARSE_VERSION and related definitions.
|
|
||||||
*
|
|
||||||
* Copyright (c) 2007, University of Florida. No licensing restrictions
|
|
||||||
* apply to this file or to the UFconfig directory. Author: Timothy A. Davis.
|
|
||||||
*/
|
|
||||||
|
|
||||||
#ifndef _UFCONFIG_H
|
|
||||||
#define _UFCONFIG_H
|
|
||||||
|
|
||||||
#ifdef __cplusplus
|
|
||||||
extern "C" {
|
|
||||||
#endif
|
|
||||||
|
|
||||||
#include <limits.h>
|
|
||||||
#include <stdlib.h>
|
|
||||||
|
|
||||||
/* ========================================================================== */
|
|
||||||
/* === UF_long ============================================================== */
|
|
||||||
/* ========================================================================== */
|
|
||||||
|
|
||||||
#ifndef UF_long
|
|
||||||
|
|
||||||
#ifdef _WIN64
|
|
||||||
|
|
||||||
#define UF_long __int64
|
|
||||||
#define UF_long_max _I64_MAX
|
|
||||||
#define UF_long_idd "I64d"
|
|
||||||
|
|
||||||
#else
|
|
||||||
|
|
||||||
#define UF_long long
|
|
||||||
#define UF_long_max LONG_MAX
|
|
||||||
#define UF_long_idd "ld"
|
|
||||||
|
|
||||||
#endif
|
|
||||||
#define UF_long_id "%" UF_long_idd
|
|
||||||
#endif
|
|
||||||
|
|
||||||
/* ========================================================================== */
|
|
||||||
/* === UFconfig parameters and functions ==================================== */
|
|
||||||
/* ========================================================================== */
|
|
||||||
|
|
||||||
/* SuiteSparse-wide parameters will be placed in this struct. So far, they
|
|
||||||
are only used by RBio. */
|
|
||||||
|
|
||||||
typedef struct UFconfig_struct
|
|
||||||
{
|
|
||||||
void *(*malloc_memory) (size_t) ; /* pointer to malloc */
|
|
||||||
void *(*realloc_memory) (void *, size_t) ; /* pointer to realloc */
|
|
||||||
void (*free_memory) (void *) ; /* pointer to free */
|
|
||||||
void *(*calloc_memory) (size_t, size_t) ; /* pointer to calloc */
|
|
||||||
|
|
||||||
} UFconfig ;
|
|
||||||
|
|
||||||
void *UFmalloc /* pointer to allocated block of memory */
|
|
||||||
(
|
|
||||||
size_t nitems, /* number of items to malloc (>=1 is enforced) */
|
|
||||||
size_t size_of_item, /* sizeof each item */
|
|
||||||
int *ok, /* TRUE if successful, FALSE otherwise */
|
|
||||||
UFconfig *config /* SuiteSparse-wide configuration */
|
|
||||||
) ;
|
|
||||||
|
|
||||||
void *UFfree /* always returns NULL */
|
|
||||||
(
|
|
||||||
void *p, /* block to free */
|
|
||||||
UFconfig *config /* SuiteSparse-wide configuration */
|
|
||||||
) ;
|
|
||||||
|
|
||||||
|
|
||||||
/* ========================================================================== */
|
|
||||||
/* === SuiteSparse version ================================================== */
|
|
||||||
/* ========================================================================== */
|
|
||||||
|
|
||||||
/* SuiteSparse is not a package itself, but a collection of packages, some of
|
|
||||||
* which must be used together (UMFPACK requires AMD, CHOLMOD requires AMD,
|
|
||||||
* COLAMD, CAMD, and CCOLAMD, etc). A version number is provided here for the
|
|
||||||
* collection itself. The versions of packages within each version of
|
|
||||||
* SuiteSparse are meant to work together. Combining one packge from one
|
|
||||||
* version of SuiteSparse, with another package from another version of
|
|
||||||
* SuiteSparse, may or may not work.
|
|
||||||
*
|
|
||||||
* SuiteSparse Version 3.6.1 contains the following packages:
|
|
||||||
*
|
|
||||||
* AMD version 2.2.2
|
|
||||||
* BTF version 1.1.2
|
|
||||||
* CAMD version 2.2.2
|
|
||||||
* CCOLAMD version 2.7.3
|
|
||||||
* CHOLMOD version 1.7.3
|
|
||||||
* COLAMD version 2.7.3
|
|
||||||
* CSparse version 2.2.5
|
|
||||||
* CSparse3 version 3.0.1
|
|
||||||
* CXSparse version 2.2.5
|
|
||||||
* KLU version 1.1.2
|
|
||||||
* LDL version 2.0.3
|
|
||||||
* RBio version 2.0.1
|
|
||||||
* SPQR version 1.2.2 (also called SuiteSparseQR)
|
|
||||||
* UFcollection version 1.5.0
|
|
||||||
* UFconfig version number is the same as SuiteSparse
|
|
||||||
* UMFPACK version 5.5.1
|
|
||||||
* LINFACTOR version 1.1.0
|
|
||||||
* MESHND version 1.1.1
|
|
||||||
* SSMULT version 2.0.2
|
|
||||||
* MATLAB_Tools no specific version number
|
|
||||||
*
|
|
||||||
* Other package dependencies:
|
|
||||||
* BLAS required by CHOLMOD and UMFPACK
|
|
||||||
* LAPACK required by CHOLMOD
|
|
||||||
* METIS 4.0.1 required by CHOLMOD (optional) and KLU (optional)
|
|
||||||
*/
|
|
||||||
|
|
||||||
#define SUITESPARSE_DATE "May 10, 2011"
|
|
||||||
#define SUITESPARSE_VER_CODE(main,sub) ((main) * 1000 + (sub))
|
|
||||||
#define SUITESPARSE_MAIN_VERSION 3
|
|
||||||
#define SUITESPARSE_SUB_VERSION 6
|
|
||||||
#define SUITESPARSE_SUBSUB_VERSION 1
|
|
||||||
#define SUITESPARSE_VERSION \
|
|
||||||
SUITESPARSE_VER_CODE(SUITESPARSE_MAIN_VERSION,SUITESPARSE_SUB_VERSION)
|
|
||||||
|
|
||||||
#ifdef __cplusplus
|
|
||||||
}
|
|
||||||
#endif
|
|
||||||
#endif
|
|
||||||
|
|
@ -1,386 +0,0 @@
|
||||||
#===============================================================================
|
|
||||||
# UFconfig.mk: common configuration file for the SuiteSparse
|
|
||||||
#===============================================================================
|
|
||||||
|
|
||||||
# This file contains all configuration settings for all packages authored or
|
|
||||||
# co-authored by Tim Davis at the University of Florida:
|
|
||||||
#
|
|
||||||
# Package Version Description
|
|
||||||
# ------- ------- -----------
|
|
||||||
# AMD 1.2 or later approximate minimum degree ordering
|
|
||||||
# COLAMD 2.4 or later column approximate minimum degree ordering
|
|
||||||
# CCOLAMD 1.0 or later constrained column approximate minimum degree ordering
|
|
||||||
# CAMD any constrained approximate minimum degree ordering
|
|
||||||
# UMFPACK 4.5 or later sparse LU factorization, with the BLAS
|
|
||||||
# CHOLMOD any sparse Cholesky factorization, update/downdate
|
|
||||||
# KLU 0.8 or later sparse LU factorization, BLAS-free
|
|
||||||
# BTF 0.8 or later permutation to block triangular form
|
|
||||||
# LDL 1.2 or later concise sparse LDL'
|
|
||||||
# LPDASA any linear program solve (dual active set algorithm)
|
|
||||||
# CXSparse any extended version of CSparse (int/long, real/complex)
|
|
||||||
# SuiteSparseQR any sparse QR factorization
|
|
||||||
#
|
|
||||||
# The UFconfig directory and the above packages should all appear in a single
|
|
||||||
# directory, in order for the Makefile's within each package to find this file.
|
|
||||||
#
|
|
||||||
# To enable an option of the form "# OPTION = ...", edit this file and
|
|
||||||
# delete the "#" in the first column of the option you wish to use.
|
|
||||||
|
|
||||||
#------------------------------------------------------------------------------
|
|
||||||
# Generic configuration
|
|
||||||
#------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
# C compiler and compiler flags: These will normally not give you optimal
|
|
||||||
# performance. You should select the optimization parameters that are best
|
|
||||||
# for your system. On Linux, use "CFLAGS = -O3 -fexceptions" for example.
|
|
||||||
CC = cc
|
|
||||||
CFLAGS = -O3 -fexceptions
|
|
||||||
|
|
||||||
# C++ compiler (also uses CFLAGS)
|
|
||||||
CPLUSPLUS = g++
|
|
||||||
|
|
||||||
# ranlib, and ar, for generating libraries
|
|
||||||
RANLIB = ranlib
|
|
||||||
AR = ar cr
|
|
||||||
|
|
||||||
# copy, delete, and rename a file
|
|
||||||
CP = cp -f
|
|
||||||
RM = rm -f
|
|
||||||
MV = mv -f
|
|
||||||
|
|
||||||
# Fortran compiler (not normally required)
|
|
||||||
F77 = f77
|
|
||||||
F77FLAGS = -O
|
|
||||||
F77LIB =
|
|
||||||
|
|
||||||
# C and Fortran libraries
|
|
||||||
LIB = -lm
|
|
||||||
|
|
||||||
# For compiling MATLAB mexFunctions (MATLAB 7.5 or later)
|
|
||||||
MEX = mex -O -largeArrayDims -lmwlapack -lmwblas
|
|
||||||
|
|
||||||
# For compiling MATLAB mexFunctions (MATLAB 7.3 and 7.4)
|
|
||||||
# MEX = mex -O -largeArrayDims -lmwlapack
|
|
||||||
|
|
||||||
# For MATLAB 7.2 or earlier, you must use one of these options:
|
|
||||||
# MEX = mex -O -lmwlapack
|
|
||||||
# MEX = mex -O
|
|
||||||
|
|
||||||
# Which version of MAKE you are using (default is "make")
|
|
||||||
# MAKE = make
|
|
||||||
# MAKE = gmake
|
|
||||||
|
|
||||||
# For "make install"
|
|
||||||
INSTALL_LIB = /usr/local/lib
|
|
||||||
INSTALL_INCLUDE = /usr/local/include
|
|
||||||
|
|
||||||
#------------------------------------------------------------------------------
|
|
||||||
# BLAS and LAPACK configuration:
|
|
||||||
#------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
# UMFPACK and CHOLMOD both require the BLAS. CHOLMOD also requires LAPACK.
|
|
||||||
# See Kazushige Goto's BLAS at http://www.cs.utexas.edu/users/flame/goto/ or
|
|
||||||
# http://www.tacc.utexas.edu/~kgoto/ for the best BLAS to use with CHOLMOD.
|
|
||||||
# LAPACK is at http://www.netlib.org/lapack/ . You can use the standard
|
|
||||||
# Fortran LAPACK along with Goto's BLAS to obtain very good performance.
|
|
||||||
# CHOLMOD gets a peak numeric factorization rate of 3.6 Gflops on a 3.2 GHz
|
|
||||||
# Pentium 4 (512K cache, 4GB main memory) with the Goto BLAS, and 6 Gflops
|
|
||||||
# on a 2.5Ghz dual-core AMD Opteron.
|
|
||||||
|
|
||||||
# These settings will probably not work, since there is no fixed convention for
|
|
||||||
# naming the BLAS and LAPACK library (*.a or *.so) files.
|
|
||||||
|
|
||||||
# This is probably slow ... it might connect to the Standard Reference BLAS:
|
|
||||||
BLAS = -lblas -lgfortran
|
|
||||||
LAPACK = -llapack
|
|
||||||
|
|
||||||
# NOTE: this next option for the "Goto BLAS" has nothing to do with a "goto"
|
|
||||||
# statement. Rather, the Goto BLAS is written by Dr. Kazushige Goto.
|
|
||||||
# Using the Goto BLAS:
|
|
||||||
# BLAS = -lgoto -lgfortran -lgfortranbegin
|
|
||||||
|
|
||||||
# Using non-optimized versions:
|
|
||||||
# BLAS = -lblas_plain -lgfortran -lgfortranbegin
|
|
||||||
# LAPACK = -llapack_plain
|
|
||||||
|
|
||||||
# BLAS = -lblas_plain -lgfortran -lgfortranbegin
|
|
||||||
# LAPACK = -llapack
|
|
||||||
|
|
||||||
# The BLAS might not contain xerbla, an error-handling routine for LAPACK and
|
|
||||||
# the BLAS. Also, the standard xerbla requires the Fortran I/O library, and
|
|
||||||
# stops the application program if an error occurs. A C version of xerbla
|
|
||||||
# distributed with this software (UFconfig/xerbla/libcerbla.a) includes a
|
|
||||||
# Fortran-callable xerbla routine that prints nothing and does not stop the
|
|
||||||
# application program. This is optional.
|
|
||||||
# XERBLA = ../../UFconfig/xerbla/libcerbla.a
|
|
||||||
|
|
||||||
# If you wish to use the XERBLA in LAPACK and/or the BLAS instead,
|
|
||||||
# use this option:
|
|
||||||
XERBLA =
|
|
||||||
|
|
||||||
# If you wish to use the Fortran UFconfig/xerbla/xerbla.f instead, use this:
|
|
||||||
# XERBLA = ../../UFconfig/xerbla/libxerbla.a
|
|
||||||
|
|
||||||
#------------------------------------------------------------------------------
|
|
||||||
# METIS, optionally used by CHOLMOD
|
|
||||||
#------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
# If you do not have METIS, or do not wish to use it in CHOLMOD, you must
|
|
||||||
# compile CHOLMOD with the -DNPARTITION flag. You must also use the
|
|
||||||
# "METIS =" option, below.
|
|
||||||
|
|
||||||
# The path is relative to where it is used, in CHOLMOD/Lib, CHOLMOD/MATLAB, etc.
|
|
||||||
# You may wish to use an absolute path. METIS is optional. Compile
|
|
||||||
# CHOLMOD with -DNPARTITION if you do not wish to use METIS.
|
|
||||||
METIS_PATH = ../../metis-4.0
|
|
||||||
METIS = ../../metis-4.0/libmetis.a
|
|
||||||
|
|
||||||
# If you use CHOLMOD_CONFIG = -DNPARTITION then you must use the following
|
|
||||||
# options:
|
|
||||||
# METIS_PATH =
|
|
||||||
# METIS =
|
|
||||||
|
|
||||||
#------------------------------------------------------------------------------
|
|
||||||
# UMFPACK configuration:
|
|
||||||
#------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
# Configuration flags for UMFPACK. See UMFPACK/Source/umf_config.h for details.
|
|
||||||
#
|
|
||||||
# -DNBLAS do not use the BLAS. UMFPACK will be very slow.
|
|
||||||
# -D'LONGBLAS=long' or -DLONGBLAS='long long' defines the integers used by
|
|
||||||
# LAPACK and the BLAS (defaults to 'int')
|
|
||||||
# -DNSUNPERF do not use the Sun Perf. Library (default is use it on Solaris)
|
|
||||||
# -DNPOSIX do not use POSIX routines sysconf and times.
|
|
||||||
# -DGETRUSAGE use getrusage
|
|
||||||
# -DNO_TIMER do not use any timing routines
|
|
||||||
# -DNRECIPROCAL do not multiply by the reciprocal
|
|
||||||
# -DNO_DIVIDE_BY_ZERO do not divide by zero
|
|
||||||
|
|
||||||
UMFPACK_CONFIG =
|
|
||||||
|
|
||||||
#------------------------------------------------------------------------------
|
|
||||||
# CHOLMOD configuration
|
|
||||||
#------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
# CHOLMOD Library Modules, which appear in libcholmod.a:
|
|
||||||
# Core requires: none
|
|
||||||
# Check requires: Core
|
|
||||||
# Cholesky requires: Core, AMD, COLAMD. optional: Partition, Supernodal
|
|
||||||
# MatrixOps requires: Core
|
|
||||||
# Modify requires: Core
|
|
||||||
# Partition requires: Core, CCOLAMD, METIS. optional: Cholesky
|
|
||||||
# Supernodal requires: Core, BLAS, LAPACK
|
|
||||||
#
|
|
||||||
# CHOLMOD test/demo Modules (all are GNU GPL, do not appear in libcholmod.a):
|
|
||||||
# Tcov requires: Core, Check, Cholesky, MatrixOps, Modify, Supernodal
|
|
||||||
# optional: Partition
|
|
||||||
# Valgrind same as Tcov
|
|
||||||
# Demo requires: Core, Check, Cholesky, MatrixOps, Supernodal
|
|
||||||
# optional: Partition
|
|
||||||
#
|
|
||||||
# Configuration flags:
|
|
||||||
# -DNCHECK do not include the Check module. License GNU LGPL
|
|
||||||
# -DNCHOLESKY do not include the Cholesky module. License GNU LGPL
|
|
||||||
# -DNPARTITION do not include the Partition module. License GNU LGPL
|
|
||||||
# also do not include METIS.
|
|
||||||
# -DNGPL do not include any GNU GPL Modules in the CHOLMOD library:
|
|
||||||
# -DNMATRIXOPS do not include the MatrixOps module. License GNU GPL
|
|
||||||
# -DNMODIFY do not include the Modify module. License GNU GPL
|
|
||||||
# -DNSUPERNODAL do not include the Supernodal module. License GNU GPL
|
|
||||||
#
|
|
||||||
# -DNPRINT do not print anything.
|
|
||||||
# -D'LONGBLAS=long' or -DLONGBLAS='long long' defines the integers used by
|
|
||||||
# LAPACK and the BLAS (defaults to 'int')
|
|
||||||
# -DNSUNPERF for Solaris only. If defined, do not use the Sun
|
|
||||||
# Performance Library
|
|
||||||
|
|
||||||
CHOLMOD_CONFIG =
|
|
||||||
|
|
||||||
#------------------------------------------------------------------------------
|
|
||||||
# SuiteSparseQR configuration:
|
|
||||||
#------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
# The SuiteSparseQR library can be compiled with the following options:
|
|
||||||
#
|
|
||||||
# -DNPARTITION do not include the CHOLMOD partition module
|
|
||||||
# -DNEXPERT do not include the functions in SuiteSparseQR_expert.cpp
|
|
||||||
# -DTIMING enable timing and flop counts
|
|
||||||
# -DHAVE_TBB enable the use of Intel's Threading Building Blocks (TBB)
|
|
||||||
|
|
||||||
# default, without timing, without TBB:
|
|
||||||
SPQR_CONFIG =
|
|
||||||
# with timing and TBB:
|
|
||||||
# SPQR_CONFIG = -DTIMING -DHAVE_TBB
|
|
||||||
# with timing
|
|
||||||
# SPQR_CONFIG = -DTIMING
|
|
||||||
|
|
||||||
# This is needed for IBM AIX: (but not for and C codes, just C++)
|
|
||||||
# SPQR_CONFIG = -DBLAS_NO_UNDERSCORE
|
|
||||||
|
|
||||||
# with TBB, you must select this:
|
|
||||||
# TBB = -ltbb
|
|
||||||
# without TBB:
|
|
||||||
TBB =
|
|
||||||
|
|
||||||
# with timing, you must include the timing library:
|
|
||||||
# RTLIB = -lrt
|
|
||||||
# without timing
|
|
||||||
RTLIB =
|
|
||||||
|
|
||||||
#------------------------------------------------------------------------------
|
|
||||||
# Linux
|
|
||||||
#------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
# Using default compilers:
|
|
||||||
# CC = gcc
|
|
||||||
# CFLAGS = -O3 -fexceptions
|
|
||||||
|
|
||||||
# alternatives:
|
|
||||||
# CFLAGS = -g -fexceptions \
|
|
||||||
-Wall -W -Wshadow -Wmissing-prototypes -Wstrict-prototypes \
|
|
||||||
-Wredundant-decls -Wnested-externs -Wdisabled-optimization -ansi \
|
|
||||||
-funit-at-a-time
|
|
||||||
# CFLAGS = -O3 -fexceptions \
|
|
||||||
-Wall -W -Werror -Wshadow -Wmissing-prototypes -Wstrict-prototypes \
|
|
||||||
-Wredundant-decls -Wnested-externs -Wdisabled-optimization -ansi
|
|
||||||
# CFLAGS = -O3 -fexceptions -D_FILE_OFFSET_BITS=64 -D_LARGEFILE64_SOURCE
|
|
||||||
# CFLAGS = -O3
|
|
||||||
# CFLAGS = -O3 -g -fexceptions
|
|
||||||
# CFLAGS = -g -fexceptions \
|
|
||||||
-Wall -W -Wshadow \
|
|
||||||
-Wredundant-decls -Wdisabled-optimization -ansi
|
|
||||||
|
|
||||||
# consider:
|
|
||||||
# -fforce-addr -fmove-all-movables -freduce-all-givs -ftsp-ordering
|
|
||||||
# -frename-registers -ffast-math -funroll-loops
|
|
||||||
|
|
||||||
# Using the Goto BLAS:
|
|
||||||
# BLAS = -lgoto -lfrtbegin -lg2c $(XERBLA) -lpthread
|
|
||||||
|
|
||||||
# Using Intel's icc and ifort compilers:
|
|
||||||
# (does not work for mexFunctions unless you add a mexopts.sh file)
|
|
||||||
# F77 = ifort
|
|
||||||
# CC = icc
|
|
||||||
# CFLAGS = -O3 -xN -vec_report=0
|
|
||||||
# CFLAGS = -g
|
|
||||||
# old (broken): CFLAGS = -ansi -O3 -ip -tpp7 -xW -vec_report0
|
|
||||||
|
|
||||||
# 64bit:
|
|
||||||
# F77FLAGS = -O -m64
|
|
||||||
# CFLAGS = -O3 -fexceptions -m64
|
|
||||||
# BLAS = -lgoto64 -lfrtbegin -lg2c -lpthread $(XERBLA)
|
|
||||||
# LAPACK = -llapack64
|
|
||||||
|
|
||||||
|
|
||||||
# SUSE Linux 10.1, AMD Opteron, with GOTO Blas
|
|
||||||
# F77 = gfortran
|
|
||||||
# BLAS = -lgoto_opteron64 -lgfortran
|
|
||||||
|
|
||||||
# SUSE Linux 10.1, Intel Pentium, with GOTO Blas
|
|
||||||
# F77 = gfortran
|
|
||||||
# BLAS = -lgoto -lgfortran
|
|
||||||
|
|
||||||
#------------------------------------------------------------------------------
|
|
||||||
# Mac
|
|
||||||
#------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
# As recommended by macports, http://suitesparse.darwinports.com/
|
|
||||||
# I've tested them myself on Mac OSX 10.6.1 (Snow Leopard), on my MacBook Air.
|
|
||||||
# F77 = gfortran
|
|
||||||
# CFLAGS = -O3 -fno-common -no-cpp-precomp -fexceptions
|
|
||||||
# BLAS = -framework Accelerate
|
|
||||||
# LAPACK = -framework Accelerate
|
|
||||||
|
|
||||||
# Using netlib.org LAPACK and BLAS compiled by gfortran, with and without
|
|
||||||
# optimzation:
|
|
||||||
# BLAS = -lblas_plain -lgfortran
|
|
||||||
# LAPACK = -llapack_plain
|
|
||||||
# BLAS = -lblas_optimized -lgfortran
|
|
||||||
# LAPACK = -llapack_optimized
|
|
||||||
|
|
||||||
#------------------------------------------------------------------------------
|
|
||||||
# Solaris
|
|
||||||
#------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
# 32-bit
|
|
||||||
# CFLAGS = -KPIC -dalign -xc99=%none -Xc -xlibmieee -xO5 -xlibmil -m32
|
|
||||||
|
|
||||||
# 64-bit
|
|
||||||
# CFLAGS = -fast -KPIC -xc99=%none -xlibmieee -xlibmil -m64 -Xc
|
|
||||||
|
|
||||||
# FFLAGS = -fast -KPIC -dalign -xlibmil -m64
|
|
||||||
|
|
||||||
# The Sun Performance Library includes both LAPACK and the BLAS:
|
|
||||||
# BLAS = -xlic_lib=sunperf
|
|
||||||
# LAPACK =
|
|
||||||
|
|
||||||
|
|
||||||
#------------------------------------------------------------------------------
|
|
||||||
# Compaq Alpha
|
|
||||||
#------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
# 64-bit mode only
|
|
||||||
# CFLAGS = -O2 -std1
|
|
||||||
# BLAS = -ldxml
|
|
||||||
# LAPACK =
|
|
||||||
|
|
||||||
#------------------------------------------------------------------------------
|
|
||||||
# Macintosh
|
|
||||||
#------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
# CC = gcc
|
|
||||||
# CFLAGS = -O3 -fno-common -no-cpp-precomp -fexceptions
|
|
||||||
# LIB = -lstdc++
|
|
||||||
# BLAS = -framework Accelerate
|
|
||||||
# LAPACK = -framework Accelerate
|
|
||||||
|
|
||||||
#------------------------------------------------------------------------------
|
|
||||||
# IBM RS 6000
|
|
||||||
#------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
# BLAS = -lessl
|
|
||||||
# LAPACK =
|
|
||||||
|
|
||||||
# 32-bit mode:
|
|
||||||
# CFLAGS = -O4 -qipa -qmaxmem=16384 -qproto
|
|
||||||
# F77FLAGS = -O4 -qipa -qmaxmem=16384
|
|
||||||
|
|
||||||
# 64-bit mode:
|
|
||||||
# CFLAGS = -O4 -qipa -qmaxmem=16384 -q64 -qproto
|
|
||||||
# F77FLAGS = -O4 -qipa -qmaxmem=16384 -q64
|
|
||||||
# AR = ar -X64
|
|
||||||
|
|
||||||
#------------------------------------------------------------------------------
|
|
||||||
# SGI IRIX
|
|
||||||
#------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
# BLAS = -lscsl
|
|
||||||
# LAPACK =
|
|
||||||
|
|
||||||
# 32-bit mode
|
|
||||||
# CFLAGS = -O
|
|
||||||
|
|
||||||
# 64-bit mode (32 bit int's and 64-bit long's):
|
|
||||||
# CFLAGS = -64
|
|
||||||
# F77FLAGS = -64
|
|
||||||
|
|
||||||
# SGI doesn't have ranlib
|
|
||||||
# RANLIB = echo
|
|
||||||
|
|
||||||
#------------------------------------------------------------------------------
|
|
||||||
# AMD Opteron (64 bit)
|
|
||||||
#------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
# BLAS = -lgoto_opteron64 -lg2c
|
|
||||||
# LAPACK = -llapack_opteron64
|
|
||||||
|
|
||||||
# SUSE Linux 10.1, AMD Opteron
|
|
||||||
# F77 = gfortran
|
|
||||||
# BLAS = -lgoto_opteron64 -lgfortran
|
|
||||||
# LAPACK = -llapack_opteron64
|
|
||||||
|
|
||||||
#------------------------------------------------------------------------------
|
|
||||||
# remove object files and profile output
|
|
||||||
#------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
CLEAN = *.o *.obj *.ln *.bb *.bbg *.da *.tcov *.gcov gmon.out *.bak *.d *.gcda *.gcno
|
|
||||||
|
|
@ -26,7 +26,7 @@ set (3rdparty_srcs
|
||||||
${eigen_headers} # Set by 3rdparty/CMakeLists.txt
|
${eigen_headers} # Set by 3rdparty/CMakeLists.txt
|
||||||
${CMAKE_CURRENT_SOURCE_DIR}/3rdparty/CCOLAMD/Source/ccolamd.c
|
${CMAKE_CURRENT_SOURCE_DIR}/3rdparty/CCOLAMD/Source/ccolamd.c
|
||||||
${CMAKE_CURRENT_SOURCE_DIR}/3rdparty/CCOLAMD/Source/ccolamd_global.c
|
${CMAKE_CURRENT_SOURCE_DIR}/3rdparty/CCOLAMD/Source/ccolamd_global.c
|
||||||
${CMAKE_CURRENT_SOURCE_DIR}/3rdparty/UFconfig/UFconfig.c)
|
${CMAKE_CURRENT_SOURCE_DIR}/3rdparty/SuiteSparse_config/SuiteSparse_config.c)
|
||||||
gtsam_assign_source_folders("${3rdparty_srcs}") # Create MSVC structure
|
gtsam_assign_source_folders("${3rdparty_srcs}") # Create MSVC structure
|
||||||
|
|
||||||
# To exclude a source from the library build (in any subfolder)
|
# To exclude a source from the library build (in any subfolder)
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue