Home
last modified time | relevance | path

Searched refs:val_r (Results 1 – 1 of 1) sorted by relevance

/petsc/src/ksp/ksp/impls/gmres/agmres/
H A Dagmresdeflation.c17 static PetscErrorCode KSPAGMRESQuickSort(PetscScalar *val_r, PetscScalar *val_i, PetscInt size, Pet… in KSPAGMRESQuickSort() argument
37 pivot_r = val_r[L]; in KSPAGMRESQuickSort()
43 abs_val = PetscSqrtReal(val_r[R] * val_r[R] + val_i[R] * val_i[R]); in KSPAGMRESQuickSort()
46 abs_val = PetscSqrtReal(val_r[R] * val_r[R] + val_i[R] * val_i[R]); in KSPAGMRESQuickSort()
49 val_r[L] = val_r[R]; in KSPAGMRESQuickSort()
54 abs_val = PetscSqrtReal(val_r[L] * val_r[L] + val_i[L] * val_i[L]); in KSPAGMRESQuickSort()
57 abs_val = PetscSqrtReal(val_r[L] * val_r[L] + val_i[L] * val_i[L]); in KSPAGMRESQuickSort()
60 val_r[R] = val_r[L]; in KSPAGMRESQuickSort()
66 val_r[L] = pivot_r; in KSPAGMRESQuickSort()