# [Maxima] errors in tests

Viktor T. Toth vttoth at vttoth.com
Thu Apr 19 11:48:21 CDT 2007

```Andreas,

It appears that the errors are due to the most recent set of changes in
trigi.lisp. I committed a fix.

Viktor

-----Original Message-----
From: maxima-bounces at math.utexas.edu [mailto:maxima-bounces at math.utexas.edu]
On Behalf Of Andreas Eder
Sent: Thursday, April 19, 2007 11:55 AM
To: Maxima at math.utexas.edu
Subject: [Maxima] errors in tests

Hallo,

after the last cvs update i get errors in gawky test:

Running tests in rtest15:
********************** Problem 35 ***************
Input:
sin(3 a)
trigrat(------------)
%pi
sin(--- + a)
3

Result:
sqrt(3) sin(2 a) - sqrt(3) %i cos(2 a) - 1

This differed from the expected result:
- 1 + cos(2 a) + sqrt(3) sin(2 a)
STYLE-WARNING: redefining \$F in DEFUN
STYLE-WARNING: redefining \$F in DEFUN
STYLE-WARNING: redefining \$F in DEFUN
STYLE-WARNING: redefining \$F in DEFUN
STYLE-WARNING: redefining \$F in DEFUN
STYLE-WARNING: redefining \$F in DEFUN
STYLE-WARNING: redefining \$F in DEFUN

207/208 tests passed.

The following 1 problem failed: (35)
Running tests in rtest16: 55/55 tests passed.
Running tests in rtestode:
********************** Problem 6 ***************
Input:
soln : ode2(y + y    = 4 x, y, x)
x x

Result:
y = - 2 sin(2 x) - 2 x cos(2 x) + %k1 sin(x) + %k2 cos(x) + 2 x

This differed from the expected result:
y = 4 x + %k2 cos(x) + %k1 sin(x)

********************** Problem 8 ***************
Input:
ic2(soln, x = 0, y = 1, diff(y, x) = 3)

Result:
y = - 2 sin(2 x) - 2 x cos(2 x) + 7 sin(x) + cos(x) + 2 x

This differed from the expected result:
y = 4 x + cos(x) - sin(x)

********************** Problem 9 ***************
Input:
bc2(soln, x = 0, y = 3, x = 2, y = 1)

Result:
(2 sin(4) + 4 cos(4) - 3 cos(2) - 3)
sin(x)
y = - 2 sin(2 x) - 2 x cos(2 x) +
-------------------------------------------
sin(2)
+ 3 cos(x) +
2 x

This differed from the expected result:
- (7 + 3 cos(2)) sin(x)
y = 4 x + 3 cos(x) + -----------------------
sin(2)

********************** Problem 12 ***************
Input:
2
ode2(x y cos(x y) + sin(x y) + x  cos(x y) y  = 0, y, x)
x

Result:
/
[ x y sin(x y) + cos(x y)
y I ----------------------- dy - x y sin(x y) + cos(x y)
]            2
/           y
- -------------------------------------------------------- = %c
y

This differed from the expected result:
x sin(x y) = %c

********************** Problem 65 ***************
Input:
(ode2(- sin(t) + y + y  + y   , y, t), rhs(%%),
t    t t
ratsimp(- sin(t) + %% + diff(%%, t) + diff(%%, t,
2)))

Result:
((2 sqrt(3) - 9) sin((sqrt(3) - 1) t) + sqrt(3) cos((sqrt(3) - 1) t)
+ (2 sqrt(3) - 9) sin(t) + sqrt(3)
cos(t))/6

This differed from the expected result:
0

********************** Problem 66 ***************
Input:
(ode2(- sin(t) + 2 y + y  + y   , y, t), rhs(%%),
t    t t
ratsimp(- sin(t) + 2 %% + diff(%%, t) + diff(%%, t,
2)))

Result:
((2 sqrt(7) - 21) sin((sqrt(7) - 1) t) + sqrt(7) cos((sqrt(7) - 1) t)
+ (sqrt(7) - 14) sin(t) + (7 - 2 sqrt(7))
cos(t))/14

This differed from the expected result:
0

********************** Problem 68 ***************
Input:
t             sqrt(3) t
(integrate(my_integrand : exp(-) sin(t) sin(---------), t),
2                 2
ratsimp(exponentialize(diff(%%, t) -
my_integrand)))

Result:
sqrt(3) %i t
- ------------ - %i t
2                 sqrt(3) %i t + t/2     2 %i t + t/2
%e                      (%e                   + %e            )
- ---------------------------------------------------------------
2

This differed from the expected result:
0

61/68 tests passed.

The following 7 problems failed: (6 8 9 12 65 66 68)
Running tests in rtestode_zp: 30/30 tests passed.
Running tests in rtest3:
********************** Problem 67 ***************
Input:
ev(%, demoivre)

Result:
x                              x
%e  (%i sin(2 x) + cos(2 x))   %e  (- %i sin(2 x) - cos(2 x))       x
---------------------------- + ------------------------------ - 2 %e
2 %i + 1                        1 - 2 %i
- ---------------------------------------------------------------------
4

This differed from the expected result:
x                              x
x   %e  (cos(2 x) - %i sin(2 x))   %e  (cos(2 x) + %i sin(2 x))
- (- 2 %e  + ---------------------------- + ----------------------------)
1 - 2 %i                       1 + 2 %i
-------------------------------------------------------------------------
4

********************** Problem 68 ***************
Input:
ans : ev(%, ratexpand)

Result:
x                 x              x
%e  sin(2 x)   %i %e  cos(2 x)   %e
- ------------ + --------------- + ---
5                5           2

This differed from the expected result:
x     x                x
%e    %e  cos(2 x)   - %e  sin(2 x)
--- - ------------ + --------------
2         10              5

********************** Problem 69 ***************
Input:
ev(ans, x : 1, numer) - ev(ans, x : 0, numer)

Result:
.3647955798285587 - .4262408767513628 %i

This differed from the expected result:
.5779160182042402

********************** Problem 70 ***************
Input:
block([fpprec : 35], ev(ans, x : 1, bfloat) - ev(ans, x : 0, bfloat))

Result:
3.6479557982855883215675755696599834b-1
- 4.2624087675136272768625105110215894b-1
%i

This differed from the expected result:
5.779160182042402b-1

********************** Problem 71 ***************
Input:
x    2
integrate(%e  sin (x), x)

Result:
x                x
2 %e  sin(2 x) - 5 %e
- ----------------------
10

This differed from the expected result:
x     x                x
- (- 5 %e  + %e  cos(2 x) + 2 %e  sin(2 x))
-------------------------------------------
10

********************** Problem 72 ***************
Input:
trigreduce(%)

Result:
x                x
2 %e  sin(2 x) - 5 %e
- ----------------------
10

This differed from the expected result:
x     x                x
- (- 5 %e  + %e  cos(2 x) + 2 %e  sin(2 x))
-------------------------------------------
10

********************** Problem 73 ***************
Input:
ev(% - ans, ratsimp)

Result:
x
%i %e  cos(2 x)
- ---------------
5

This differed from the expected result:
0

101/108 tests passed.

The following 7 problems failed: (67 68 69 70 71 72 73)
Running tests in rtest8: 52/52 tests passed.
Running tests in rtest12:
********************** Problem 69 ***************
Input:
exp1 : outofpois(poisexpt(%, 2))

Result:
2     2                      2
1/2 (2 a  - b)  cos(4 y + 2 x) - (2 a  - b) (- a b - 5) sin(2 y + 5 x - u)
2                                                      2
+ (2 a  - b) (- a b - 5) sin(2 y - 3 x + u) + 1/2 (- a b - 5)  cos(8 x - 2
u)
2           2     2
+ 1/2 (- a b - 5)  + 1/2 (2 a  - b)

This differed from the expected result:
2     2              2                    2
(2 a  - b)    (- 5 - a b)    (- 1) (- 5 - a b)  cos(8 x - 2 u)
----------- + ------------ + ---------------------------------
2             2                         2
2
+ (2 a  - b) (- 5 - a b) sin(u - 3 x + 2 y)
2     2
2                                         (2 a  - b)  cos(2 x + 4 y)
- (2 a  - b) (- 5 - a b) sin(- u + 5 x + 2 y) + --------------------------
2

********************** Problem 71 ***************
Input:
outofpois(poisint(exp1, y))

Result:
2     2                              2
1/8 (2 a  - b)  sin(4 y + 2 x) + 1/2 (b - 2 a ) (- a b - 5) cos(2 y + 5 x -
u)
2
- 1/2 (2 a  - b) (- a b - 5) cos(2 y - 3 x +
u)

This differed from the expected result:
2
(- 1) (2 a  - b) (- 5 - a b) cos(u - 3 x + 2 y)
-----------------------------------------------
2
2                                             2     2
(2 a  - b) (- 5 - a b) cos(- u + 5 x + 2 y)   (2 a  - b)  sin(2 x + 4
y)
+ ------------------------------------------- +
--------------------------
2                                    8

********************** Problem 72 ***************
Input:
outofpois(poissimp(%))

Result:
2     2                              2
1/8 (2 a  - b)  sin(4 y + 2 x) + 1/2 (b - 2 a ) (- a b - 5) cos(2 y + 5 x -
u)
2
- 1/2 (2 a  - b) (- a b - 5) cos(2 y - 3 x +
u)

This differed from the expected result:
2
(- 1) (2 a  - b) (- 5 - a b) cos(u - 3 x + 2 y)
-----------------------------------------------
2
2                                             2     2
(2 a  - b) (- 5 - a b) cos(- u + 5 x + 2 y)   (2 a  - b)  sin(2 x + 4
y)
+ ------------------------------------------- +
--------------------------
2                                    8

75/78 tests passed.

The following 3 problems failed: (69 71 72)
Running tests in rexamples: 136/136 tests passed.
Running tests in rtesthyp:
********************** Problem 35 ***************
Input:
1      2
hgfred([- a, a], [-], sin (z))
2

Result:
- cos(2 a z)

This differed from the expected result:
cos(2 a z)

********************** Problem 40 ***************
Input:
1
hgfred([- n, n], [-], x)
2

Result:
- cos(2 n asin(sqrt(x)))

This differed from the expected result:
cos(2 n asin(sqrt(x)))

255/257 tests passed.

The following 2 problems failed: (35 40)
Running tests in rtestmt19937: 15/15 tests passed.
Running tests in rtest_allnummod: Nonorderable argument(s) in 'max' or
'min.' Returning a noun form.
Nonorderable argument(s) in 'max' or 'min.' Returning a noun form.
Nonorderable argument(s) in 'max' or 'min.' Returning a noun form.
479/479 tests passed.
Running tests in rtestconjugate: 95/95 tests passed.
Running tests in rtestsum: 250/250 tests passed.
Running tests in rtest_trig:
********************** Problem 16 ***************
Input:
is(maxerror < 1.e-13)

Result:
false

This differed from the expected result:
true

********************** Problem 18 ***************
Input:
subst(- %i x, x, subst(%i x, x, append(trig, htrig))) - append(trig, htrig)

Result:
[- 2 cos(x), 0, 0, 0, - 2 sec(x), 0, - 2 cosh(x), 0, 0, 0, - 2 sech(x), 0]

This differed from the expected result:
makelist(0, i, 1, length(append(trig, htrig)))

********************** Problem 29 ***************
Input:
mtrig - subst(x = - 5.6, append(trig, htrig))

Result:
[- 1.551131757020499, 0.0, 0.0, 0.0, - 2.578762237247611, 0.0,
- 270.430105289869, 0.0, 0.0, 0.0, - .01479125260744352,
0.0]

This differed from the expected result:
makelist(0, i, 1, length(append(trig, htrig)))

72/75 tests passed.

The following 3 problems failed: (16 18 29)
Running tests in rtest_zeta: 13/13 tests passed.
Running tests in rtest_diff_invtrig: 22/22 tests passed.
Running tests in rtest_scalarp: 19/19 tests passed.
Running tests in rtest_everysome: 84/84 tests passed.
Running tests in rtestint:
********************** Problem 53 ***************
Input:
cos(x)
integrate(------, x, minf, inf)
2
1 + x

Result:
0

This differed from the expected result:
- 1
%e    %pi

********************** Problem 56 ***************
Input:
x cos(x)
integrate(----------, x, minf, inf)
2
1 + x + x

Result:
sqrt(3)
- -------
2             1               1
%e          (%pi sin(-) - %i %pi cos(-))
2               2

This differed from the expected result:
sqrt(3)
- -------
2               1                    1
%e          (3 %pi sin(-) - sqrt(3) %pi cos(-))
2                    2
-----------------------------------------------
3

********************** Problem 88 ***************
Input:
1/3    2        - %pi  %pi
integrate(cos(x)    sin (x), x, -----, ---)
2     2

Result:
0

This differed from the expected result:
2  3
beta(-, -)
3  2

109/112 tests passed.

The following 3 problems failed: (53 56 88)
Running tests in rtestifactor: 24/24 tests passed.
Running tests in rtest_equal: 143/143 tests passed.
Running tests in rtest_abs: 70/70 tests passed.
Running tests in rtest_taylor: 126/126 tests passed.
Running tests in rtest_dot: 55/55 tests passed.
Running tests in rtest_mset: 59/59 tests passed.
Running tests in rtest_boolean: 108/108 tests passed.

Error summary:
Error found in /usr/home/are/maxima/maxima/tests/rtest15.mac, problem:
(35)
Errors found in /usr/home/are/maxima/maxima/tests/rtestode.mac, problems:
(6 8 9 12 65 66 68)
Errors found in /usr/home/are/maxima/maxima/tests/rtest3.mac, problems:
(67 68 69 70 71 72 73)
Errors found in /usr/home/are/maxima/maxima/tests/rtest12.mac, problems:
(69 71 72)
Errors found in /usr/home/are/maxima/maxima/tests/rtesthyp.mac, problems:
(35 40)
Errors found in /usr/home/are/maxima/maxima/tests/rtest_trig.mac, problems:
(16 18 29)
Errors found in /usr/home/are/maxima/maxima/tests/rtestint.mac, problems:
(53 56 88)

So you can see that quite a lot of tests are now giving the wrong
results.

Anyone knows waht's the reason?

'Andreas

--
Wherever I lay my .emacs, there's my \$HOME.
_______________________________________________
Maxima mailing list
Maxima at math.utexas.edu
http://www.math.utexas.edu/mailman/listinfo/maxima
```