mirror of
https://github.com/LCPQ/quantum_package
synced 2025-01-03 10:05:57 +01:00
Fix ENDIF
This commit is contained in:
parent
d4cb0b24a8
commit
5de188d963
@ -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
|
||||
|
Loading…
Reference in New Issue
Block a user