From e5c66f8c7bfb1f8c4162d19b3d01526164cfe2a4 Mon Sep 17 00:00:00 2001
From: Eric Bavier <bavier@member.fsf.org>
Date: Fri, 9 May 2014 08:59:47 -0500
Subject: gnu: fftw: Factor out OpenMPI dependency.

* gnu/packages/algebra.scm (fftw)[inputs,arguments]: Remove OpenMPI.
  (fftw-openmpi): New variable.
---
 gnu/packages/algebra.scm | 17 +++++++++++++++--
 1 file changed, 15 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/algebra.scm b/gnu/packages/algebra.scm
index 7d2d50cc75..9ed978536d 100644
--- a/gnu/packages/algebra.scm
+++ b/gnu/packages/algebra.scm
@@ -207,7 +207,7 @@ (define-public fftw
                "10h9mzjxnwlsjziah4lri85scc05rlajz39nqf3mbh4vja8dw34g"))))
     (build-system gnu-build-system)
     (arguments
-     '(#:configure-flags '("--enable-shared" "--enable-openmp" "--enable-mpi")
+     '(#:configure-flags '("--enable-shared" "--enable-openmp")
        #:phases (alist-cons-before
                  'build 'no-native
                  (lambda _
@@ -219,7 +219,6 @@ (define-public fftw
                      (("-mtune=native") "")))
                  %standard-phases)))
     (native-inputs `(("perl" ,perl)))
-    (inputs `(("openmpi" ,openmpi)))
     (home-page "http://fftw.org")
     (synopsis "Computing the discrete Fourier transform")
     (description
@@ -239,3 +238,17 @@ (define-public fftwf
     (description
      (string-append (package-description fftw)
                     "  Single-precision version."))))
+
+(define-public fftw-openmpi
+  (package (inherit fftw)
+    (name "fftw-openmpi")
+    (inputs
+     `(("openmpi" ,openmpi)
+       ,@(package-inputs fftw)))
+    (arguments
+     (substitute-keyword-arguments (package-arguments fftw)
+       ((#:configure-flags cf)
+        `(cons "--enable-mpi" ,cf))))
+    (description
+     (string-append (package-description fftw)
+                    "  With OpenMPI parallelism support."))))
-- 
cgit v1.2.3