fix #3966 · JuliaLang/julia@484a9f0 (original) (raw)
Navigation Menu
- GitHub Copilot Write better code with AI
- GitHub Models New Manage and compare prompts
- GitHub Advanced Security Find and fix vulnerabilities
- Actions Automate any workflow
- Codespaces Instant dev environments
- Issues Plan and track work
- Code Review Manage code changes
- Discussions Collaborate outside of code
- Code Search Find more, search less
- Explore
- Pricing
Provide feedback
Saved searches
Use saved searches to filter your results more quickly
Appearance settings
Commit 484a9f0
the size of the RWORK array in zgesdd was wrong.
File tree
1 file changed
lines changed
1 file changed
lines changed
Lines changed: 2 additions & 1 deletion
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -858,7 +858,8 @@ for (geev, gesvd, gesdd, ggsvd, elty, relty) in | ||
| 858 | 858 | S = Array($relty, minmn) |
| 859 | 859 | cmplx = iseltype(A,Complex) |
| 860 | 860 | if cmplx |
| 861 | - rwork = Array($relty, job == 'N' ? 7*minmn : 5*minmn*minmn + 5*minmn) | |
| 861 | + rwork = Array($relty, job == 'N' ? 5*minmn : | |
| 862 | + minmn*max(5*minmn+7, 2*max(m,n)+2*minmn+1)) | |
| 862 | 863 | end |
| 863 | 864 | iwork = Array(BlasInt, 8*minmn) |
| 864 | 865 | info = Array(BlasInt, 1) |