19 PetscErrorCode MatCreateLaplacian(Mat A, PetscReal tol, PetscBool weighted, Mat *L)  in MatCreateLaplacian()  argument
29   PetscCall(MatCreate(PetscObjectComm((PetscObject)A), L));  in MatCreateLaplacian()
32   PetscCall(MatSetSizes(*L, m, n, M, N));  in MatCreateLaplacian()
61   PetscCall(MatSetFromOptions(*L));  in MatCreateLaplacian()
62   PetscCall(MatXAIJSetPreallocation(*L, 1, dnnz, onnz, NULL, NULL));  in MatCreateLaplacian()
63   PetscCall(MatSetUp(*L));  in MatCreateLaplacian()
91     PetscCall(MatSetValues(*L, 1, &r, newcols, newCols, newVals, INSERT_VALUES));  in MatCreateLaplacian()
94   PetscCall(MatAssemblyBegin(*L, MAT_FINAL_ASSEMBLY));  in MatCreateLaplacian()
95   PetscCall(MatAssemblyEnd(*L, MAT_FINAL_ASSEMBLY));  in MatCreateLaplacian()
105   Mat             L;  in MatGetOrdering_Spectral()  local
109   PetscCall(MatCreateLaplacian(A, eps, PETSC_FALSE, &L));  in MatGetOrdering_Spectral()
115     PetscCall(MatCreateVecs(L, &x, NULL));  in MatGetOrdering_Spectral()
118     PetscCall(MatMult(L, x, y));  in MatGetOrdering_Spectral()
136     PetscCall(MatConvert(L, MATDENSE, MAT_INITIAL_MATRIX, &LD));  in MatGetOrdering_Spectral()
155 …Ind] <= 1.0e-12 && imagpart[evInd] <= 1.0e-12, PetscObjectComm((PetscObject)L), PETSC_ERR_PLIB, "G…  in MatGetOrdering_Spectral()
157 …Ind] >= 1.0e-12 || imagpart[evInd] >= 1.0e-12, PetscObjectComm((PetscObject)L), PETSC_ERR_PLIB, "G…  in MatGetOrdering_Spectral()
160 … * n + i] - eigvec[evInd * n + 0]) <= 1.0e-10, PetscObjectComm((PetscObject)L), PETSC_ERR_PLIB, "G…  in MatGetOrdering_Spectral()
176     PetscCall(MatDestroy(&L));  in MatGetOrdering_Spectral()