From 5de188d96357d81f01795309e71afd764d097f35 Mon Sep 17 00:00:00 2001 From: Anouar Benali Date: Fri, 21 Apr 2017 10:51:53 -0500 Subject: [PATCH] Fix ENDIF --- plugins/Full_CI_ZMQ/fci_zmq.irp.f | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/plugins/Full_CI_ZMQ/fci_zmq.irp.f b/plugins/Full_CI_ZMQ/fci_zmq.irp.f index d91e7a0a..585e40e3 100644 --- a/plugins/Full_CI_ZMQ/fci_zmq.irp.f +++ b/plugins/Full_CI_ZMQ/fci_zmq.irp.f @@ -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