9
1
mirror of https://github.com/QuantumPackage/qp2.git synced 2024-06-02 10:45:18 +02:00

Fix reversed print of minimum PT2 in extrapolations
Some checks failed
continuous-integration/drone/push Build is failing

This commit is contained in:
Anthony Scemama 2023-05-10 12:22:56 +02:00
parent f314c5abc2
commit 20bed4f44a

View File

@ -25,7 +25,7 @@ subroutine print_extrapolated_energy
write(*,*) 'minimum PT2 ', 'Extrapolated energy' write(*,*) 'minimum PT2 ', 'Extrapolated energy'
write(*,*) '=========== ', '===================' write(*,*) '=========== ', '==================='
do k=2,N_iter_p do k=2,N_iter_p
write(*,'(F11.4,2X,F18.8)') pt2_iterations(1,k), extrapolated_energy(k,1) write(*,'(F11.4,2X,F18.8)') pt2_iterations(1,N_iter_p+1-k), extrapolated_energy(k,1)
enddo enddo
write(*,*) '=========== ', '===================' write(*,*) '=========== ', '==================='