Home
last modified time | relevance | path

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

/honee/qfunctions/
H A Dutils_eigensolver_jacobi.h229 CEED_QFUNCTION_HELPER void SortRows(CeedScalar *eval, CeedScalar *evec, CeedInt N, SortCriteria sor… in SortRows() argument
238 if (eval[j] > eval[i_max]) i_max = j; in SortRows()
241 if (eval[j] < eval[i_max]) i_max = j; in SortRows()
244 if (fabs(eval[j]) > fabs(eval[i_max])) i_max = j; in SortRows()
247 if (fabs(eval[j]) < fabs(eval[i_max])) i_max = j; in SortRows()
253 SwapScalar(&eval[i], &eval[i_max]); in SortRows()
277 CEED_QFUNCTION_HELPER CeedInt Diagonalize(CeedScalar *A, CeedInt N, CeedScalar *eval, CeedScalar *e… in Diagonalize() argument
307 for (CeedInt i = 0; i < N; i++) eval[i] = A[i * N + i]; in Diagonalize()
310 SortRows(eval, evec, N, sort_criteria); in Diagonalize()
319 CEED_QFUNCTION_HELPER CeedInt Diagonalize3(CeedScalar A[3][3], CeedScalar eval[3], CeedScalar evec[… in Diagonalize3()
[all …]