floraachy
/
OpenBLAS
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fix implicit typing of new variable TWO

This commit is contained in:
Martin Kroeker 2021-04-09 10:03:31 +02:00 committed by GitHub
parent 0492f0f3f9
commit 558724e99f
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lapack-netlib/SRC/slanv2.f
View File

@ -139,7 +139,7 @@
* ===================================================================== * =====================================================================
* *
* .. Parameters .. * .. Parameters ..
REAL ZERO, HALF, ONE REAL ZERO, HALF, ONE, TWO
PARAMETER ( ZERO = 0.0E+0, HALF = 0.5E+0, ONE = 1.0E+0, PARAMETER ( ZERO = 0.0E+0, HALF = 0.5E+0, ONE = 1.0E+0,
$ TWO = 2.0E+0 ) $ TWO = 2.0E+0 )
REAL MULTPL REAL MULTPL