From 80ed6d2fac6bdb3912a444a5e15c4db8a067abd9 Mon Sep 17 00:00:00 2001
From: dalcorso <dalcorso@c92efa57-630b-4861-b058-cf58834340f0>
Date: Thu, 26 Nov 2009 10:28:10 +0000
Subject: [PATCH] elph and image parallelization not implemented yet.
 Introduced a check in this case.

git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@6225 c92efa57-630b-4861-b058-cf58834340f0
---
 PH/phq_readin.f90 | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/PH/phq_readin.f90 b/PH/phq_readin.f90
index 5049805c0..9da3b05d0 100644
--- a/PH/phq_readin.f90
+++ b/PH/phq_readin.f90
@@ -355,6 +355,9 @@ SUBROUTINE phq_readin()
      CALL errore('phq_readin',&
      'pw.x run with a different number of pools. Use wf_collect=.true.',1)
 
+  IF (elph.and.nimage>1) CALL errore('phq_readin',&
+     'elph with image parallelization is not yet available',1)
+
 !  IF (two_fermi_energies.or.i_cons /= 0) &
 !     CALL errore('phq_readin',&
 !     'The phonon code with constrained magnetization is not yet available',1)