#3632 trigreduce of atan

[Aubrey Jaffer]

Maxima version: "5.41.0"
Maxima build date: "2018-04-09 18:33:03"
Host type: "x86_64-pc-linux-gnu"
Lisp implementation type: "GNU Common Lisp (GCL)"
Lisp implementation version: "GCL 2.6.12"

trigreduce(atan((f+g)/(1-f*g)));

Maxima encountered a Lisp error:

Condition in MACSYMA-TOP-LEVEL [or a callee]: INTERNAL-SIMPLE-ERROR: Bad plist (-1
$F
((MEXPT
SIMP)
((MPLUS
SIMP)
-1
((MTIMES
SIMP)
$F
$G))
-1))

[Kris Katterjohn]

Hi. Thank you for the report, but I believe this has already been fixed by commit [30ed02] which was for bug [#3399].

(%i1) trigreduce(atan((f+g)/(1-f*g)));
(%o1) -atan(g/(f*g-1)+f/(f*g-1))