Save guard against unknown values for string "method"

src/elpa.F90

@@ -114,6 +114,7 @@ module elpa
                                  mpi_comm_all, THIS_REAL_ELPA_KERNEL_API,   &
                                  useQR, method) result(success)
       use iso_c_binding
+      use elpa_utilities
       implicit none
       integer(kind=c_int), intent(in)           :: na, nev, lda, ldq, matrixCols, mpi_comm_rows, &
                                                    mpi_comm_cols, mpi_comm_all
@@ -140,6 +141,9 @@ module elpa
           useELPA1 = .false.
         else if (trim(method) .eq. "auto" .or. trim(method) .eq. "AUTO") then
           useELPA1 = .false.
+        else
+          write(error_unit,*) "Specified method not known! Using ELPA 2-stage"
+          useELPA1 = .false.
         endif
       endif
 
@@ -206,6 +210,8 @@ module elpa
                                     mpi_comm_all, THIS_COMPLEX_ELPA_KERNEL_API,&
                                     method) result(success)
       use iso_c_binding
+      use elpa_utilities
+
       implicit none
       integer(kind=c_int), intent(in)           :: na, nev, lda, ldq, matrixCols, mpi_comm_rows, &
                                                    mpi_comm_cols, mpi_comm_all
@@ -231,6 +237,9 @@ module elpa
           useELPA1 = .false.
         else if (trim(method) .eq. "auto" .or. trim(method) .eq. "AUTO") then
           useELPA1 = .false.
+        else
+          write(error_unit,*) "Specified method not known! Using ELPA 2-stage"
+          useELPA1 = .false.
         endif
       endif