Professor Ripley commented on LAPACK error codes:
https://stat.ethz.ch/pipermail/r-help/2007-March/127702.html and says
"Internal LAPACK errors are usually problems with arithmetic accuracy,
and as such are compiler- and CPU-specific."

Is there a listing for the error codes from Lapack routine 'dsyevr'?
Especially I am interested about the meaning and handling of error codes 1
and 2. In Lapack.c I only see the reference to the variable info in certain
Fortran code:


    F77_CALL(dsyevr)(jobv, range, uplo, &n, rx, &n, &vl, &vu, &il, &iu,
&abstol, &m, rvalues, rz, &n, isuppz, &tmp, &lwork, &itmp, &liwork, &info);
    if (info != 0)
        error(_("error code %d from Lapack routine '%s'"), info, "dsyevr");
    lwork = (int) tmp;
    liwork = itmp;

    work = (double *) R_alloc(lwork, sizeof(double));
    iwork = (int *) R_alloc(liwork, sizeof(int));
    F77_CALL(dsyevr)(jobv, range, uplo, &n, rx, &n, &vl, &vu, &il, &iu,
&abstol, &m, rvalues, rz, &n, isuppz, work, &lwork, iwork, &liwork, &info);
    if (info != 0)
        error(_("error code %d from Lapack routine '%s'"), info, "dsyevr");

        [[alternative HTML version deleted]]

______________________________________________
R-devel@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-devel

Reply via email to