The R Project SVN R-packages

Rev

Rev 3695 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 3695 Rev 4428
Line 1... Line 1...
1 
/* ========================================================================= */
 1 
/* ========================================================================= */
2 
/* === AMD_valid =========================================================== */
 2 
/* === AMD_valid =========================================================== */
3 
/* ========================================================================= */
 3 
/* ========================================================================= */
4 
 
 4 
 
5 
/* ------------------------------------------------------------------------- */
 5 
/* ------------------------------------------------------------------------- */
6 
/* AMD Version 2.0, Copyright (c) 2006 by Timothy A. Davis,		     */
 6 
/* AMD, Copyright (c) Timothy A. Davis,					     */
7 
/* Patrick R. Amestoy, and Iain S. Duff.  See ../README.txt for License.     */
 7 
/* Patrick R. Amestoy, and Iain S. Duff.  See ../README.txt for License.     */
8 
/* email: davis at cise.ufl.edu    CISE Department, Univ. of Florida.        */
 8 
/* email: davis at cise.ufl.edu    CISE Department, Univ. of Florida.        */
9 
/* web: http://www.cise.ufl.edu/research/sparse/amd                          */
 9 
/* web: http://www.cise.ufl.edu/research/sparse/amd                          */
10 
/* ------------------------------------------------------------------------- */
 10 
/* ------------------------------------------------------------------------- */
11 
 
 11 
 
Line 44... Line 44...
44 
    const Int Ap [ ],	/* column pointers of A, of size n_col+1 */
 44 
    const Int Ap [ ],	/* column pointers of A, of size n_col+1 */
45 
    const Int Ai [ ]	/* row indices of A, of size nz = Ap [n_col] */
 45 
    const Int Ai [ ]	/* row indices of A, of size nz = Ap [n_col] */
46 
)
 46 
)
47 
{
 47 
{
48 
    Int nz, j, p1, p2, ilast, i, p, result = AMD_OK ;
 48 
    Int nz, j, p1, p2, ilast, i, p, result = AMD_OK ;
- 
 
 49 
 
49 
    if (n_row < 0 || n_col < 0 || Ap == NULL || Ai == NULL)
 50 
    if (n_row < 0 || n_col < 0 || Ap == NULL || Ai == NULL)
50 
    {
 51 
    {
51 
	return (AMD_INVALID) ;
 52 
	return (AMD_INVALID) ;
52 
    }
 53 
    }
53 
    nz = Ap [n_col] ;
 54 
    nz = Ap [n_col] ;