Fix actual arguments (Reference-LAPACK PR 885) · 267a3a4c85 - OpenBLAS - 开源协同云脑生态支撑系统

Fix actual arguments (Reference-LAPACK PR 885)

pull/4155/head

Martin Kroeker

GitHub 2 years ago

parent

65773be536

commit

267a3a4c85

No known key found for this signature in database GPG Key ID: 4AEE18F83AFDEB23

1 changed files with 2 additions and 1 deletions

Split View

							
								+ 2
								
								- 1
							
lapack-netlib/SRC/sgelqt3.fView File
								
			@@ -158,7 +158,8 @@
		
			*
		
			*        Compute Householder transform when M=1
		
			*
		
			         CALL SLARFG( N, A, A( 1, MIN( 2, N ) ), LDA, T )
		
			         CALL SLARFG( N, A( 1, 1 ), A( 1, MIN( 2, N ) ), LDA,
		
			     &                T( 1, 1 ) )
		
			*
		
			      ELSE
		
			*