ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-25 22:08:16 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: mumps: Remove input labels.

Browse source 
* gnu/packages/maths.scm (mumps)[inputs]: Remove labels.
[arguments]: Adjust 'configure' phase to not rely on the "mpi" and
"blas" labels.
(mumps-metis, mumps-openmpi, mumps-metis-openmpi): Use 'modify-inputs'.
This commit is contained in:
Ludovic Courtès 2022-02-15 16:52:32 +01:00
parent d4709d78c3
commit ee92b0fb7d
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 22 additions and 19 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

41
gnu/packages/maths.scm
View file

@ -3532,12 +3532,12 @@ (define-public mumps
"mumps-shared-pord.patch"))))
(build-system gnu-build-system)
(inputs
`(("fortran" ,gfortran)
;; These are required for linking against mumps, but we let the user
;; declare the dependency.
("blas" ,openblas)
("metis" ,metis)
("scotch" ,scotch)))
(list gfortran
;; These are required for linking against mumps, but we let the user
;; declare the dependency.
openblas
metis
scotch))
(arguments
`(#:modules ((ice-9 match)
(ice-9 popen)
@ -3594,8 +3594,9 @@ (define-public mumps
LORDERINGS = $(LPORD) $(LMETIS) $(LSCOTCH) $(LIBSEQ)
IORDERINGSF = $(ISCOTCH)
IORDERINGSC = $(IPORD) $(IMETIS) $(ISCOTCH)"
(assoc-ref inputs "mpi")
(assoc-ref inputs "blas")
(->bool (which "mpicc")) ;MPI support enabled?
(dirname
(dirname (search-input-file inputs "/include/cblas.h")))
(assoc-ref inputs "scalapack")
(assoc-ref inputs "metis")
(match (list (assoc-ref inputs "pt-scotch")
@ -3656,19 +3657,20 @@ (define-public mumps
(license license:cecill-c)))
(define-public mumps-metis
(package (inherit mumps)
(package
(inherit mumps)
(name "mumps-metis")
(inputs
(alist-delete "scotch" (package-inputs mumps)))))
(inputs (modify-inputs (package-inputs mumps)
(delete "scotch")))))
(define-public mumps-openmpi
(package (inherit mumps)
(package
(inherit mumps)
(name "mumps-openmpi")
(inputs
`(("mpi" ,openmpi)
("scalapack" ,scalapack)
("pt-scotch" ,pt-scotch)
,@(alist-delete "scotch" (package-inputs mumps))))
(modify-inputs (package-inputs mumps)
(delete "scotch")
(prepend openmpi scalapack pt-scotch)))
(arguments
(substitute-keyword-arguments (package-arguments mumps)
((#:phases phases)
@ -3682,10 +3684,11 @@ (define-public mumps-openmpi
(synopsis "Multifrontal sparse direct solver (with MPI)")))
(define-public mumps-metis-openmpi
(package (inherit mumps-openmpi)
(package
(inherit mumps-openmpi)
(name "mumps-metis-openmpi")
(inputs
(alist-delete "pt-scotch" (package-inputs mumps-openmpi)))))
(inputs (modify-inputs (package-inputs mumps-openmpi)
(delete "pt-scotch")))))
(define-public ruby-asciimath
(package