From eaed02167e73d3569a1814b72bee5dd9afdb7ba7 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?St=C3=A9phane=20Adjemian=20=28Charybdis=29?=
 <stepan@adjemian.eu>
Date: Fri, 27 Sep 2024 22:17:24 +0200
Subject: [PATCH] Generate fewer pseudo-random samples in unit tests.

---
 matlab/missing/stats/gamrnd.m | 24 ++++++++++++------------
 1 file changed, 12 insertions(+), 12 deletions(-)

diff --git a/matlab/missing/stats/gamrnd.m b/matlab/missing/stats/gamrnd.m
index a791332e0..c4a77281d 100644
--- a/matlab/missing/stats/gamrnd.m
+++ b/matlab/missing/stats/gamrnd.m
@@ -132,7 +132,7 @@ return % --*-- Unit tests --*--
 if ~isoctave && ~user_has_matlab_license('statistics_toolbox')
     method = struct('small', 'Weibull-rejection', 'large', 'Knuth');
     n = 1000000;
-    m = 100;
+    m = 1;
     a = 0.1;
     b = 1.0;
     try
@@ -171,7 +171,7 @@ end
 if ~isoctave && ~user_has_matlab_license('statistics_toolbox')
     method = struct('small', 'Johnk', 'large', 'Knuth');
     n = 1000000;
-    m = 100;
+    m = 1;
     a = 0.1;
     b = 1.0;
     try
@@ -210,7 +210,7 @@ end
 if ~isoctave && ~user_has_matlab_license('statistics_toolbox')
     method = struct('small', 'Berman', 'large', 'Knuth');
     n = 1000000;
-    m = 100;
+    m = 1;
     a = 0.1;
     b = 1.0;
     try
@@ -249,7 +249,7 @@ end
 if ~isoctave && ~user_has_matlab_license('statistics_toolbox')
     method = struct('small', 'Ahrens-Dieter', 'large', 'Knuth');
     n = 1000000;
-    m = 100;
+    m = 1;
     a = 0.1;
     b = 1.0;
     try
@@ -287,8 +287,8 @@ end
 %@test:5
 if ~isoctave && ~user_has_matlab_license('statistics_toolbox')
     method = struct('small', 'Best', 'large', 'Knuth');
-    n = 1000000;
-    m = 100;
+    n = 10000000;
+    m = 1;
     a = 0.1;
     b = 1.0;
     try
@@ -326,8 +326,8 @@ end
 %@test:6
 if ~isoctave && ~user_has_matlab_license('statistics_toolbox')
     method = struct('small', 'Weibull-rejection', 'large', 'Knuth');
-    n = 1000000;
-    m = 100;
+    n = 10000000;
+    m = 1;
     a = 1.5;
     b = 1.0;
     try
@@ -365,8 +365,8 @@ end
 %@test:7
 if ~isoctave && ~user_has_matlab_license('statistics_toolbox')
     method = struct('small', 'Weibull-rejection', 'large', 'Cheng');
-    n = 1000000;
-    m = 100;
+    n = 10000000;
+    m = 1;
     a = 1.5;
     b = 1.0;
     try
@@ -404,8 +404,8 @@ end
 %@test:8
 if ~isoctave && ~user_has_matlab_license('statistics_toolbox')
     method = struct('small', 'Weibull-rejection', 'large', 'Best');
-    n = 1000000;
-    m = 100;
+    n = 10000000;
+    m = 1;
     a = 1.5;
     b = 1.0;
     try
-- 
GitLab