From f7d715ba6cd5f0afcd87252fe0164ed092c10791 Mon Sep 17 00:00:00 2001 From: Anthony Scemama Date: Wed, 6 Dec 2017 19:22:52 +0100 Subject: [PATCH] CIS doesn't read wf --- plugins/CIS/cis.irp.f | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/plugins/CIS/cis.irp.f b/plugins/CIS/cis.irp.f index c14deaa2..a9341a10 100644 --- a/plugins/CIS/cis.irp.f +++ b/plugins/CIS/cis.irp.f @@ -1,4 +1,11 @@ program cis + implicit none + read_wf = .False. + SOFT_TOUCH read_wf + call run +end + +subroutine run implicit none integer :: i