Searched refs:n_old (Results 1 – 3 of 3) sorted by relevance
| /petsc/src/ksp/ksp/utils/lmvm/blas_cyclic/cupm/ |
| H A D | blas_cyclic_cupm_impl.hpp | 182 cupmBlasInt_t n, n_old, n_new; in trsv() local
194 PetscCall(PetscCUPMBlasIntCast(m - i_oldest, &n_old)); in trsv()
205 …if (n_new > 0 && n_old > 0) PetscCallCUPMBLAS(cupmBlasXgemv(handle, CUPMBLAS_OP_N, n_old, n_new, &… in trsv()
206 …if (n_old > 0) PetscCallCUPMBLAS(cupmBlasXtrsv(handle, CUPMBLAS_FILL_MODE_UPPER, CUPMBLAS_OP_N, CU… in trsv()
208 …if (n_old > 0) PetscCallCUPMBLAS(cupmBlasXtrsv(handle, CUPMBLAS_FILL_MODE_UPPER, CUPMBLAS_OP_C, CU… in trsv()
209 …if (n_new > 0 && n_old > 0) PetscCallCUPMBLAS(cupmBlasXgemv(handle, CUPMBLAS_OP_C, n_old, n_new, &… in trsv()
225 cupmBlasInt_t n, n_old, n_new; in hemv() local
239 PetscCall(PetscCUPMBlasIntCast(m - i_oldest, &n_old)); in hemv()
249 …if (n_old > 0) PetscCallCUPMBLAS(cupmBlasXhemv(handle, CUPMBLAS_FILL_MODE_UPPER, n_old, calpha, &A… in hemv()
250 if (n_new > 0 && n_old > 0) { in hemv()
[all …]
|
| /petsc/src/ksp/ksp/utils/lmvm/dense/cd_cupm/ |
| H A D | cd_cupm.cxx | 51 cupmBlasInt_t n_old, n_new; in SolveInPlaceCyclic() local
61 PetscCall(PetscCUPMBlasIntCast(m - oldest_index, &n_old)); in SolveInPlaceCyclic()
69 …if (n_new > 0 && n_old > 0) PetscCallCUPMBLAS(cupmBlasXgemv(handle, CUPMBLAS_OP_N, n_old, n_new, &… in SolveInPlaceCyclic()
70 …if (n_old > 0) PetscCallCUPMBLAS(cupmBlasXtrsv(handle, CUPMBLAS_FILL_MODE_UPPER, CUPMBLAS_OP_N, CU… in SolveInPlaceCyclic()
72 …if (n_old > 0) PetscCallCUPMBLAS(cupmBlasXtrsv(handle, CUPMBLAS_FILL_MODE_UPPER, CUPMBLAS_OP_C, CU… in SolveInPlaceCyclic()
73 …if (n_new > 0 && n_old > 0) PetscCallCUPMBLAS(cupmBlasXgemv(handle, CUPMBLAS_OP_C, n_old, n_new, &… in SolveInPlaceCyclic()
|
| /petsc/src/ksp/ksp/utils/lmvm/dense/ |
| H A D | cd_utils.c | 113 PetscBLASInt n_old, n_new, lda_blas, one = 1; in MatUpperTriangularSolveInPlace_Internal() local
116 PetscCall(PetscBLASIntCast(m - oldest_index, &n_old)); in MatUpperTriangularSolveInPlace_Internal()
121 …if (n_new > 0 && n_old > 0) PetscCallBLAS("BLASgemv", BLASgemv_("N", &n_old, &n_new, &minus_one, &… in MatUpperTriangularSolveInPlace_Internal()
122 …if (n_old > 0) PetscCallBLAS("BLAStrsv", BLAStrsv_("U", "N", "NotUnitTriangular", &n_old, &A[oldes… in MatUpperTriangularSolveInPlace_Internal()
124 if (n_old > 0) { in MatUpperTriangularSolveInPlace_Internal()
125 …PetscCallBLAS("BLAStrsv", BLAStrsv_("U", "C", "NotUnitTriangular", &n_old, &A[oldest_index * (lda … in MatUpperTriangularSolveInPlace_Internal()
126 …if (n_new > 0 && n_old > 0) PetscCallBLAS("BLASgemv", BLASgemv_("C", &n_old, &n_new, &minus_one, &… in MatUpperTriangularSolveInPlace_Internal()
|