From 70231fe7757f839f6ddd58d3c8a522b2e56fefe5 Mon Sep 17 00:00:00 2001
From: Andreas Enge <andreas@enge.fr>
Date: Thu, 6 Feb 2025 17:59:30 +0100
Subject: [PATCH] gnu: pari-gp: Add seadata-small package.

* gnu/packages/algebra.scm (pari-seadata-small): New variable.
  (pari-gp)[phases]{install-galdata}: Rename to...
  {install-data}: ...this and also install the pari-seadata-small data.

Change-Id: I348090dfce5ef52f132585cff3542e585c2309e3
---
 gnu/packages/algebra.scm | 12 +++++++++++-
 1 file changed, 11 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/algebra.scm b/gnu/packages/algebra.scm
index 7c22e811d55c87b74b978975969b4fba54f983b8..90b7e320888719d45c23412d91fd33e9148dbcac 100644
--- a/gnu/packages/algebra.scm
+++ b/gnu/packages/algebra.scm
@@ -240,6 +240,15 @@ the real span of the lattice.")
      (base32
       "1pch6bk76f1i6cwwgm7hhxi5h71m52lqayp4mnyj0jmjk406bhdp"))))
 
+(define pari-seadata-small
+  ;; version from 2009-06-18
+  (origin
+    (method url-fetch)
+    (uri "https://pari.math.u-bordeaux.fr/pub/pari/packages/seadata-small.tgz")
+    (sha256
+     (base32
+      "13qafribxwkz8h3haa0cng7arz0kh7398br4y7vqs9ib8w9yjnxz"))))
+
 (define-public pari-gp
   (package
     (name "pari-gp")
@@ -265,9 +274,10 @@ the real span of the lattice.")
               (invoke "./Configure"
                       "--mt=pthread"
                       (string-append "--prefix=" #$output))))
-          (add-after 'install 'install-galdata
+          (add-after 'install 'install-data
             (lambda _
               (invoke "tar" "-xvf" #$pari-galdata)
+              (invoke "tar" "-xvf" #$pari-seadata-small)
               (copy-recursively "data/" (string-append
                                          #$output
                                          "/share/pari")))))))