Fix kernel #ifdef dyslexia

src/elpa2/legacy_interface/elpa2_utilities_legacy.F90

@@ -75,40 +75,40 @@ module elpa2_utilities
 #ifdef WITH_REAL_SSE_KERNEL
   integer(kind=ik), parameter :: REAL_ELPA_KERNEL_SSE = ELPA_2STAGE_REAL_SSE
 #endif
-#ifdef WITH_REAL_SSE_BLOCK_KERNEL2
+#ifdef WITH_REAL_SSE_BLOCK2_KERNEL
   integer(kind=ik), parameter :: REAL_ELPA_KERNEL_SSE_BLOCK2 = ELPA_2STAGE_REAL_SSE_BLOCK2
 #endif
-#ifdef WITH_REAL_SSE_BLOCK_KERNEL4
+#ifdef WITH_REAL_SSE_BLOCK4_KERNEL
   integer(kind=ik), parameter :: REAL_ELPA_KERNEL_SSE_BLOCK4 = ELPA_2STAGE_REAL_SSE_BLOCK4
 #endif
-#ifdef WITH_REAL_SSE_BLOCK_KERNEL6
+#ifdef WITH_REAL_SSE_BLOCK6_KERNEL
   integer(kind=ik), parameter :: REAL_ELPA_KERNEL_SSE_BLOCK6 = ELPA_2STAGE_REAL_SSE_BLOCK6
 #endif
-#ifdef WITH_REAL_AVX_BLOCK_KERNEL2
+#ifdef WITH_REAL_AVX_BLOCK2_KERNEL
   integer(kind=ik), parameter :: REAL_ELPA_KERNEL_AVX_BLOCK2 = ELPA_2STAGE_REAL_AVX_BLOCK2
 #endif
-#ifdef WITH_REAL_AVX_BLOCK_KERNEL4
+#ifdef WITH_REAL_AVX_BLOCK4_KERNEL
   integer(kind=ik), parameter :: REAL_ELPA_KERNEL_AVX_BLOCK4 = ELPA_2STAGE_REAL_AVX_BLOCK4
 #endif
-#ifdef WITH_REAL_AVX_BLOCK_KERNEL6
+#ifdef WITH_REAL_AVX_BLOCK6_KERNEL
   integer(kind=ik), parameter :: REAL_ELPA_KERNEL_AVX_BLOCK6 = ELPA_2STAGE_REAL_AVX_BLOCK6
 #endif
-#ifdef WITH_REAL_AVX_KERNEL2_BLOCK2
+#ifdef WITH_REAL_AVX2_BLOCK2_KERNEL
   integer(kind=ik), parameter :: REAL_ELPA_KERNEL_AVX2_BLOCK2 = ELPA_2STAGE_REAL_AVX2_BLOCK2
 #endif
-#ifdef WITH_REAL_AVX_KERNEL2_BLOCK4
+#ifdef WITH_REAL_AVX2_BLOCK4_KERNEL
   integer(kind=ik), parameter :: REAL_ELPA_KERNEL_AVX2_BLOCK4 = ELPA_2STAGE_REAL_AVX2_BLOCK4
 #endif
-#ifdef WITH_REAL_AVX_KERNEL2_BLOCK6
+#ifdef WITH_REAL_AVX2_BLOCK6_KERNEL
   integer(kind=ik), parameter :: REAL_ELPA_KERNEL_AVX2_BLOCK6 = ELPA_2STAGE_REAL_AVX2_BLOCK6
 #endif
-#ifdef WITH_REAL_AVX_KERNEL512_BLOCK2
+#ifdef WITH_REAL_AVX512_BLOCK2_KERNEL
   integer(kind=ik), parameter :: REAL_ELPA_KERNEL_AVX512_BLOCK2 = ELPA_2STAGE_REAL_AVX512_BLOCK2
 #endif
-#ifdef WITH_REAL_AVX_KERNEL512_BLOCK4
+#ifdef WITH_REAL_AVX512_BLOCK4_KERNEL
   integer(kind=ik), parameter :: REAL_ELPA_KERNEL_AVX512_BLOCK4 = ELPA_2STAGE_REAL_AVX512_BLOCK4
 #endif
-#ifdef WITH_REAL_AVX_KERNEL512_BLOCK6
+#ifdef WITH_REAL_AVX512_BLOCK6_KERNEL
   integer(kind=ik), parameter :: REAL_ELPA_KERNEL_AVX512_BLOCK6 = ELPA_2STAGE_REAL_AVX512_BLOCK6
 #endif
 #ifdef WITH_GPU_KERNEL
@@ -132,28 +132,28 @@ module elpa2_utilities
 #ifdef WITH_COMPLEX_SSE_KERNEL
   integer(kind=ik), parameter :: COMPLEX_ELPA_KERNEL_SSE = ELPA_2STAGE_COMPLEX_SSE
 #endif
-#ifdef WITH_COMPLEX_SSE_BLOCK_KERNEL1
+#ifdef WITH_COMPLEX_SSE_BLOCK1_KERNEL
   integer(kind=ik), parameter :: COMPLEX_ELPA_KERNEL_SSE_BLOCK1 = ELPA_2STAGE_COMPLEX_SSE_BLOCK1
 #endif
-#ifdef WITH_COMPLEX_SSE_BLOCK_KERNEL2
+#ifdef WITH_COMPLEX_SSE_BLOCK2_KERNEL
   integer(kind=ik), parameter :: COMPLEX_ELPA_KERNEL_SSE_BLOCK2 = ELPA_2STAGE_COMPLEX_SSE_BLOCK2
 #endif
-#ifdef WITH_COMPLEX_AVX_BLOCK_KERNEL1
+#ifdef WITH_COMPLEX_AVX_BLOCK1_KERNEL
   integer(kind=ik), parameter :: COMPLEX_ELPA_KERNEL_AVX_BLOCK1 = ELPA_2STAGE_COMPLEX_AVX_BLOCK1
 #endif
-#ifdef WITH_COMPLEX_AVX_BLOCK_KERNEL2
+#ifdef WITH_COMPLEX_AVX_BLOCK2_KERNEL
   integer(kind=ik), parameter :: COMPLEX_ELPA_KERNEL_AVX_BLOCK2 = ELPA_2STAGE_COMPLEX_AVX_BLOCK2
 #endif
-#ifdef WITH_COMPLEX_AVX_KERNEL2_BLOCK1
+#ifdef WITH_COMPLEX_AVX2_BLOCK1_KERNEL
   integer(kind=ik), parameter :: COMPLEX_ELPA_KERNEL_AVX2_BLOCK1 = ELPA_2STAGE_COMPLEX_AVX2_BLOCK1
 #endif
-#ifdef WITH_COMPLEX_AVX_KERNEL2_BLOCK2
+#ifdef WITH_COMPLEX_AVX2_BLOCK2_KERNEL
   integer(kind=ik), parameter :: COMPLEX_ELPA_KERNEL_AVX2_BLOCK2 = ELPA_2STAGE_COMPLEX_AVX2_BLOCK2
 #endif
-#ifdef WITH_COMPLEX_AVX_KERNEL512_BLOCK1
+#ifdef WITH_COMPLEX_AVX512_BLOCK1_KERNEL
   integer(kind=ik), parameter :: COMPLEX_ELPA_KERNEL_AVX512_BLOCK1 = ELPA_2STAGE_COMPLEX_AVX512_BLOCK1
 #endif
-#ifdef WITH_COMPLEX_AVX_KERNEL512_BLOCK2
+#ifdef WITH_COMPLEX_AVX512_BLOCK2_KERNEL
   integer(kind=ik), parameter :: COMPLEX_ELPA_KERNEL_AVX512_BLOCK2 = ELPA_2STAGE_COMPLEX_AVX512_BLOCK2
 #endif
 #ifdef WITH_GPU_KERNEL