Skip to content

Commit 4957464

Browse files
author
Johnathan Rhyne
committed
(hopefully) Fixed all errors associated with _64 suffixes. CMAKE and make work successfully on my local machine
1 parent 5b1b111 commit 4957464

File tree

5 files changed

+142
-4
lines changed

5 files changed

+142
-4
lines changed

SRC/dorglq.f

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -144,7 +144,8 @@ SUBROUTINE DORGLQ( M, N, K, A, LDA, TAU, WORK, LWORK, INFO )
144144
$ NB, NBMIN, NX
145145
* ..
146146
* .. External Subroutines ..
147-
EXTERNAL DLARFB0C2, DLARFT, DORGL2, DORGLK, XERBLA
147+
EXTERNAL DLARFB0C2, DLARFT, DORGL2,
148+
$ DORGLK, XERBLA
148149
* ..
149150
* .. Intrinsic Functions ..
150151
INTRINSIC MAX, MIN

SRC/dorgql.f

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -142,7 +142,8 @@ SUBROUTINE DORGQL( M, N, K, A, LDA, TAU, WORK, LWORK, INFO )
142142
INTEGER I, IB, IINFO, IWS, KK, LWKOPT, NB, NBMIN
143143
* ..
144144
* .. External Subroutines ..
145-
EXTERNAL DLARFB0C2, DLARFT, DORG2L, DORGKL, XERBLA
145+
EXTERNAL DLARFB0C2, DLARFT, DORG2L,
146+
$ DORGKL, XERBLA
146147
* ..
147148
* .. Intrinsic Functions ..
148149
INTRINSIC MAX, MIN

SRC/dorgqr.f

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -143,7 +143,8 @@ SUBROUTINE DORGQR( M, N, K, A, LDA, TAU, WORK, LWORK, INFO )
143143
$ NB, NBMIN, NX
144144
* ..
145145
* .. External Subroutines ..
146-
EXTERNAL DLARFB0C2, DLARFT, DORG2R, DORGKR, XERBLA
146+
EXTERNAL DLARFB0C2, DLARFT, DORG2R,
147+
$ DORGKR, XERBLA
147148
* ..
148149
* .. Intrinsic Functions ..
149150
INTRINSIC MAX

SRC/dorgrq.f

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -145,7 +145,8 @@ SUBROUTINE DORGRQ( M, N, K, A, LDA, TAU, WORK, LWORK, INFO )
145145
$ LWKOPT, NB, NBMIN, NX
146146
* ..
147147
* .. External Subroutines ..
148-
EXTERNAL DLARFB0C2, DLARFT, DORGR2, DORGRK, XERBLA
148+
EXTERNAL DLARFB0C2, DLARFT, DORGR2,
149+
$ DORGRK, XERBLA
149150
* ..
150151
* .. Intrinsic Functions ..
151152
INTRINSIC MAX, MIN

0 commit comments

Comments
 (0)