diff options
Diffstat (limited to 'var/spack/repos/builtin/packages/nwchem/zgesdv.patch')
-rwxr-xr-x | var/spack/repos/builtin/packages/nwchem/zgesdv.patch | 55 |
1 files changed, 0 insertions, 55 deletions
diff --git a/var/spack/repos/builtin/packages/nwchem/zgesdv.patch b/var/spack/repos/builtin/packages/nwchem/zgesdv.patch deleted file mode 100755 index 4e3b76c197..0000000000 --- a/var/spack/repos/builtin/packages/nwchem/zgesdv.patch +++ /dev/null @@ -1,55 +0,0 @@ -Index: src/64to32blas/xgesvd.F -=================================================================== ---- src/64to32blas/xgesvd.F (revision 0) -+++ src/64to32blas/xgesvd.F (revision 28050) -@@ -0,0 +1,25 @@ -+ SUBROUTINE XGESVD( JOBU, JOBVT, M, N, A, LDA, S, U, LDU, -+ $ VT, LDVT, WORK, LWORK, RWORK, INFO ) -+* $Id: ygesvd.F 19697 2010-10-29 16:57:34Z d3y133 $ -+ implicit none -+#include "y64.fh" -+ CHARACTER JOBU, JOBVT -+ INTEGER INFO, LDA, LDU, LDVT, LWORK, M, N -+ DOUBLE PRECISION A( LDA, * ), S( * ), U( LDU, * ), -+ $ VT( LDVT, * ), WORK( * ), RWORK(*) -+c -+ INTGR4 INFO4, LDA4, LDU4, LDVT4, LWORK4, M4, N4 -+c -+ lda4=lda -+ ldu4=ldu -+ ldvt4=ldvt -+ m4=m -+ n4=n -+ lwork4=lwork -+c -+ call ZGESVD( JOBU, JOBVT, M4, N4, A, LDA4, S, U, LDU4, -+ $ VT, LDVT4, WORK, LWORK4, RWORK, INFO4 ) -+ info=info4 -+ -+ RETURN -+ END -Index: src/64to32blas/GNUmakefile -=================================================================== ---- src/64to32blas/GNUmakefile (revision 28049) -+++ src/64to32blas/GNUmakefile (revision 28050) -@@ -10,7 +10,7 @@ - ypotri.o ypotrf.o ysygv.o ygeev.o ygeevx.o \ - ifily.o\ - xscal.o xaxpy.o xgemm.o xheev.o xcopy.o xdotc.o \ -- ixamax.o -+ ixamax.o xgesvd.o - - ifeq ($(BLAS_SIZE),8) - LIB_DEFINES += -DUSE_INTEGER8 -Index: src/config/data.64_to_32 -=================================================================== ---- src/config/data.64_to_32 (revision 28049) -+++ src/config/data.64_to_32 (revision 28050) -@@ -50,6 +50,7 @@ - zdotc xdotc - zdscal xsscal - zgemm xgemm -+zgesvd xgesvd - zgemv xgemv - zgerc xgerc - zhemm xhemm |