fix test on win64b : test_run(linear_algebra, bug_9196) 14/11014/1
Adeline CARNIS [Tue, 26 Mar 2013 11:12:57 +0000 (12:12 +0100)]
Change-Id: I816c602a30cf535c252a150c16041ac397520105

scilab/modules/linear_algebra/tests/nonreg_tests/bug_9196.dia.ref
scilab/modules/linear_algebra/tests/nonreg_tests/bug_9196.tst

index c7bf84f..735a8de 100644 (file)
@@ -2,6 +2,7 @@
 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
 // Copyright (C) 2013 - Scilab Enterprises - Sylvestre Ledru
 // Copyright (C) 2013 - Michaël Baudin
+// Copyright (C) 2013 - Scilab Enterprises - Adeline CARNIS
 //
 //  This file is distributed under the same license as the Scilab package.
 // =============================================================================
@@ -27,12 +28,12 @@ xexpected=[7129/2520
            113567/144144
            1768477/2450448];
 x=A\b;
-assert_checkalmostequal(x, xexpected);
+assert_checkalmostequal(x, xexpected, [], 1e-6);
 Ac=complex(A,zeros(A));
 bc=complex(b,zeros(b));
 xc = Ac\bc;
 xcexpected=complex(xexpected,zeros(xexpected));
-assert_checkalmostequal(xc, xexpected);
+assert_checkalmostequal(xc, xcexpected, [], 1e-5);
 b=(1:n)';
 xexpected=[9;
            17819/2520;
@@ -44,12 +45,12 @@ xexpected=[9;
            71761/20592;
            988277/306306];
 x=A\b;
-assert_checkalmostequal(x, xexpected);
+assert_checkalmostequal(x, xexpected, [], 1e-5);
 Ac=complex(A,zeros(A));
 bc=complex(b,zeros(b));
 xc = Ac\bc;
 xcexpected=complex(xexpected,zeros(xexpected));
-assert_checkalmostequal(xc, xexpected);
+assert_checkalmostequal(xc, xcexpected, [], 1e-5);
 b=[1;-1;1;-1;1;-1;1;-1;1];
 xexpected=[1879/2520;
            893/2520;
@@ -61,12 +62,12 @@ xexpected=[1879/2520;
            69659/720720;
            1068047/12252240];
 x=A\b;
-assert_checkalmostequal(x, xexpected);
+assert_checkalmostequal(x, xexpected, [], 1e-7);
 Ac=complex(A,zeros(A));
 bc=complex(b,zeros(b));
 xc = Ac\bc;
 xcexpected=complex(xexpected,zeros(xexpected));
-assert_checkalmostequal(xc, xexpected);
+assert_checkalmostequal(xc, xcexpected, [], 1e-6);
 n=9;
 A = testmatrix("hilb",n);
 b = ones(n,1);
@@ -82,4 +83,4 @@ xexpected=[
 7.87871850371850480e-001
 7.21695379783615090e-001
 ];
-assert_checkalmostequal(x, xexpected);
+assert_checkalmostequal(x, xexpected, [], 1e-6);
index 837381e..ec50215 100644 (file)
@@ -1,7 +1,8 @@
 // =============================================================================
 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
 // Copyright (C) 2013 - Scilab Enterprises - Sylvestre Ledru
-// Copyright (C) 2013 - Michaël Baudin
+// Copyright (C) 2013 - Michaël Baudin
+// Copyright (C) 2013 - Scilab Enterprises - Adeline CARNIS
 //
 //  This file is distributed under the same license as the Scilab package.
 // =============================================================================
@@ -30,14 +31,14 @@ xexpected=[7129/2520
            113567/144144
            1768477/2450448];
 x=A\b;
-assert_checkalmostequal(x, xexpected);
+assert_checkalmostequal(x, xexpected, [], 1e-6);
 
 
 Ac=complex(A,zeros(A));
 bc=complex(b,zeros(b));
 xc = Ac\bc;
 xcexpected=complex(xexpected,zeros(xexpected));
-assert_checkalmostequal(xc, xexpected);
+assert_checkalmostequal(xc, xcexpected, [], 1e-5);
 
 b=(1:n)';
 xexpected=[9;
@@ -50,12 +51,12 @@ xexpected=[9;
            71761/20592;
            988277/306306];
 x=A\b;
-assert_checkalmostequal(x, xexpected);
+assert_checkalmostequal(x, xexpected, [], 1e-5);
 Ac=complex(A,zeros(A));
 bc=complex(b,zeros(b));
 xc = Ac\bc;
 xcexpected=complex(xexpected,zeros(xexpected));
-assert_checkalmostequal(xc, xexpected);
+assert_checkalmostequal(xc, xcexpected, [], 1e-5);
 
 b=[1;-1;1;-1;1;-1;1;-1;1];
 xexpected=[1879/2520;
@@ -68,12 +69,12 @@ xexpected=[1879/2520;
            69659/720720;
            1068047/12252240];
 x=A\b;
-assert_checkalmostequal(x, xexpected);
+assert_checkalmostequal(x, xexpected, [], 1e-7);
 Ac=complex(A,zeros(A));
 bc=complex(b,zeros(b));
 xc = Ac\bc;
 xcexpected=complex(xexpected,zeros(xexpected));
-assert_checkalmostequal(xc, xexpected);
+assert_checkalmostequal(xc, xcexpected, [], 1e-6);
 
 n=9;
 A = testmatrix("hilb",n);
@@ -90,4 +91,4 @@ xexpected=[
 7.87871850371850480e-001
 7.21695379783615090e-001
 ];
-assert_checkalmostequal(x, xexpected);
+assert_checkalmostequal(x, xexpected, [], 1e-6);