From 0de2caa2a2686e70cb8150c17d64d0e160bdb1a7 Mon Sep 17 00:00:00 2001
From: Vinicius Monego <monego@posteo.net>
Date: Sun, 22 Dec 2024 17:26:50 +0000
Subject: [PATCH] gnu: Add python-lrcalc.

* gnu/packages/algebra.scm (python-lrcalc): New variable.

Change-Id: Id174ecfa092786ca16fbde2be68e12af0b2d9af3
Signed-off-by: Danny Milosavljevic <dannym@friendly-machines.com>
---
 gnu/packages/algebra.scm | 28 ++++++++++++++++++++++++++--
 1 file changed, 26 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/algebra.scm b/gnu/packages/algebra.scm
index 3f73d9295dea44a075ac138fe8d7a9ba5d2fae64..4d7b4001cd3e5e8b85252ac0dea51323529fb3d6 100644
--- a/gnu/packages/algebra.scm
+++ b/gnu/packages/algebra.scm
@@ -59,6 +59,7 @@
   #:use-module (gnu packages pkg-config)
   #:use-module (gnu packages pulseaudio)
   #:use-module (gnu packages python)
+  #:use-module (gnu packages python-build)
   #:use-module (gnu packages python-xyz)
   #:use-module (gnu packages readline)
   #:use-module (gnu packages ruby)
@@ -72,6 +73,7 @@
   #:use-module (guix build-system ant)
   #:use-module (guix build-system gnu)
   #:use-module (guix build-system cmake)
+  #:use-module (guix build-system pyproject)
   #:use-module (guix build-system python)
   #:use-module (guix build-system r)
   #:use-module (guix download)
@@ -1623,6 +1625,28 @@ structure constants of Schubert polynomials.")
     (license license:gpl2+)
     (home-page "https://sites.math.rutgers.edu/~asbuch/lrcalc/")))
 
+(define-public python-lrcalc
+  (package
+    (name "python-lrcalc")
+    (version "2.1")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (pypi-uri "lrcalc" version))
+       (sha256
+        (base32 "1adassfjalsdsngy01c37835qsx3gj0jx9cinc9b91x4xnd51873"))))
+    (build-system pyproject-build-system)
+    (arguments
+     (list #:tests? #f)) ; there are no tests
+    (native-inputs (list python-cython python-setuptools python-wheel))
+    (inputs (list lrcalc))
+    (home-page "https://math.rutgers.edu/~asbuch/lrcalc")
+    (synopsis "Python bindings for the Littlewood-Richardson Calculator")
+    (description
+     "This package provides Python bindings for the Littlewood-Richardson
+Calculator.")
+    (license license:gpl3+)))
+
 (define-public iml
   (package
     (name "iml")
@@ -1638,8 +1662,8 @@ structure constants of Schubert polynomials.")
     (build-system gnu-build-system)
     (inputs
      `(("gmp" ,gmp)
-       ("cblas" ,openblas))) ; or any other BLAS library; the documentation
-                             ; mentions ATLAS in particular
+       ("cblas" ,openblas)))    ; or any other BLAS library; the documentation
+                                        ; mentions ATLAS in particular
     (arguments
      `(#:configure-flags
        (list