diff --git a/src/64to32blas/jgetrf.F b/src/64to32blas/jgetrf.F
index d17c9a4d1e..b6a69c9f87 100644
--- a/src/64to32blas/jgetrf.F
+++ b/src/64to32blas/jgetrf.F
@@ -6,7 +6,7 @@
 #include "y64.fh"
       integer ipiv(*)
       integer            info, lda, m, n
-      double precision   a( lda, * )
+      complex*16   a( lda, * )
 c
       INTGR4 m4,n4,info4,lda4
 c
diff --git a/src/64to32blas/jgetrs.F b/src/64to32blas/jgetrs.F
index 873ca09817..106e647a0e 100644
--- a/src/64to32blas/jgetrs.F
+++ b/src/64to32blas/jgetrs.F
@@ -8,7 +8,7 @@
       character          trans
       integer ipiv(*)
       integer            info, lda, ldb, n, nrhs
-      double precision   a( lda, * ), b( ldb, * )
+      complex*16 a( lda, * ), b( ldb, * )
 c
       INTGR4 n4,info4,lda4,ldb4,nrhs4
 c