truncate initializer
This commit is contained in:
parent
9e917511b8
commit
1611043b7c
|
@ -95,7 +95,7 @@
|
||||||
COMMON /INFOC/INFOT, NOUTC, OK, LERR
|
COMMON /INFOC/INFOT, NOUTC, OK, LERR
|
||||||
COMMON /SRNAMC/SRNAMT
|
COMMON /SRNAMC/SRNAMT
|
||||||
* .. Data statements ..
|
* .. Data statements ..
|
||||||
DATA SNAMES/'cblas_zgemm3m ', 'cblas_zhemm ',
|
DATA SNAMES/'cblas_zgemm3m', 'cblas_zhemm ',
|
||||||
$ 'cblas_zsymm ', 'cblas_ztrmm ', 'cblas_ztrsm ',
|
$ 'cblas_zsymm ', 'cblas_ztrmm ', 'cblas_ztrsm ',
|
||||||
$ 'cblas_zherk ', 'cblas_zsyrk ', 'cblas_zher2k',
|
$ 'cblas_zherk ', 'cblas_zsyrk ', 'cblas_zher2k',
|
||||||
$ 'cblas_zsyr2k'/
|
$ 'cblas_zsyr2k'/
|
||||||
|
|
Loading…
Reference in New Issue