def eigvals(a)
    jobvl, jobvr = 'N','N'
    case blas_char(a)
    when /c|z/
      w, = Lapack.call(:geev, a, jobvl:jobvl, jobvr:jobvr)
    else
      wr, wi, = Lapack.call(:geev, a, jobvl:jobvl, jobvr:jobvr)
      w  = wr + wi * Complex::I
    end
    w
  end
def eigvals(a)
    jobvl, jobvr = 'N','N'
    case blas_char(a)
    when /c|z/
      w, = Lapack.call(:geev, a, jobvl:jobvl, jobvr:jobvr)
    else
      wr, wi, = Lapack.call(:geev, a, jobvl:jobvl, jobvr:jobvr)
      w  = wr + wi * Complex::I
    end
    w
  end
Computes the eigenvalues only for a square nonsymmetric matrix A.

 @param a [Numo::NArray] square nonsymmetric matrix (>= 2-dimensinal NArray)
 @return [Numo::NArray] eigenvalues