From bb42d904cd74b4fd7df58c68c7f802afb6a28ce4 Mon Sep 17 00:00:00 2001
From: Thomas Guillermo Albers Raviola <thomas@thomaslabs.org>
Date: Wed, 22 Jul 2026 12:17:15 +0200
Subject: Add unwrap_exp

---
 series.mac | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'series.mac')

diff --git a/series.mac b/series.mac
index fd143f4..ec4cb50 100644
--- a/series.mac
+++ b/series.mac
@@ -190,6 +190,8 @@ expansions */
 defrule(r_exp_β_val, β_expr(m_any1), β_expr_val(m_any1, expansion_order));
 defrule(r_exp_γ_val, γ_expr(m_any1), γ_expr_val(m_any1, expansion_order));
 
+unwrap_exp(expr) := apply1(expr, r_exp_β_val, r_exp_γ_val);
+
 
 /**/
 
-- 
cgit v1.3