CIS doesn't read wf

2017-12-06 19:22:52 +01:00 · 2017-12-06 19:22:52 +01:00 · f7d715ba6c
parent 146e75b89a
commit f7d715ba6c
1 changed files with 7 additions and 0 deletions
--- 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