[Octave-bug-tracker] [bug #52425] eigs function regresses

[Dmitri A. Sergatskov]

Follow-up Comment #34, bug #52425 (project octave):

E.g.:

>>>>> processing
/scratch/buildbot/slaves/jwe-debian-x86_64-0/clang-4_0-debian/src/scripts/sparse/eigs.m
***** testif HAVE_ARPACK
 A = toeplitz ([-2, 1, zeros(1, 8)]);
 A = kron (A, eye (10)) + kron (eye (10), A);
 opts.v0 = (1:100)';
 opts.maxit = 3;
 warning ("off", "Octave:eigs:UnconvergedEigenvalues", "local");
 d = eigs (A, 4, "lm", opts);
 assert (d(2:4), [NaN; NaN; NaN]);
!!!!! test failed
ASSERT errors for:  assert (d (2:4),[NaN; NaN; NaN])

  Location  |  Observed  |  Expected  |  Reason
    (1)         -7.365        NaN        'NaN' mismatch
***** testif HAVE_ARPACK
 A = toeplitz ([-2, 1, zeros(1, 8)]);
 A = kron (A, eye (10)) + kron (eye (10), A);
 Afun = @(x) A * x;
 opts.v0 = (1:100)';
 opts.maxit = 3;
 opts.issym = true;
 warning ("off", "Octave:eigs:UnconvergedEigenvalues", "local");
 d = eigs (Afun, 100, 4, "sm", opts);
 assert (d(2:4), [NaN; NaN; NaN]);
!!!!! test failed
ASSERT errors for:  assert (d (2:4),[NaN; NaN; NaN])

  Location  |  Observed  |  Expected  |  Reason
    (1)        -0.13578       NaN        'NaN' mismatch
***** testif HAVE_ARPACK
 A = magic (100);
 opts.v0 = (1:100)';
 opts.maxit = 1;
 warning ("off", "Octave:eigs:UnconvergedEigenvalues", "local");
 d = eigs (A, 4, "lm", opts);
 assert (d(4), NaN);
!!!!! test failed
ASSERT errors for:  assert (d (4),NaN)

  Location  |  Observed  |  Expected  |  Reason
     ()       3.8548e-11      NaN        'NaN' mismatch
***** testif HAVE_ARPACK
 A = magic (100) / 100 + eye (100);
 opts.v0 = (1:100)';
 opts.maxit = 1;
 warning ("off", "Octave:eigs:UnconvergedEigenvalues", "local");
 d = eigs (A, 4, "sm", opts);
 assert (d(3:4), [NaN+1i*NaN; NaN+1i*NaN]);
!!!!! test failed
eigs: error -14 in dneupd
***** testif HAVE_ARPACK
 A = 1i * magic (100) / 100 + eye (100);
 opts.v0 = (1:100)';
 opts.maxit = 1;
 warning ("off", "Octave:eigs:UnconvergedEigenvalues", "local");
 d = eigs (A, 4, "sm", opts);
 assert (d(2:4), [NaN+1i*NaN; NaN+1i*NaN; NaN+1i*NaN]);
!!!!! test failed
eigs: error -14 in zneupd

    _______________________________________________________

Reply to this item at:

  <http://savannah.gnu.org/bugs/?52425>

_______________________________________________
  Message sent via/by Savannah
  http://savannah.gnu.org/