mirror of
https://github.com/pfloos/quack
synced 2024-08-26 14:11:47 +02:00
new files
This commit is contained in:
parent
ca96c59429
commit
cd9bf9aaba
@ -104,7 +104,7 @@ subroutine AOtoMO_oooooo(nBas,nO,cO,O,oooOooo)
|
||||
do l=1,nO
|
||||
do m=1,nO
|
||||
do n=1,nO
|
||||
scr1(i,j,la,l,m,n) = scr1(i,j,la,l,m,n) + cO(si,l)*scr2(i,j,la,si,m,n)
|
||||
scr1(i,j,la,l,m,n) = scr1(i,j,la,l,m,n) + scr2(i,j,la,si,m,n)*cO(si,l)
|
||||
enddo
|
||||
enddo
|
||||
enddo
|
||||
|
Loading…
Reference in New Issue
Block a user