The R Project SVN R-packages

Rev

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

Rev 4904 Rev 5017
Line 233... Line 233...
233 
}
 233 
}
234 
 
 234 
 
235 
/* Modified version of Tim Davis's cs_lu_mex.c file for MATLAB */
 235 
/* Modified version of Tim Davis's cs_lu_mex.c file for MATLAB */
236 
SEXP dgCMatrix_LU(SEXP Ap, SEXP orderp, SEXP tolp)
 236 
SEXP dgCMatrix_LU(SEXP Ap, SEXP orderp, SEXP tolp)
237 
{
 237 
{
- 
 
 238 
    /* Is currently only called as  .Call(dgCMatrix_LU, x, TRUE, 1)) */
238 
    SEXP ans = get_factors(Ap, "LU");
 239 
    SEXP ans = get_factors(Ap, "LU");
239 
    CSP A = AS_CSP(Ap), D;
 240 
    CSP A = AS_CSP(Ap), D;
240 
    css *S;
 241 
    css *S;
241 
    csn *N;
 242 
    csn *N;
242 
    int n, order = asInteger(orderp), *p;
 243 
    int n, order = asInteger(orderp), *p;