Esempio n. 1
0
 // Describes how to run the CLBlast routine
 static StatusCode RunRoutine(const Arguments<T> &args, Buffers<T> &buffers, Queue &queue) {
   #ifdef OPENCL_API
     auto queue_plain = queue();
     auto event = cl_event{};
     auto status = Scal(args.n, args.alpha,
                        buffers.x_vec(), args.x_offset, args.x_inc,
                        &queue_plain, &event);
     if (status == StatusCode::kSuccess) { clWaitForEvents(1, &event); clReleaseEvent(event); }
   #elif CUDA_API
     auto status = Scal(args.n, args.alpha,
                        buffers.x_vec(), args.x_offset, args.x_inc,
                        queue.GetContext()(), queue.GetDevice()());
     cuStreamSynchronize(queue());
   #endif
   return status;
 }
Esempio n. 2
0
 // Describes how to run the CLBlast routine
 static StatusCode RunRoutine(const Arguments<T> &args, Buffers<T> &buffers, Queue &queue) {
   auto queue_plain = queue();
   auto event = cl_event{};
   auto status = Scal(args.n, args.alpha,
                      buffers.x_vec(), args.x_offset, args.x_inc,
                      &queue_plain, &event);
   clWaitForEvents(1, &event);
   return status;
 }
Esempio n. 3
0
 // Describes how to run the CLBlast routine
 static StatusCode RunRoutine(const Arguments<T> &args, Buffers<T> &buffers, Queue &queue) {
   auto queue_plain = queue();
   auto event = cl_event{};
   auto status = Axpy(args.n, args.alpha,
                      buffers.x_vec(), args.x_offset, args.x_inc,
                      buffers.y_vec(), args.y_offset, args.y_inc,
                      &queue_plain, &event);
   if (status == StatusCode::kSuccess) { clWaitForEvents(1, &event); clReleaseEvent(event); }
   return status;
 }
Esempio n. 4
0
 // Describes how to run the CLBlast routine
 static StatusCode RunRoutine(const Arguments<T> &args, Buffers<T> &buffers, Queue &queue) {
   auto queue_plain = queue();
   auto event = cl_event{};
   auto status = Trmv<T>(args.layout, args.triangle, args.a_transpose, args.diagonal,
                         args.n,
                         buffers.a_mat(), args.a_offset, args.a_ld,
                         buffers.x_vec(), args.x_offset, args.x_inc,
                         &queue_plain, &event);
   if (status == StatusCode::kSuccess) { clWaitForEvents(1, &event); clReleaseEvent(event); }
   return status;
 }
Esempio n. 5
0
 // Describes how to run the CLBlast routine
 static StatusCode RunRoutine(const Arguments<T> &args, Buffers<T> &buffers, Queue &queue) {
   auto queue_plain = queue();
   auto event = cl_event{};
   auto status = Sbmv(args.layout, args.triangle,
                      args.n, args.kl, args.alpha,
                      buffers.a_mat(), args.a_offset, args.a_ld,
                      buffers.x_vec(), args.x_offset, args.x_inc, args.beta,
                      buffers.y_vec(), args.y_offset, args.y_inc,
                      &queue_plain, &event);
   clWaitForEvents(1, &event);
   return status;
 }
Esempio n. 6
0
 // Describes how to run the CLBlast routine
 static StatusCode RunRoutine(const Arguments<T> &args, Buffers<T> &buffers, Queue &queue) {
   auto queue_plain = queue();
   auto event = cl_event{};
   auto status = Gbmv(args.layout, args.a_transpose,
                      args.m, args.n, args.kl, args.ku, args.alpha,
                      buffers.a_mat(), args.a_offset, args.a_ld,
                      buffers.x_vec(), args.x_offset, args.x_inc, args.beta,
                      buffers.y_vec(), args.y_offset, args.y_inc,
                      &queue_plain, &event);
   if (status == StatusCode::kSuccess) { clWaitForEvents(1, &event); clReleaseEvent(event); }
   return status;
 }