3^log(x) integration bug fix
- Subject: 3^log(x) integration bug fix
- From: Richard Fateman
- Date: Thu, 18 Apr 2002 07:54:59 -0700
minor suggestions
>
> ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ cut ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
> *** sin.lisp.ori Tue Apr 9 00:14:48 2002
> --- sin.lisp Mon Apr 8 18:40:20 2002
> ***************
> *** 65,68 ****
> --- 65,70 ----
> BASE*
> (SIMPLIFY (LIST '(MTIMES)
> + (list '(mexpt simp)
> + (list '(%log) base*) -1)
> (LIST '(%LOG)
> (CADR EXP))
> ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ cut ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
>
> Wolfgang
>
'
(SIMPLIFY (LIST '(MTIMES)
> + (list '(mexpt)
> +
(list '(%log) base*) -1)
> (LIST '(%LOG)
>
(CADR EXP))
...remove the simp, and let the simplifier change ...((mexpt) ...) to
((mexpt simp) ...)
also, a shorter/more modern way to do this
is
(simplify '((mtimes)((mexpt) ((%log),base*)-1) ((%log),(cadr expr)) ....