| /petsc/src/mat/utils/ |
| H A D | veccreatematdense.c | 28 PetscBool isstd, iscuda, iship, iskokkos; in MatCreateDenseFromVecType() local
33 PetscCall(PetscStrcmpAny(vtype, &iship, VECHIP, VECMPIHIP, VECSEQHIP, "")); in MatCreateDenseFromVecType()
35 PetscCheck(isstd || iscuda || iship || iskokkos, comm, PETSC_ERR_SUP, "Not for type %s", vtype); in MatCreateDenseFromVecType()
37 else if (iship) root_type = VECHIP; in MatCreateDenseFromVecType()
42 else if (PetscDefined(HAVE_MACRO_KOKKOS_ENABLE_HIP)) iship = PETSC_TRUE; in MatCreateDenseFromVecType()
60 } else if (iship) { in MatCreateDenseFromVecType()
|
| /petsc/src/mat/tests/ |
| H A D | ex217.c | 11 PetscBool ishypre, iskokkos, iscuda, iship; in main() local
20 …PetscCall(PetscObjectTypeCompareAny((PetscObject)A, &iship, MATMPIAIJHIPSPARSE, MATSEQAIJHIPSPARSE… in main()
31 …else if (iship) PetscCheck(memtype == PETSC_MEMTYPE_HIP, PETSC_COMM_WORLD, PETSC_ERR_PLIB, "wrong … in main()
|
| /petsc/src/vec/vec/tests/ |
| H A D | ex60.c | 8 PetscBool iscuda, iskokkos, iship; in main() local
23 PetscCall(PetscObjectTypeCompare((PetscObject)x, VECSEQHIP, &iship)); in main()
37 } else if (iship) { in main()
|
| /petsc/src/vec/vec/interface/ |
| H A D | vecreg.c | 196 PetscBool iscuda, iship, iskokkos, isvcl; in VecGetRootType_Private() local
202 PetscCall(PetscObjectTypeCompareAny((PetscObject)vec, &iship, VECHIP, VECMPIHIP, VECSEQHIP, "")); in VecGetRootType_Private()
207 } else if (iship) { in VecGetRootType_Private()
|
| H A D | rvector.c | 1606 PetscBool isstd, iscuda, iship; in VecGetSubVector() local
1610 PetscCall(PetscObjectTypeCompareAny((PetscObject)X, &iship, VECSEQHIP, VECMPIHIP, "")); in VecGetSubVector()
1630 } else if (iship) { in VecGetSubVector()
1728 PetscBool iscuda, iship; in VecRestoreSubVector() local
1730 PetscCall(PetscObjectTypeCompareAny((PetscObject)X, &iship, VECSEQHIP, VECMPIHIP, "")); in VecRestoreSubVector()
1758 } else if (iship) { in VecRestoreSubVector()
|
| /petsc/src/binding/petsc4py/src/lib-petsc/ |
| H A D | custom.h | 178 char *iscuda = NULL, *iship = NULL, *iskok = NULL; in VecGetCurrentMemType() local
182 PetscCall(PetscStrstr(rtype,"hip",&iship)); in VecGetCurrentMemType()
185 else if (iship) *m = PETSC_MEMTYPE_HIP; in VecGetCurrentMemType()
|
| /petsc/src/mat/impls/hypre/ |
| H A D | mhypre.c | 807 PetscBool iscuda, iship; local
819 …PetscCall(PetscObjectTypeCompareAny((PetscObject)A, &iship, MATSEQAIJHIPSPARSE, MATMPIAIJHIPSPARSE…
826 if (!boundtocpu && (iscuda || iship)) {
835 if (iship) {
861 if (!boundtocpu && (iscuda || iship)) {
869 if (iship) {
959 PetscBool iscuda, iship; local
964 …PetscCall(PetscObjectTypeCompareAny((PetscObject)A, &iship, MATSEQAIJHIPSPARSE, MATMPIAIJHIPSPARSE…
968 if (iship) sameint = PETSC_TRUE;
|
| /petsc/src/mat/impls/dense/mpi/ |
| H A D | mpidense.c | 212 PetscBool iship; in MatDenseSetLDA_MPIDense() local
213 PetscCall(PetscObjectTypeCompare((PetscObject)A, MATMPIDENSEHIP, &iship)); in MatDenseSetLDA_MPIDense()
214 if (iship) mtype = MATSEQDENSEHIP; in MatDenseSetLDA_MPIDense()
1386 PetscBool iship; in MatMPIDenseSetPreallocation_MPIDense() local
1387 PetscCall(PetscObjectTypeCompare((PetscObject)mat, MATMPIDENSEHIP, &iship)); in MatMPIDenseSetPreallocation_MPIDense()
1388 if (iship) mtype = MATSEQDENSEHIP; in MatMPIDenseSetPreallocation_MPIDense()
|
| /petsc/src/dm/impls/swarm/ |
| H A D | swarm.c | 315 PetscBool iscuda, iskokkos, iship; in DMSwarmCreateVectorFromField_Private() local
326 PetscCall(PetscStrcmp(dm->vectype, VECHIP, &iship)); in DMSwarmCreateVectorFromField_Private()
332 else if (iship) PetscCall(VecSetType(*vec, VECHIP)); in DMSwarmCreateVectorFromField_Private()
|
| /petsc/src/ksp/pc/impls/hypre/ |
| H A D | hypre.c | 288 PetscBool iscuda, iship, iskokkos; in PCSetUp_HYPRE() local
291 …PetscCall(PetscObjectTypeCompareAny((PetscObject)pc->pmat, &iship, MATSEQAIJHIPSPARSE, MATMPIAIJHI… in PCSetUp_HYPRE()
293 if (iscuda || iship || iskokkos) PetscCall(MatDestroy(&jac->hpmat)); in PCSetUp_HYPRE()
|
| /petsc/src/mat/impls/dense/seq/ |
| H A D | dense.c | 3369 PetscBool isstd, iskok, iscuda, iship; in MatDenseCreateColumnVec_Private() local
3381 PetscCall(PetscStrcmpAny(A->defaultvectype, &iship, VECHIP, VECSEQHIP, VECMPIHIP, "")); in MatDenseCreateColumnVec_Private()
3399 } else if (iship) { in MatDenseCreateColumnVec_Private()
|
| /petsc/src/mat/impls/aij/mpi/ |
| H A D | mpiaij.c | 7097 PetscBool mptmp[MAX_NUMBER_INTERMEDIATE], hasoffproc = PETSC_FALSE, iscuda, iship, iskokk; in MatProductSymbolic_MPIAIJBACKEND() local
7389 …PetscCall(PetscObjectTypeCompareAny((PetscObject)C, &iship, MATSEQAIJHIPSPARSE, MATMPIAIJHIPSPARSE… in MatProductSymbolic_MPIAIJBACKEND()
7392 else if (iship) mmdata->mtype = PETSC_MEMTYPE_HIP; in MatProductSymbolic_MPIAIJBACKEND()
|
| /petsc/src/ksp/pc/impls/bddc/ |
| H A D | bddcprivate.c | 5434 PetscBool iscuda, iship, iskokkos; in PCBDDCSetUpCorrection() local
5438 …PetscCall(PetscObjectTypeCompareAny((PetscObject)pcis->vec1_N, &iship, VECHIP, VECMPIHIP, VECSEQHI… in PCBDDCSetUpCorrection()
5442 else if (PetscDefined(HAVE_MACRO_KOKKOS_ENABLE_HIP)) iship = PETSC_TRUE; in PCBDDCSetUpCorrection()
5445 else if (iship) mtype = multi_element ? MATSEQAIJHIPSPARSE : MATSEQDENSEHIP; in PCBDDCSetUpCorrection()
|