seq/kokkos/aijkok.kokkos.cxx

1779 // R is represented by rowperm in factors. If R is identity (i.e, no reordering), then rowperm is empty.
1789   PetscIntKokkosView         &rowperm  = factors->rowperm;
1790   PetscBool                   identity = rowperm.extent(0) ? PETSC_FALSE : PETSC_TRUE;
1805     PetscCallCXX(Kokkos::parallel_for(Kokkos::RangePolicy<>(exec, 0, m), KOKKOS_LAMBDA(const PetscInt i) { B(i) = b(rowperm(i)); }));
1823   if (!identity) PetscCallCXX(Kokkos::parallel_for(Kokkos::RangePolicy<>(exec, 0, m), KOKKOS_LAMBDA(const PetscInt i) { x(rowperm(i)) = X(i); }));
1832 // R and C are represented by rowperm and colperm in factors.
1833 // If R or C is identity (i.e, no reordering), then rowperm or colperm is empty.
1842   PetscIntKokkosView         &rowperm      = factors->rowperm;
1844   PetscBool                   row_identity = rowperm.extent(0) ? PETSC_FALSE : PETSC_TRUE;
1859     PetscCallCXX(Kokkos::parallel_for(Kokkos::RangePolicy<>(exec, 0, m), KOKKOS_LAMBDA(const PetscInt i) { B(i) = b(rowperm(i)); }));
1882 // R and C are represented by rowperm and colperm in factors.
1883 // If R or C is identity (i.e, no reordering), then rowperm or colperm is empty.
1893   PetscIntKokkosView         &rowperm      = factors->rowperm;
1895   PetscBool                   row_identity = rowperm.extent(0) ? PETSC_FALSE : PETSC_TRUE;
1924   if (!row_identity) PetscCallCXX(Kokkos::parallel_for(Kokkos::RangePolicy<>(exec, 0, m), KOKKOS_LAMBDA(const PetscInt i) { x(rowperm(i)) = X(i); }));
1982       IS        rowperm = ((Mat_SeqAIJ *)B->data)->row;
1984       PetscCall(ISIdentity(rowperm, &row_identity));
1988         PetscCall(ISGetIndices(rowperm, &ip));
1989         factors->rowperm = PetscIntKokkosView(NoInit("rowperm"), m);
1990         PetscCallCXX(Kokkos::deep_copy(factors->rowperm, PetscIntKokkosViewHost(const_cast<PetscInt *>(ip), m)));
1991         PetscCall(ISRestoreIndices(rowperm, &ip));
2211       IS        rowperm = ((Mat_SeqAIJ *)B->data)->row;
2213       PetscCall(ISIdentity(rowperm, &row_identity));
2217         PetscCall(ISGetIndices(rowperm, &ip));
2218         PetscCallCXX(factors->rowperm = PetscIntKokkosView(NoInit("rowperm"), m));
2219         PetscCallCXX(Kokkos::deep_copy(factors->rowperm, PetscIntKokkosViewHost(const_cast<PetscInt *>(ip), m)));
2220         PetscCall(ISRestoreIndices(rowperm, &ip));