From 4dbe5dcd5dbd47b0851c800e4cae2817eff32573 Mon Sep 17 00:00:00 2001
From: Anthony Scemama <scemama@irsamc.ups-tlse.fr>
Date: Mon, 13 Jul 2015 18:26:34 +0200
Subject: [PATCH] read_wf has to be true for mrcc

---
 plugins/MRCC_CASSD/mrcc_cassd.irp.f | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/plugins/MRCC_CASSD/mrcc_cassd.irp.f b/plugins/MRCC_CASSD/mrcc_cassd.irp.f
index 02035d68..e784a167 100644
--- a/plugins/MRCC_CASSD/mrcc_cassd.irp.f
+++ b/plugins/MRCC_CASSD/mrcc_cassd.irp.f
@@ -1,5 +1,9 @@
 program mrcc
   implicit none
+  if (.not.read_wf) then
+    print *,  'read_wf has to be true.'
+    stop 1
+  endif
   call print_cas_coefs
   call run_mrcc
 end