LAPACK Archives

[Lapack] scsdts doesn't properly handle M == 0

TESTING/EIG/scsdts.f
      EPS2 = MAX( ULP,
     $            SLANGE( '1', M, M, WORK, LDX, RWORK ) / REAL( M ) )

M == 0 of course causes division by zero.

/?ke Sandgren


<Prev in Thread] Current Thread [Next in Thread>


For additional information you may use the LAPACK/ScaLAPACK Forum.
Or one of the mailing lists, or