@@ -328,21 +328,9 @@ void SEMproxy::run()
328328
329329 for (int i = 0 ; i < pnAtReceiver.extent (0 ); i++)
330330 {
331- #ifdef USE_KOKKOS
332331 auto subview = Kokkos::subview (pnAtReceiver, i, Kokkos::ALL ());
333332 vectorReal subset (" receiver_save" , num_sample_);
334333 Kokkos::deep_copy (subset, subview);
335- #else
336- auto & subview = pnAtReceiver;
337- vectorReal subset (subview.extent (0 ) * subview.extent (1 ));
338- for (size_t k = 0 ; k < subview.extent (0 ); ++k)
339- {
340- for (size_t j = 0 ; j < subview.extent (1 ); ++j)
341- {
342- subset[k * subview.extent (1 ) + j] = subview (k, j);
343- }
344- }
345- #endif
346334 io_ctrl_->saveReceiver (subset, src_coord_);
347335 }
348336
@@ -461,21 +449,9 @@ void SEMproxy::run()
461449
462450 for (int i = 0 ; i < uxnAtReceiver.extent (0 ); i++)
463451 {
464- #ifdef USE_KOKKOS
465452 auto subview = Kokkos::subview (uxnAtReceiver, i, Kokkos::ALL ());
466453 vectorReal subset (" receiver_save" , num_sample_);
467454 Kokkos::deep_copy (subset, subview);
468- #else
469- auto & subview = pnAtReceiver;
470- vectorReal subset (subview.extent (0 ) * subview.extent (1 ));
471- for (size_t k = 0 ; k < subview.extent (0 ); ++k)
472- {
473- for (size_t j = 0 ; j < subview.extent (1 ); ++j)
474- {
475- subset[k * subview.extent (1 ) + j] = subview (k, j);
476- }
477- }
478- #endif // USE_KOKKOS
479455 io_ctrl_->saveReceiver (subset, src_coord_);
480456 }
481457
@@ -887,7 +863,6 @@ void SEMproxy::init_source()
887863
888864void SEMproxy::saveSnapshot (int timestep, VECTOR_REAL_VIEW data) const
889865{
890- #ifdef USE_KOKKOS
891866 Kokkos::fence ();
892867 auto nb_nodes = data.extent (0 );
893868
@@ -896,10 +871,6 @@ void SEMproxy::saveSnapshot(int timestep, VECTOR_REAL_VIEW data) const
896871 Kokkos::parallel_for (
897872 " copy_column" , nb_nodes, KOKKOS_LAMBDA (int i) { subset (i) = data (i); });
898873 Kokkos::fence ();
899- #else
900- auto & subset = data;
901- #endif // USE_KOKKOS
902-
903874 io_ctrl_->saveSnapshot (subset, timestep);
904875}
905876
0 commit comments