From dd04f145d29548d999fc385e114b72f8155b90de Mon Sep 17 00:00:00 2001
From: Hyungjun Lee <hjunlee@gmail.com>
Date: Wed, 25 Nov 2020 18:49:14 +0000
Subject: [PATCH] Update bloch2wan.f90

---
 EPW/src/bloch2wan.f90 | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/EPW/src/bloch2wan.f90 b/EPW/src/bloch2wan.f90
index 88622ebdf..88200c7c2 100644
--- a/EPW/src/bloch2wan.f90
+++ b/EPW/src/bloch2wan.f90
@@ -737,7 +737,7 @@
 !        IF (ierr /= 0) CALL errore('vmebloch2wan', 'Error allocating wb', 1)
 !        bvec = zero
 !        wb   = zero
-        CALL errore ('vmebloch2wan','You selected vme =.true. but error opening' // tempfile, 0)
+        CALL errore ('vmebloch2wan','You selected vme =.true. but error opening' // tempfile, 1)
       ELSE
         READ(iubvec,*) tempfile
         READ(iubvec,*) nkstot_tmp, nnb
@@ -785,7 +785,7 @@
       !
       IF (ios /= 0) THEN
         ! if it doesn't exist, then we just set the mmn to zero
-        CALL errore ('vmebloch2wan','error opening' // tempfile, 0)
+        CALL errore ('vmebloch2wan','error opening' // tempfile, 1)
       ELSE
         !
         DO ik = 1, nkstot