From 5e4c9c89e9b9695b7d7e0055d331bb556d6a4915 Mon Sep 17 00:00:00 2001 From: spigafi Date: Sun, 28 Apr 2013 13:42:44 +0000 Subject: [PATCH] __MPI no needed, mp_startup should be internally safe. git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@10197 c92efa57-630b-4861-b058-cf58834340f0 --- PHonon/PH/phonon.f90 | 2 -- 1 file changed, 2 deletions(-) diff --git a/PHonon/PH/phonon.f90 b/PHonon/PH/phonon.f90 index 88ee0fc94..e03477125 100644 --- a/PHonon/PH/phonon.f90 +++ b/PHonon/PH/phonon.f90 @@ -69,9 +69,7 @@ PROGRAM phonon ! ! Initialize MPI, clocks, print initial messages ! -#ifdef __MPI CALL mp_startup ( start_images=.true. ) -#endif CALL environment_start ( code ) ! ! ... and begin with the initialization part