Fix r_exp_e_val

1 files changed, 1 insertions, 1 deletions

diff --git a/series.mac b/series.mac
index aca9715..45e01d5 100644
--- a/series.mac
+++ b/series.mac
@@ -192,7 +192,7 @@ 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));
 defrule(r_exp_Φ_val, Φ_expr(m_any1), Φ_expr_val(m_any1, expansion_order));
 defrule(r_exp_Γ_val, exp(Φc[0]*Γ), eΓΦ_0);
-defrule(r_exp_e_val, e_expr(m_any1), exp(m_any));
+defrule(r_exp_e_val, e_expr(m_any1), exp(m_any1));
 
 unwrap_exp(expr) := block(
   [rs : [r_exp_β_val, r_exp_γ_val, r_exp_Φ_val, r_exp_e_val, r_exp_Γ_val]],