Fix test win64b: test_run('randlib', 'grand_generators') 12/11412/2
Adeline CARNIS [Fri, 26 Apr 2013 11:40:03 +0000 (13:40 +0200)]
test_run('randlib', 'grand_plot')

Change-Id: I4d28387beda134c5c3453df094820c90bc71b28c

scilab/modules/randlib/tests/unit_tests/grand_generators.dia.ref
scilab/modules/randlib/tests/unit_tests/grand_plot.dia.ref
scilab/modules/randlib/tests/unit_tests/grand_plot.tst

index 87e90bf..5810b27 100644 (file)
@@ -346,20 +346,14 @@ assert_checkequal ( S , gen );
 //
 warning("off");
 grand('setsd',1,1,1,1);
-
-=> be aware that you have may lost synchronization
-    between the virtual gen 0 and the others !
-    use grand("setall", s1, s2, s3, s4) if you want recover it.warning("on");
+warning("on");
 S=grand('getsd');
 assert_checkequal ( typeof(S) , "constant" );
 assert_checkequal ( size(S) , [sdsize 1] );
 //
 warning("off");
 grand('setsd',123456,123456,123456,123456);
-
-=> be aware that you have may lost synchronization
-    between the virtual gen 0 and the others !
-    use grand("setall", s1, s2, s3, s4) if you want recover it.warning("on");
+warning("on");
 S=grand('getsd');
 assert_checkequal ( typeof(S) , "constant" );
 assert_checkequal ( size(S) , [sdsize 1] );
@@ -373,10 +367,7 @@ expected = [
 ];
 warning("off");
 grand('setsd',1,1,1,1);
-
-=> be aware that you have may lost synchronization
-    between the virtual gen 0 and the others !
-    use grand("setall", s1, s2, s3, s4) if you want recover it.warning("on");
+warning("on");
 computed = grand(4,6,"def");
 assert_checkalmostequal ( computed , expected, 1.e-6 );
 //
@@ -389,10 +380,7 @@ expected = [
 ];
 warning("off");
 grand('setsd',1,1,1,1);
-
-=> be aware that you have may lost synchronization
-    between the virtual gen 0 and the others !
-    use grand("setall", s1, s2, s3, s4) if you want recover it.warning("on");
+warning("on");
 computed = grand(4,6,"lgi");
 assert_checkequal ( computed , expected );
 //
index f9edc0a..df07c07 100644 (file)
@@ -1,6 +1,6 @@
 // =============================================================================
 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
-// Copyright (C) 2008 - INRIA - Sabine Gaüzere
+// Copyright (C) 2008 - INRIA - Sabine Gaüzere
 // Copyright (C) 2010 - DIGITEO - Michael Baudin
 //
 //  This file is distributed under the same license as the Scilab package.
@@ -48,7 +48,7 @@ classes = linspace(0,1,50);
 histplot(classes,X)
 //Draw the density 
 x=linspace(0,1,50);
-y = (1/(beta(A,B))).*(x^(A-1)).*((1-x)^(B-1)) ;
+y = (1/(beta(A,B))).*(x.^(A-1)).*((1-x).^(B-1)) ;
 plot2d(x,y,2);
 f=gcf();
 delete(f);
@@ -67,7 +67,7 @@ classes = linspace(0,2,50);
 histplot(classes,X)
 //Draw the density 
 x=linspace(0,2,50);
-y = (B/(gamma(A))).*exp(-B*x).*(B*x)^(A-1);
+y = (B/(gamma(A))).*exp(-B*x).*(B*x).^(A-1);
 plot2d(x,y,2);
 f=gcf();
 delete(f);
@@ -105,7 +105,7 @@ classes = linspace(0,2*mu,101);
 histplot(classes,X)
 //Draw the density
 [x]=linspace(0,2*mu,101);
-y = exp(-mu).*(mu^x)./factorial(x);
+y = exp(-mu).*(mu.^x)./factorial(x);
 plot2d(x,y,2);
 f=gcf();
 delete(f);
index 1c07902..d22e68c 100644 (file)
@@ -1,6 +1,6 @@
 // =============================================================================
 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
-// Copyright (C) 2008 - INRIA - Sabine Gaüzere
+// Copyright (C) 2008 - INRIA - Sabine Gaüzere
 // Copyright (C) 2010 - DIGITEO - Michael Baudin
 //
 //  This file is distributed under the same license as the Scilab package.
@@ -51,7 +51,7 @@ classes = linspace(0,1,50);
 histplot(classes,X)
 //Draw the density 
 x=linspace(0,1,50);
-y = (1/(beta(A,B))).*(x^(A-1)).*((1-x)^(B-1)) ;
+y = (1/(beta(A,B))).*(x.^(A-1)).*((1-x).^(B-1)) ;
 plot2d(x,y,2);
 f=gcf();
 delete(f);
@@ -71,7 +71,7 @@ classes = linspace(0,2,50);
 histplot(classes,X)
 //Draw the density 
 x=linspace(0,2,50);
-y = (B/(gamma(A))).*exp(-B*x).*(B*x)^(A-1);
+y = (B/(gamma(A))).*exp(-B*x).*(B*x).^(A-1);
 plot2d(x,y,2);
 f=gcf();
 delete(f);
@@ -112,7 +112,7 @@ classes = linspace(0,2*mu,101);
 histplot(classes,X)
 //Draw the density
 [x]=linspace(0,2*mu,101);
-y = exp(-mu).*(mu^x)./factorial(x);
+y = exp(-mu).*(mu.^x)./factorial(x);
 plot2d(x,y,2);
 f=gcf();
 delete(f);