[bug#75032] [PATCH 07/13] gnu: Add sympow.

[Vinicius Monego]

* gnu/packages/maths.scm (sympow): New variable.

Change-Id: Iaeaea352f0a3a65a877b2845ecdc18856ded6d3c
---
 gnu/packages/maths.scm | 35 +++++++++++++++++++++++++++++++++++
 1 file changed, 35 insertions(+)

diff --git a/gnu/packages/maths.scm b/gnu/packages/maths.scm
index f3265423b4..1ca0144bfd 100644
--- a/gnu/packages/maths.scm
+++ b/gnu/packages/maths.scm
@@ -158,6 +158,7 @@ (define-module (gnu packages maths)
   #:use-module (gnu packages gl)
   #:use-module (gnu packages imagemagick)
   #:use-module (gnu packages m4)
+  #:use-module (gnu packages man)
   #:use-module (gnu packages mpi)
   #:use-module (gnu packages multiprecision)
   #:use-module (gnu packages ncurses)
@@ -898,6 +899,40 @@ (define-public 4ti2
 integer programming problems and computes Markov bases for statistics.")
     (license license:gpl2+)))
 
+(define-public sympow
+  (package
+    (name "sympow")
+    (version "2.023.7")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+         (url "https://gitlab.com/rezozer/forks/sympow";)
+         (commit (string-append "v" version))))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32
+         "0ilnxygkj4g5arjiyd16k00cvnjlqs0cpc8hk64kbqhl877mm5i9"))))
+    (build-system gnu-build-system)
+    (arguments
+     (list #:tests? #f ; no tests
+           #:phases #~(modify-phases %standard-phases
+                        (replace 'configure
+                          (lambda* (#:key inputs #:allow-other-keys)
+                            (substitute* "Configure"
+                              (("/bin/sh") (search-input-file inputs 
"/bin/bash")))
+                            (setenv "PREFIX" #$output)
+                            (setenv "VARPREFIX" #$output)
+                            (invoke "bash" "./Configure"))))))
+    (native-inputs (list bash-minimal coreutils help2man pari-gp which))
+    (home-page "https://gitlab.com/rezozer/forks/sympow";)
+    (synopsis "Symmetric power elliptic curve L-functions")
+    (description "SYMPOW is a mathematical program to compute special values
+of symmetric power elliptic curve L-functions; it can compute up to about 64
+digits of precision.")
+    (license (license:non-copyleft "file://COPYING"
+                                   "See COPYING in the distribution."))))
+
 (define-public cddlib
   (package
     (name "cddlib")
-- 
2.39.5