Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
On Thursday, 7th July from 1 to 3 pm there will be a maintenance with a short downtime of GitLab.
Open sidebar
elpa
elpa
Commits
5a35d015
Commit
5a35d015
authored
Mar 29, 2017
by
Andreas Marek
Browse files
Remove unecessary device synchronize in complex case
parent
1ca304fb
Changes
1
Pipelines
1
Hide whitespace changes
Inline
Side-by-side
src/ev_tridi_band_gpu_c_v2_complex_template.Xcu
View file @
5a35d015
...
...
@@ -477,12 +477,14 @@ extern "C" void launch_compute_hh_trafo_c_kernel_complex_single( cuFloatComplex*
#endif
{
#if 0
cudaDeviceSynchronize();
cudaError_t err = cudaGetLastError();
if(err != cudaSuccess) printf("error prior to compute_ hh_ trafo c kernel: %s, %d\n",cudaGetErrorString(err), err);
dim3 n_block,n_thread;
dim3 n_block,
n_thread;
n_block = dim3(nev,1,1);
n_thread = dim3(nb,1,1);
#endif
switch (nb)
{
...
...
@@ -491,63 +493,64 @@ extern "C" void launch_compute_hh_trafo_c_kernel_complex_single( cuFloatComplex*
case 128:
case 64:
#ifdef DOUBLE_PRECISION_COMPLEX
compute_hh_trafo_c_kernel_2_2_complex_double<16><<<n
_block, n_thread
>>>(q, hh, hh_tau, nb, ldq, off, ncols);
compute_hh_trafo_c_kernel_2_2_complex_double<16><<<n
ev, nb
>>>(q, hh, hh_tau, nb, ldq, off, ncols);
#else
compute_hh_trafo_c_kernel_2_2_complex_single<16><<<n
_block, n_thread
>>>(q, hh, hh_tau, nb, ldq, off, ncols);
compute_hh_trafo_c_kernel_2_2_complex_single<16><<<n
ev, nb
>>>(q, hh, hh_tau, nb, ldq, off, ncols);
#endif
break;
case 32:
#ifdef DOUBLE_PRECISION_COMPLEX
compute_hh_trafo_c_kernel_2_2_complex_double<8><<<n
_block ,n_thread
>>>(q, hh, hh_tau, nb, ldq, off, ncols);
compute_hh_trafo_c_kernel_2_2_complex_double<8><<<n
ev ,nb
>>>(q, hh, hh_tau, nb, ldq, off, ncols);
#else
compute_hh_trafo_c_kernel_2_2_complex_single<8><<<n
_block ,n_thread
>>>(q, hh, hh_tau, nb, ldq, off, ncols);
compute_hh_trafo_c_kernel_2_2_complex_single<8><<<n
ev ,nb
>>>(q, hh, hh_tau, nb, ldq, off, ncols);
#endif
break;
case 16:
#ifdef DOUBLE_PRECISION_COMPLEX
compute_hh_trafo_c_kernel_2_2_complex_double<4><<<n
_block ,n_thread
>>>(q, hh, hh_tau, nb, ldq, off, ncols);
compute_hh_trafo_c_kernel_2_2_complex_double<4><<<n
ev ,nb
>>>(q, hh, hh_tau, nb, ldq, off, ncols);
#else
compute_hh_trafo_c_kernel_2_2_complex_single<4><<<n
_block ,n_thread
>>>(q, hh, hh_tau, nb, ldq, off, ncols);
compute_hh_trafo_c_kernel_2_2_complex_single<4><<<n
ev ,nb
>>>(q, hh, hh_tau, nb, ldq, off, ncols);
#endif
break;
case 8:
#ifdef DOUBLE_PRECISION_COMPLEX
compute_hh_trafo_c_kernel_2_2_complex_double<2><<<n
_block ,n_thread
>>>(q, hh, hh_tau, nb, ldq, off, ncols);
compute_hh_trafo_c_kernel_2_2_complex_double<2><<<n
ev ,nb
>>>(q, hh, hh_tau, nb, ldq, off, ncols);
#else
compute_hh_trafo_c_kernel_2_2_complex_single<2><<<n
_block ,n_thread
>>>(q, hh, hh_tau, nb, ldq, off, ncols);
compute_hh_trafo_c_kernel_2_2_complex_single<2><<<n
ev ,nb
>>>(q, hh, hh_tau, nb, ldq, off, ncols);
#endif
break;
case 4:
#ifdef DOUBLE_PRECISION_COMPLEX
compute_hh_trafo_c_kernel_2_2_complex_double<1><<<n
_block ,n_thread
>>>(q, hh, hh_tau, nb, ldq, off, ncols);
compute_hh_trafo_c_kernel_2_2_complex_double<1><<<n
ev ,nb
>>>(q, hh, hh_tau, nb, ldq, off, ncols);
#else
compute_hh_trafo_c_kernel_2_2_complex_single<1><<<n
_block ,n_thread
>>>(q, hh, hh_tau, nb, ldq, off, ncols);
compute_hh_trafo_c_kernel_2_2_complex_single<1><<<n
ev ,nb
>>>(q, hh, hh_tau, nb, ldq, off, ncols);
#endif
break;
case 2:
case 1:
#ifdef DOUBLE_PRECISION_COMPLEX
compute_hh_trafo_c_kernel_2_2_complex_double<0><<<n
_block ,n_thread
>>>(q, hh, hh_tau, nb, ldq, off, ncols);
compute_hh_trafo_c_kernel_2_2_complex_double<0><<<n
ev ,nb
>>>(q, hh, hh_tau, nb, ldq, off, ncols);
#else
compute_hh_trafo_c_kernel_2_2_complex_single<0><<<n
_block ,n_thread
>>>(q, hh, hh_tau, nb, ldq, off, ncols);
compute_hh_trafo_c_kernel_2_2_complex_single<0><<<n
ev ,nb
>>>(q, hh, hh_tau, nb, ldq, off, ncols);
#endif
break;
default:
printf("Error: please use a power-of-2 SCALAPACK block size which is between 1 and BLOCK_CYCLIC_BLOCKSIZE.\n");
}
#if 0
cudaDeviceSynchronize();
err = cudaGetLastError();
if ( err!= cudaSuccess)
{
printf("\n compute hh trafo c kernel failed %s \n",cudaGetErrorString(err) );
}
#endif
}
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment