TREX/qmckl
1
0
Fork 0
mirror of https://github.com/TREX-CoE/qmckl.git synced 2024-11-19 20:42:50 +01:00
Code Issues Projects Releases Wiki Activity

Fixed indices caused by typo.

Browse Source
This commit is contained in:
v1j4y 2022-08-09 17:09:09 +02:00
parent e822694a56
commit 9a5178b011
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
org/qmckl_blas.org
View File

@ -979,7 +979,7 @@ integer function qmckl_dgemm_f(context, TransA, TransB, &
do j=1,n
do i=1,m
C(i,j) = alpha*C1(j,i) + beta*C(j,i)
C(i,j) = alpha*C1(j,i) + beta*C(i,j)
end do
end do