Searched refs:evec (Results 1 – 1 of 1) sorted by relevance
| /honee/qfunctions/ |
| H A D | utils_eigensolver_jacobi.h | 229 CEED_QFUNCTION_HELPER void SortRows(CeedScalar *eval, CeedScalar *evec, CeedInt N, SortCriteria sor… in SortRows() argument
254 for (CeedInt k = 0; k < N; k++) SwapScalar(&evec[i * N + k], &evec[i_max * N + k]); in SortRows()
277 …edInt Diagonalize(CeedScalar *A, CeedInt N, CeedScalar *eval, CeedScalar *evec, CeedInt *max_idx_r… in Diagonalize() argument
283 …for (CeedInt j = 0; j < N; j++) evec[i * N + j] = (i == j) ? 1.0 : 0.0; // Set evec equal to the … in Diagonalize()
304 if (calc_evec) ApplyRotLeft(evec, N, i, j, rotmat_cst); 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()
321 …return Diagonalize((CeedScalar *)A, 3, (CeedScalar *)eval, (CeedScalar *)evec, (CeedInt *)max_idx_… in Diagonalize3()
|