diff options
| -rw-r--r-- | series.mac | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -235,7 +235,7 @@ split_exponent(x) := ( /* Substitute functions by their series expansions and apply substitutions in coeffs */ __expand_term_subst(expr, coeffs) := block( - expr : apply1(expr, r_exp_β_val, r_exp_γ_val), + expr : unwrap_exp(expr), expr : subst(append(main_ansatz, coeffs), expr), ev(expr, eval, diff, expand)); |
