seq/spqr/aijspqr.c

238   cholmod_sparse cholA;
245   PetscCall((*chol->Wrap)(A, PETSC_TRUE, &cholA, &aijalloc, &valloc));
246   err = !SuiteSparseQR_C_numeric(PETSC_SMALL, &cholA, chol->spqrfact, chol->common);
249   if (aijalloc) PetscCall(PetscFree2(cholA.p, cholA.i));
250   if (valloc) PetscCall(PetscFree(cholA.x));
272   cholmod_sparse cholA;
278   PetscCall((*chol->Wrap)(A, PETSC_TRUE, &cholA, &aijalloc, &valloc));
279   if (PetscDefined(USE_DEBUG)) PetscCallExternal(!cholmod_l_check_sparse, &cholA, chol->common);
281   chol->spqrfact = SuiteSparseQR_C_symbolic(SPQR_ORDERING_DEFAULT, 1, &cholA, chol->common);
284   if (aijalloc) PetscCall(PetscFree2(cholA.p, cholA.i));
285   if (valloc) PetscCall(PetscFree(cholA.x));