10
0
mirror of https://github.com/LCPQ/quantum_package synced 2024-07-03 01:45:59 +02:00

Fix ENDIF

This commit is contained in:
Anouar Benali 2017-04-21 10:51:53 -05:00
parent d4cb0b24a8
commit 5de188d963

View File

@ -68,7 +68,7 @@ program fci_zmq
print *, 'N_states = ', N_states
IF (correlation_energy_ratio_max .NE. 1.d0) THEN
print*, 'correlation_ratio = ', correlation_energy_var
ENDDO
ENDIF
do k=1, N_states
print*,'State ',k