blob: 011a5982517c5d3186560481fd26314090dd77ca (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
|
// <-- Non-regression test for bug 205 -->
//
// <-- Bugzilla URL -->
// http://www.scilab.org/cgi-bin/bugzilla_bug_II/show_bug.cgi?id=205
//
// <-- Short Description -->
// Bug Report Id: 04062001110115540
// determ oublie les termes de plus haut degre.
//
// On Scilab 2.5 with " determ " function
// The Error Messages are:
//
// Commands: // scilab dit que le polynome caracteristique de
// // cette matrice de dimension
// // 30 est de degre 21
// N=30
// a=rand(N,N)
// s=poly(0,'s')
// p=determ(eye(N,N)*s-a)
// degree(p)
//
// Gaubert on Linux PPC version 2.2.13 distribution with X/kde as window manager
// France February 10, 2001 at 11:55:40
// Author : Scilab Project - Pierre MARECHAL
// Copyright INRIA
// Date : 09 june 2006
N=30;
A=rand(N,N);
s=poly(0,'s');
P=determ( eye(N,N)*%s - A );
if degree(P)==30 then
affich_result(%T,205);
else
affich_result(%F,205);
end
|