Searched refs:real_eig (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/ksp/ksp/utils/lmvm/tests/ |
| H A D | ex1.c | 455 PetscReal *real_eig, *imag_eig; in MatSetRandomWithShift() local
463 PetscCall(PetscMalloc2(N, &real_eig, N, &imag_eig)); in MatSetRandomWithShift()
471 PetscCall(KSPComputeEigenvaluesExplicitly(kspeig, N, real_eig, imag_eig)); in MatSetRandomWithShift()
473 PetscCallMPI(MPI_Bcast(real_eig, count, MPIU_REAL, 0, comm)); in MatSetRandomWithShift()
474 PetscCall(PetscSortReal(N, real_eig)); in MatSetRandomWithShift()
475 shift = PetscMax(2 * PetscAbsReal(real_eig[N - 1]), 2 * PetscAbsReal(real_eig[0])); in MatSetRandomWithShift()
479 PetscCall(PetscFree2(real_eig, imag_eig)); in MatSetRandomWithShift()
|