gnu: r-rmarkdown: Ensure temporary files can be deleted.
[jackhill/guix/guix.git] / gnu / packages / algebra.scm
CommitLineData
233e7676 1;;; GNU Guix --- Functional package management for GNU
4879d2ff 2;;; Copyright © 2012, 2013, 2014, 2015, 2016 Andreas Enge <andreas@enge.fr>
8f4b1dfb 3;;; Copyright © 2013, 2015 Ludovic Courtès <ludo@gnu.org>
57497c57 4;;; Copyright © 2016 Nicolas Goaziou <mail@nicolasgoaziou.fr>
e2ca23c5 5;;; Copyright © 2014 Mark H Weaver <mhw@netris.org>
3b13c3c0 6;;; Copyright © 2016 Ricardo Wurmus <rekado@elephly.net>
2ed139c4 7;;;
233e7676 8;;; This file is part of GNU Guix.
2ed139c4 9;;;
233e7676 10;;; GNU Guix is free software; you can redistribute it and/or modify it
2ed139c4
AE
11;;; under the terms of the GNU General Public License as published by
12;;; the Free Software Foundation; either version 3 of the License, or (at
13;;; your option) any later version.
14;;;
233e7676 15;;; GNU Guix is distributed in the hope that it will be useful, but
2ed139c4
AE
16;;; WITHOUT ANY WARRANTY; without even the implied warranty of
17;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18;;; GNU General Public License for more details.
19;;;
20;;; You should have received a copy of the GNU General Public License
233e7676 21;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
2ed139c4 22
1ffa7090 23(define-module (gnu packages algebra)
59a43334 24 #:use-module (gnu packages)
14e6520e 25 #:use-module (gnu packages autotools)
10b1f688 26 #:use-module (gnu packages compression)
99828fa7 27 #:use-module (gnu packages documentation)
57497c57
NG
28 #:use-module (gnu packages fltk)
29 #:use-module (gnu packages gl)
aae03c48 30 #:use-module (gnu packages graphviz)
57497c57 31 #:use-module (gnu packages image)
1ffa7090 32 #:use-module (gnu packages multiprecision)
aae03c48 33 #:use-module (gnu packages maths)
0fc54d4b 34 #:use-module (gnu packages mpi)
1ffa7090
LC
35 #:use-module (gnu packages perl)
36 #:use-module (gnu packages readline)
37 #:use-module (gnu packages flex)
aae03c48 38 #:use-module (gnu packages python)
b7194849 39 #:use-module (gnu packages shells)
8f9ac901 40 #:use-module (gnu packages tex)
57497c57 41 #:use-module (gnu packages xiph)
fb8d1be8 42 #:use-module (gnu packages xorg)
9f51293c 43 #:use-module ((guix licenses) #:prefix license:)
2ed139c4
AE
44 #:use-module (guix packages)
45 #:use-module (guix download)
7569c5cb 46 #:use-module (guix build-system gnu)
8f4b1dfb 47 #:use-module (guix build-system cmake)
7569c5cb 48 #:use-module (guix utils))
2ed139c4
AE
49
50
51(define-public mpfrcx
52 (package
53 (name "mpfrcx")
9c68798d 54 (version "0.4.2")
2ed139c4
AE
55 (source (origin
56 (method url-fetch)
57 (uri (string-append
58 "http://www.multiprecision.org/mpfrcx/download/mpfrcx-"
59 version ".tar.gz"))
60 (sha256
61 (base32
9c68798d 62 "0grw66b255r574lvll1bqccm5myj2m8ajzsjaygcyq9zjnnbnhhy"))))
2ed139c4 63 (build-system gnu-build-system)
878c8f3f
AE
64 (propagated-inputs
65 `(("gmp" ,gmp)
66 ("mpfr" ,mpfr)
67 ("mpc" ,mpc))) ; Header files are included by mpfrcx.h.
35b9e423 68 (synopsis "Arithmetic of polynomials over arbitrary precision numbers")
2ed139c4 69 (description
35b9e423 70 "Mpfrcx is a library for the arithmetic of univariate polynomials over
2ed139c4 71arbitrary precision real (mpfr) or complex (mpc) numbers, without control
35b9e423 72on the rounding. For the time being, only the few functions needed to
2ed139c4 73implement the floating point approach to complex multiplication are
35b9e423 74implemented. On the other hand, these comprise asymptotically fast
e881752c 75multiplication routines such as Toom–Cook and the FFT.")
9f51293c 76 (license license:lgpl2.1+)
2ed139c4
AE
77 (home-page "http://mpfrcx.multiprecision.org/")))
78
10b1f688
AE
79(define-public cm
80 (package
81 (name "cm")
81b55bf7 82 (version "0.3")
10b1f688
AE
83 (source (origin
84 (method url-fetch)
85 (uri (string-append
86 "http://www.multiprecision.org/cm/download/cm-"
87 version ".tar.gz"))
88 (sha256
89 (base32
81b55bf7 90 "1nf5kr0nqmhbzrsrinky18z0ighjpsmb5cr8zyg8jf04bfbyrfmc"))))
10b1f688
AE
91 (build-system gnu-build-system)
92 (propagated-inputs
93 `(("mpfrcx" ,mpfrcx)
94 ("zlib" ,zlib))) ; Header files included from cm_common.h.
95 (inputs
96 `(("pari-gp" ,pari-gp)))
97 (synopsis "CM constructions for elliptic curves")
98 (description
99 "The CM software implements the construction of ring class fields of
100imaginary quadratic number fields and of elliptic curves with complex
101multiplication via floating point approximations. It consists of libraries
102that can be called from within a C program and of executable command
103line applications.")
81b55bf7 104 (license license:gpl3+)
10b1f688
AE
105 (home-page "http://cm.multiprecision.org/")))
106
2ed139c4
AE
107(define-public fplll
108 (package
109 (name "fplll")
5a15ed50 110 (version "4.0.4")
2ed139c4
AE
111 (source (origin
112 (method url-fetch)
113 (uri (string-append
114 "http://perso.ens-lyon.fr/damien.stehle/fplll/libfplll-"
115 version ".tar.gz"))
116 (sha256 (base32
5a15ed50 117 "1cbiby7ykis4z84swclpysrljmqhfcllpkcbll1m08rzskgb1a6b"))))
2ed139c4
AE
118 (build-system gnu-build-system)
119 (inputs `(("gmp" ,gmp)
120 ("mpfr" ,mpfr)))
35b9e423 121 (synopsis "Library for LLL-reduction of euclidean lattices")
2ed139c4 122 (description
35b9e423 123 "fplll LLL-reduces euclidean lattices. Since version 3, it can also
2ed139c4 124solve the shortest vector problem.")
9f51293c 125 (license license:lgpl2.1+)
2ed139c4 126 (home-page "http://perso.ens-lyon.fr/damien.stehle/fplll/")))
4e6b699d 127
90a6d47c
AE
128(define-public pari-gp
129 (package
130 (name "pari-gp")
c19a61bb 131 (version "2.7.6")
90a6d47c
AE
132 (source (origin
133 (method url-fetch)
134 (uri (string-append
135 "http://pari.math.u-bordeaux.fr/pub/pari/unix/pari-"
136 version ".tar.gz"))
f78c66aa
AE
137 (sha256
138 (base32
c19a61bb 139 "04dqi697czd8mmw8aiwzrkgbvkjassqagg6lfy3lkf1k5qi9g9rr"))))
90a6d47c 140 (build-system gnu-build-system)
9bd9486d 141 (native-inputs `(("texlive" ,texlive-minimal)))
90a6d47c 142 (inputs `(("gmp" ,gmp)
fb8d1be8 143 ("libx11" ,libx11)
90a6d47c
AE
144 ("perl" ,perl)
145 ("readline" ,readline)))
146 (arguments
9bd9486d 147 '(#:make-flags '("all")
12abb19d 148 #:test-target "dobench"
08595262
AE
149 #:phases (modify-phases %standard-phases
150 (replace 'configure
151 (lambda* (#:key outputs #:allow-other-keys)
152 (let ((out (assoc-ref outputs "out")))
153 (zero?
154 (system* "./Configure"
155 (string-append "--prefix=" out)))))))))
90a6d47c
AE
156 (synopsis "PARI/GP, a computer algebra system for number theory")
157 (description
158 "PARI/GP is a widely used computer algebra system designed for fast
159computations in number theory (factorisations, algebraic number theory,
160elliptic curves...), but it also contains a large number of other useful
161functions to compute with mathematical entities such as matrices,
162polynomials, power series, algebraic numbers, etc., and a lot of
163transcendental functions.
164PARI is also available as a C library to allow for faster computations.")
9f51293c 165 (license license:gpl2+)
90a6d47c 166 (home-page "http://pari.math.u-bordeaux.fr/")))
ed9f9a77 167
f854a8c1
AE
168(define-public gp2c
169 (package
170 (name "gp2c")
4879d2ff 171 (version "0.0.9pl5")
f854a8c1
AE
172 (source (origin
173 (method url-fetch)
174 (uri (string-append
175 "http://pari.math.u-bordeaux.fr/pub/pari/GP2C/gp2c-"
176 version ".tar.gz"))
324bdcd8
AE
177 (sha256
178 (base32
4879d2ff 179 "1q003mkagc5ib6lqb2xfay7j4ffkwv7xlnznp6wdrq2sbqq4vyak"))))
f854a8c1 180 (build-system gnu-build-system)
c67ccedd 181 (native-inputs `(("perl" ,perl)))
f854a8c1
AE
182 (inputs `(("pari-gp" ,pari-gp)))
183 (arguments
184 '(#:configure-flags
185 (list (string-append "--with-paricfg="
186 (assoc-ref %build-inputs "pari-gp")
187 "/lib/pari/pari.cfg"))))
188 (synopsis "PARI/GP, a computer algebra system for number theory")
189 (description
190 "PARI/GP is a widely used computer algebra system designed for fast
191computations in number theory (factorisations, algebraic number theory,
192elliptic curves...), but it also contains a large number of other useful
193functions to compute with mathematical entities such as matrices,
194polynomials, power series, algebraic numbers, etc., and a lot of
195transcendental functions.
196PARI is also available as a C library to allow for faster computations.
197
198GP2C, the GP to C compiler, translates GP scripts to PARI programs.")
9f51293c 199 (license license:gpl2)
f854a8c1
AE
200 (home-page "http://pari.math.u-bordeaux.fr/")))
201
57497c57
NG
202(define-public giac-xcas
203 (package
204 (name "giac-xcas")
a2d469af 205 (version "1.2.2-75")
57497c57
NG
206 (source (origin
207 (method url-fetch)
208 ;; "~parisse/giac" is not used because the maintainer regularly
209 ;; overwrites the release tarball there, introducing a checksum
210 ;; mismatch every time. See
211 ;; <https://www-fourier.ujf-grenoble.fr/~parisse/debian/dists/stable/main/source/README>
212 (uri (string-append "https://www-fourier.ujf-grenoble.fr/"
213 "~parisse/debian/dists/stable/main/"
214 "source/giac_" version ".tar.gz"))
215 (sha256
216 (base32
a2d469af 217 "0vs111fkd900wkm7yypaxmplc8i8j63d9shc3fbdhddn7cdj70b1"))))
57497c57
NG
218 (build-system gnu-build-system)
219 (arguments
220 `(#:phases
221 (modify-phases %standard-phases
222 (add-after 'unpack 'patch-bin-cp
223 (lambda _
224 ;; Some Makefiles contain hard-coded "/bin/cp".
225 (substitute* (find-files "doc" "^Makefile")
226 (("/bin/cp") (which "cp")))
227 #t))
228 (add-after 'unpack 'disable-broken-test
229 (lambda _
230 ;; Disable failing test. Actually, the results are correct but
231 ;; a sorting discrepancy prevents the test from being validated.
232 (substitute* "check/Makefile.in"
233 (("chk_fhan16") ""))
234 #t)))))
235 (inputs
236 `(("fltk" ,fltk)
237 ("gmp" ,gmp)
238 ("gsl" ,gsl)
239 ("lapack" ,lapack)
240 ("libao" ,ao)
241 ("libjpeg" ,libjpeg)
242 ("libpng" ,libpng)
243 ("libx11" ,libx11)
99a00446 244 ("libxinerama" ,libxinerama)
57497c57
NG
245 ("libxft" ,libxft)
246 ("libxt" ,libxt)
247 ("mesa" ,mesa)
248 ("mpfi" ,mpfi)
249 ("mpfr" ,mpfr)
250 ("ntl" ,ntl)
251 ("perl" ,perl)
252 ("pari-gp" ,pari-gp)
253 ("tcsh" ,tcsh)
254 ("texlive" ,texlive-minimal)))
255 (native-inputs `(("readline" ,readline)))
256 (home-page "https://www-fourier.ujf-grenoble.fr/~parisse/giac.html")
257 (synopsis "Computer algebra system")
258 (description
259 "Giac/Xcas is a computer algebra system. It has a compatibility mode for
260maple, mupad and the TI89. It is available as a standalone program (graphic
261or text interfaces) or as a C++ library.")
262 (license license:gpl3+)))
263
d7ab698a
AE
264(define-public flint
265 (package
266 (name "flint")
6c591c8e 267 (version "2.5.2")
d7ab698a
AE
268 (source (origin
269 (method url-fetch)
270 (uri (string-append
271 "http://flintlib.org/flint-"
272 version ".tar.gz"))
273 (sha256 (base32
6c591c8e 274 "11syazv1a8rrnac3wj3hnyhhflpqcmq02q8pqk2m6g2k6h0gxwfb"))
fc1adab1 275 (patches (search-patches "flint-ldconfig.patch"))))
d7ab698a 276 (build-system gnu-build-system)
df15d17d 277 (propagated-inputs
d7ab698a 278 `(("gmp" ,gmp)
df15d17d 279 ("mpfr" ,mpfr))) ; header files from both are included by flint/arith.h
d7ab698a 280 (arguments
ad11974e
AE
281 `(#:parallel-tests? #f ; seems to be necessary on arm
282 #:phases
91430de6
AE
283 (modify-phases %standard-phases
284 (replace 'configure
285 (lambda* (#:key inputs outputs #:allow-other-keys)
286 (let ((out (assoc-ref outputs "out"))
287 (gmp (assoc-ref inputs "gmp"))
288 (mpfr (assoc-ref inputs "mpfr")))
91430de6
AE
289 ;; do not pass "--enable-fast-install", which makes the
290 ;; homebrew configure process fail
291 (zero? (system*
292 "./configure"
293 (string-append "--prefix=" out)
294 (string-append "--with-gmp=" gmp)
295 (string-append "--with-mpfr=" mpfr)))))))))
d7ab698a
AE
296 (synopsis "Fast library for number theory")
297 (description
298 "FLINT is a C library for number theory. It supports arithmetic
299with numbers, polynomials, power series and matrices over many base
300rings, including multiprecision integers and rationals, integers
301modulo n, p-adic numbers, finite fields (prime and non-prime order)
302and real and complex numbers (via the Arb extension library).
303
304Operations that can be performed include conversions, arithmetic,
305GCDs, factoring, solving linear systems, and evaluating special
306functions. In addition, FLINT provides various low-level routines for
307fast arithmetic.")
9f51293c 308 (license license:gpl2+)
d7ab698a
AE
309 (home-page "http://flintlib.org/")))
310
6b8e8285
AE
311(define-public arb
312 (package
313 (name "arb")
ffc8f345 314 (version "2.8.1")
6b8e8285
AE
315 (source (origin
316 (method url-fetch)
317 (uri (string-append
318 "https://github.com/fredrik-johansson/arb/archive/"
319 version ".tar.gz"))
f586c877 320 (file-name (string-append name "-" version ".tar.gz"))
424ce93d
AE
321 (sha256
322 (base32
ffc8f345 323 "04hhcpshfkcq9fr4hixbhpps50yf9drk62xgkvlcaj5kb4nyrx7l"))
fc1adab1 324 (patches (search-patches "arb-ldconfig.patch"))))
6b8e8285 325 (build-system gnu-build-system)
480d19e6
AE
326 (propagated-inputs
327 `(("flint" ,flint))) ; flint.h is included by arf.h
6b8e8285 328 (inputs
480d19e6 329 `(("gmp" ,gmp)
6b8e8285
AE
330 ("mpfr" ,mpfr)))
331 (arguments
332 `(#:phases
333 (alist-replace
334 'configure
335 (lambda* (#:key inputs outputs #:allow-other-keys)
336 (let ((out (assoc-ref outputs "out"))
337 (flint (assoc-ref inputs "flint"))
338 (gmp (assoc-ref inputs "gmp"))
339 (mpfr (assoc-ref inputs "mpfr")))
340 ;; do not pass "--enable-fast-install", which makes the
341 ;; homebrew configure process fail
342 (zero? (system*
343 "./configure"
344 (string-append "--prefix=" out)
345 (string-append "--with-flint=" flint)
346 (string-append "--with-gmp=" gmp)
347 (string-append "--with-mpfr=" mpfr)))))
348 %standard-phases)))
349 (synopsis "Arbitrary precision floating-point ball arithmetic")
350 (description
351 "Arb is a C library for arbitrary-precision floating-point ball
352arithmetic. It supports efficient high-precision computation with
353polynomials, power series, matrices and special functions over the
354real and complex numbers, with automatic, rigorous error control.")
9f51293c 355 (license license:gpl2+)
6b8e8285
AE
356 (home-page "http://fredrikj.net/arb/")))
357
14e6520e
AE
358(define-public ntl
359 (package
360 (name "ntl")
361 (version "9.7.0")
362 (source (origin
363 (method url-fetch)
364 (uri (string-append "http://shoup.net/ntl/ntl-"
365 version ".tar.gz"))
366 (sha256 (base32
367 "115frp5flyvw9wghz4zph1b3llmr5nbxk1skgsggckr81fh3gmxq"))))
368 (build-system gnu-build-system)
369 (native-inputs
370 `(("libtool" ,libtool)
371 ("perl" ,perl))) ; for configuration
372 ;; FIXME: Add optional input gf2x once available; then also add
373 ;; configure flag "NTL_GF2X_LIB=on".
374 (inputs
375 `(("gmp" ,gmp)))
376 (arguments
377 `(#:phases
378 (modify-phases %standard-phases
379 (replace 'configure
380 (lambda* (#:key outputs #:allow-other-keys)
381 (chdir "src")
382 (system* "./configure"
383 (string-append "PREFIX=" (assoc-ref outputs "out"))
384 ;; Do not build especially for the build machine.
385 "NATIVE=off"
386 ;; Also do not tune to the build machine.
387 "WIZARD=off"
388 "SHARED=on")
389 #t)))))
390 (synopsis "C++ library for number theory")
391 (description
392 "NTL is a C++ library providing data structures and algorithms
393for manipulating signed, arbitrary length integers, and for vectors,
394matrices, and polynomials over the integers and over finite fields.")
395 (license license:gpl2+)
396 (home-page "http://shoup.net/ntl/")))
397
aae03c48
AE
398(define-public singular
399 (package
400 (name "singular")
401 (version "4.0.3")
402 (source (origin
403 (method url-fetch)
404 (uri (string-append "http://www.mathematik.uni-kl.de/ftp/pub/"
405 "Math/Singular/SOURCES/"
406 (string-join (string-split version #\.) "-")
407 "/singular-" version ".tar.gz"))
408 (sha256 (base32
7d4c6ee8 409 "0viidy2fz62rln9p0s9qfs7fnm55c6fw1agydd1py26gxylp1ksc"))))
aae03c48
AE
410 (build-system gnu-build-system)
411 (native-inputs
412 `(("doxygen" ,doxygen)
413 ("graphviz" ,graphviz)
414 ("perl" ,perl)))
415 (inputs
416 `(("cddlib" ,cddlib)
417 ("gmp" ,gmp)
418 ("flint" ,flint)
419 ("mpfr" ,mpfr)
420 ("ntl" ,ntl)
421 ("python" ,python-2)
422 ("readline" ,readline)))
423 (arguments
424 `(#:configure-flags
425 (list (string-append "--with-ntl="
426 (assoc-ref %build-inputs "ntl")))))
427 (synopsis "Computer algebra system for polynomial computations")
428 (description
429 "Singular is a computer algebra system for polynomial computations,
430with special emphasis on commutative and non-commutative algebra, algebraic
431geometry and singularity theory.")
432 ;; Singular itself is dual licensed gpl2 or gpl3, but some of the
433 ;; libraries with which it links are licensed under lgpl3+, so the
434 ;; combined work becomes gpl3. See COPYING in the source code.
435 (license license:gpl3)
436 (home-page "http://www.singular.uni-kl.de/index.php")))
437
57c9c349
AE
438(define-public gmp-ecm
439 (package
440 (name "gmp-ecm")
441 (version "7.0")
442 (source (origin
443 (method url-fetch)
444 (uri (string-append "https://gforge.inria.fr/frs/download.php/"
445 "file/35642/ecm-"
446 version ".tar.gz"))
447 (sha256 (base32
448 "00jzzwqp49m01vwsr9z1w7bvm8lb69l3f62x7qr8sfz0xiczxnpm"))))
449 (build-system gnu-build-system)
450 (inputs
451 `(("gmp" ,gmp)))
452 (arguments
453 `(#:configure-flags '("--enable-shared"
454 ;; Disable specific assembly routines, which depend
455 ;; on the subarchitecture of the build machine,
456 ;; and use gmp instead.
457 "--disable-asm-redc")))
458 (synopsis "Integer factorization library using the elliptic curve method")
459 (description
460 "GMP-ECM factors integers using the elliptic curve method (ECM) as well
461as the P-1 and P+1 algorithms. It provides a library and a stand-alone
462binary.")
463 ;; Most files are under lgpl3+, but some are under gpl3+ or gpl2+,
464 ;; so the combined work is under gpl3+.
465 (license license:gpl3+)
466 (home-page "http://ecm.gforge.inria.fr/")))
467
ed9f9a77
LC
468(define-public bc
469 (package
470 (name "bc")
471 (version "1.06")
472 (source (origin
473 (method url-fetch)
474 (uri (string-append "mirror://gnu/bc/bc-" version ".tar.gz"))
475 (sha256
476 (base32
477 "0cqf5jkwx6awgd2xc2a0mkpxilzcfmhncdcfg7c9439wgkqxkxjf"))))
478 (build-system gnu-build-system)
c4c4cc05
JD
479 (inputs `(("readline" ,readline)))
480 (native-inputs `(("flex" ,flex)))
ed9f9a77
LC
481 (arguments
482 '(#:phases
483 (alist-replace 'configure
484 (lambda* (#:key outputs #:allow-other-keys)
485 ;; This old `configure' script doesn't support
486 ;; variables passed as arguments.
487 (let ((out (assoc-ref outputs "out")))
488 (setenv "CONFIG_SHELL" (which "bash"))
489 (zero?
e2ca23c5
MW
490 (system*
491 "./configure"
492 (string-append "--prefix=" out)
493 ;; By default, man and info pages are put in
494 ;; PREFIX/{man,info}, but we want them in
495 ;; PREFIX/share/{man,info}.
496 (string-append "--mandir=" out "/share/man")
497 (string-append "--infodir=" out "/share/info")))))
ed9f9a77
LC
498 %standard-phases)))
499 (home-page "http://www.gnu.org/software/bc/")
f50d2669 500 (synopsis "Arbitrary precision numeric processing language")
ed9f9a77 501 (description
a22dc0c4
LC
502 "bc is an arbitrary precision numeric processing language. It includes
503an interactive environment for evaluating mathematical statements. Its
504syntax is similar to that of C, so basic usage is familiar. It also includes
505\"dc\", a reverse-polish calculator.")
9f51293c 506 (license license:gpl2+)))
37e6cdcd 507
2a9b10c7
RW
508;; The original kiss-fft does not have a complete build system and does not
509;; build any shared libraries. This is a fork used by Extempore.
510(define-public kiss-fft-for-extempore
511 (package
512 (name "kiss-fft-for-extempore")
513 (version "1.3.0")
514 (source (origin
515 (method url-fetch)
516 (uri (string-append "https://github.com/extemporelang/kiss_fft/archive/"
517 version ".tar.gz"))
518 (file-name (string-append name "-" version ".tar.gz"))
519 (sha256
520 (base32
521 "0hkp9l6l4c92fb1l2sh6a6zv1hynpvb2s4d03vd8vxyvybc0l4pv"))))
522 (build-system cmake-build-system)
523 (arguments `(#:tests? #f)) ; no tests included
524 (home-page "https://github.com/extemporelang/kiss_fft")
525 (synopsis "Mixed-radix Fast Fourier Transform")
526 (description
527 "Kiss FFT attempts to be a reasonably efficient, moderately useful FFT
528that can use fixed or floating data types and can easily be incorporated into
529a C program.")
530 (license license:bsd-3)))
531
37e6cdcd
LC
532(define-public fftw
533 (package
534 (name "fftw")
2cf287df 535 (version "3.3.4")
37e6cdcd
LC
536 (source (origin
537 (method url-fetch)
538 (uri (string-append "ftp://ftp.fftw.org/pub/fftw/fftw-"
539 version".tar.gz"))
540 (sha256
541 (base32
2cf287df 542 "10h9mzjxnwlsjziah4lri85scc05rlajz39nqf3mbh4vja8dw34g"))))
37e6cdcd
LC
543 (build-system gnu-build-system)
544 (arguments
e5c66f8c 545 '(#:configure-flags '("--enable-shared" "--enable-openmp")
37e6cdcd
LC
546 #:phases (alist-cons-before
547 'build 'no-native
548 (lambda _
549 ;; By default '-mtune=native' is used. However, that may
550 ;; cause the use of ISA extensions (SSE2, etc.) that are
551 ;; not necessarily available on the user's machine when
552 ;; that package is built on a different machine.
553 (substitute* (find-files "." "Makefile$")
554 (("-mtune=native") "")))
555 %standard-phases)))
556 (native-inputs `(("perl" ,perl)))
557 (home-page "http://fftw.org")
558 (synopsis "Computing the discrete Fourier transform")
559 (description
560 "FFTW is a C subroutine library for computing the discrete Fourier
561transform (DFT) in one or more dimensions, of arbitrary input size, and of
562both real and complex data (as well as of even/odd data---i.e. the discrete
563cosine/ sine transforms or DCT/DST).")
9f51293c 564 (license license:gpl2+)))
7569c5cb
EB
565
566(define-public fftwf
567 (package (inherit fftw)
568 (name "fftwf")
569 (arguments
570 (substitute-keyword-arguments (package-arguments fftw)
571 ((#:configure-flags cf)
572 `(cons "--enable-float" ,cf))))
573 (description
574 (string-append (package-description fftw)
575 " Single-precision version."))))
e5c66f8c
EB
576
577(define-public fftw-openmpi
578 (package (inherit fftw)
579 (name "fftw-openmpi")
580 (inputs
581 `(("openmpi" ,openmpi)
582 ,@(package-inputs fftw)))
583 (arguments
584 (substitute-keyword-arguments (package-arguments fftw)
585 ((#:configure-flags cf)
586 `(cons "--enable-mpi" ,cf))))
587 (description
588 (string-append (package-description fftw)
589 " With OpenMPI parallelism support."))))
8f4b1dfb
LC
590
591(define-public eigen
592 (package
593 (name "eigen")
3b13c3c0 594 (version "3.2.8")
8f4b1dfb
LC
595 (source (origin
596 (method url-fetch)
597 (uri (string-append "https://bitbucket.org/eigen/eigen/get/"
9b268f12 598 version ".tar.bz2"))
8f4b1dfb
LC
599 (sha256
600 (base32
3b13c3c0 601 "0mby6my1djsg8681fcvlaq0i4kd17fja9qn5f713j3xpfbb66akj"))
2abcc935 602 (file-name (string-append name "-" version ".tar.bz2"))
8f4b1dfb
LC
603 (modules '((guix build utils)))
604 (snippet
605 ;; There are 3 test failures in the "unsupported" directory,
606 ;; but maintainers say it's a known issue and it's unsupported
607 ;; anyway, so just skip them.
608 '(substitute* "CMakeLists.txt"
609 (("add_subdirectory\\(unsupported\\)")
a4eb83b7
LC
610 "# Do not build the tests for unsupported features.\n")
611 ;; Work around
612 ;; <http://eigen.tuxfamily.org/bz/show_bug.cgi?id=1114>.
613 (("\"include/eigen3\"")
614 "\"${CMAKE_INSTALL_PREFIX}/include/eigen3\"")))))
8f4b1dfb
LC
615 (build-system cmake-build-system)
616 (arguments
617 '(;; Turn off debugging symbols to save space.
618 #:build-type "Release"
619
354f4fe2 620 #:phases (modify-phases %standard-phases
ef8742ea 621 (replace 'check
354f4fe2 622 (lambda _
354f4fe2
LC
623 (let* ((cores (parallel-job-count))
624 (dash-j (format #f "-j~a" cores)))
ef8742ea
LC
625 ;; First build the tests, in parallel. See
626 ;; <http://eigen.tuxfamily.org/index.php?title=Tests>.
627 (and (zero? (system* "make" "buildtests" dash-j))
8f4b1dfb 628
ef8742ea
LC
629 ;; Then run 'CTest' with -V so we get more
630 ;; details upon failure.
631 (zero? (system* "ctest" "-V" dash-j)))))))))
8f4b1dfb
LC
632 (home-page "http://eigen.tuxfamily.org")
633 (synopsis "C++ template library for linear algebra")
634 (description
635 "Eigen is a C++ template library for linear algebra: matrices, vectors,
636numerical solvers, and related algorithms. It provides an elegant API based
637on \"expression templates\". It is versatile: it supports all matrix sizes,
638all standard numeric types, various matrix decompositions and geometry
639features, and more.")
640
641 ;; Most of the code is MPLv2, with a few files under LGPLv2.1+ or BSD-3.
642 ;; See 'COPYING.README' for details.
9f51293c 643 (license license:mpl2.0)))