]> git.ipfire.org Git - thirdparty/gcc.git/blame - libstdc++-v3/testsuite/ext/special_functions/conf_hyperg/check_value.cc
Update copyright years.
[thirdparty/gcc.git] / libstdc++-v3 / testsuite / ext / special_functions / conf_hyperg / check_value.cc
CommitLineData
196c9e7a 1// { dg-do run { target c++11 } }
b4688136 2// { dg-options "-D__STDCPP_WANT_MATH_SPEC_FUNCS__" }
e7f2d0bd 3// { dg-skip-if "no extensions in strict dialects" { *-*-* } { "-std=c++*" } }
2be75957 4//
a945c346 5// Copyright (C) 2016-2024 Free Software Foundation, Inc.
2be75957
ESR
6//
7// This file is part of the GNU ISO C++ Library. This library is free
8// software; you can redistribute it and/or modify it under the
9// terms of the GNU General Public License as published by the
10// Free Software Foundation; either version 3, or (at your option)
11// any later version.
12//
13// This library is distributed in the hope that it will be useful,
14// but WITHOUT ANY WARRANTY; without even the implied warranty of
15// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16// GNU General Public License for more details.
17//
18// You should have received a copy of the GNU General Public License along
19// with this library; see the file COPYING3. If not see
20// <http://www.gnu.org/licenses/>.
21
22// conf_hyperg
23// Compare against values generated by the GNU Scientific Library.
24// The GSL can be found on the web: http://www.gnu.org/software/gsl/
25#include <limits>
26#include <cmath>
27#if defined(__TEST_DEBUG)
28# include <iostream>
29# define VERIFY(A) \
30 if (!(A)) \
31 { \
32 std::cout << "line " << __LINE__ \
33 << " max_abs_frac = " << max_abs_frac \
34 << std::endl; \
35 }
36#else
37# include <testsuite_hooks.h>
38#endif
39#include <specfun_testcase.h>
40
2be75957 41// Test data for a=0.0000000000000000, c=1.0000000000000000.
b4688136 42// max(|f - f_GSL|): 0.0000000000000000 at index 0
2be75957 43// max(|f - f_GSL| / |f_GSL|): 0.0000000000000000
b4688136
ESR
44// mean(f - f_GSL): 0.0000000000000000
45// variance(f - f_GSL): 0.0000000000000000
46// stddev(f - f_GSL): 0.0000000000000000
2be75957
ESR
47const testcase_conf_hyperg<double>
48data001[21] =
49{
50 { 1.0000000000000000, 0.0000000000000000, 1.0000000000000000,
b4688136 51 -10.000000000000000, 0.0 },
2be75957 52 { 1.0000000000000000, 0.0000000000000000, 1.0000000000000000,
b4688136 53 -9.0000000000000000, 0.0 },
2be75957 54 { 1.0000000000000000, 0.0000000000000000, 1.0000000000000000,
b4688136 55 -8.0000000000000000, 0.0 },
2be75957 56 { 1.0000000000000000, 0.0000000000000000, 1.0000000000000000,
b4688136 57 -7.0000000000000000, 0.0 },
2be75957 58 { 1.0000000000000000, 0.0000000000000000, 1.0000000000000000,
b4688136 59 -6.0000000000000000, 0.0 },
2be75957 60 { 1.0000000000000000, 0.0000000000000000, 1.0000000000000000,
b4688136 61 -5.0000000000000000, 0.0 },
2be75957 62 { 1.0000000000000000, 0.0000000000000000, 1.0000000000000000,
b4688136 63 -4.0000000000000000, 0.0 },
2be75957 64 { 1.0000000000000000, 0.0000000000000000, 1.0000000000000000,
b4688136 65 -3.0000000000000000, 0.0 },
2be75957 66 { 1.0000000000000000, 0.0000000000000000, 1.0000000000000000,
b4688136 67 -2.0000000000000000, 0.0 },
2be75957 68 { 1.0000000000000000, 0.0000000000000000, 1.0000000000000000,
b4688136 69 -1.0000000000000000, 0.0 },
2be75957 70 { 1.0000000000000000, 0.0000000000000000, 1.0000000000000000,
b4688136 71 0.0000000000000000, 0.0 },
2be75957 72 { 1.0000000000000000, 0.0000000000000000, 1.0000000000000000,
b4688136 73 1.0000000000000000, 0.0 },
2be75957 74 { 1.0000000000000000, 0.0000000000000000, 1.0000000000000000,
b4688136 75 2.0000000000000000, 0.0 },
2be75957 76 { 1.0000000000000000, 0.0000000000000000, 1.0000000000000000,
b4688136 77 3.0000000000000000, 0.0 },
2be75957 78 { 1.0000000000000000, 0.0000000000000000, 1.0000000000000000,
b4688136 79 4.0000000000000000, 0.0 },
2be75957 80 { 1.0000000000000000, 0.0000000000000000, 1.0000000000000000,
b4688136 81 5.0000000000000000, 0.0 },
2be75957 82 { 1.0000000000000000, 0.0000000000000000, 1.0000000000000000,
b4688136 83 6.0000000000000000, 0.0 },
2be75957 84 { 1.0000000000000000, 0.0000000000000000, 1.0000000000000000,
b4688136 85 7.0000000000000000, 0.0 },
2be75957 86 { 1.0000000000000000, 0.0000000000000000, 1.0000000000000000,
b4688136 87 8.0000000000000000, 0.0 },
2be75957 88 { 1.0000000000000000, 0.0000000000000000, 1.0000000000000000,
b4688136 89 9.0000000000000000, 0.0 },
2be75957 90 { 1.0000000000000000, 0.0000000000000000, 1.0000000000000000,
b4688136 91 10.000000000000000, 0.0 },
2be75957
ESR
92};
93const double toler001 = 2.5000000000000020e-13;
94
95// Test data for a=0.0000000000000000, c=2.0000000000000000.
b4688136 96// max(|f - f_GSL|): 0.0000000000000000 at index 0
2be75957 97// max(|f - f_GSL| / |f_GSL|): 0.0000000000000000
b4688136
ESR
98// mean(f - f_GSL): 0.0000000000000000
99// variance(f - f_GSL): 0.0000000000000000
100// stddev(f - f_GSL): 0.0000000000000000
2be75957
ESR
101const testcase_conf_hyperg<double>
102data002[21] =
103{
104 { 1.0000000000000000, 0.0000000000000000, 2.0000000000000000,
b4688136 105 -10.000000000000000, 0.0 },
2be75957 106 { 1.0000000000000000, 0.0000000000000000, 2.0000000000000000,
b4688136 107 -9.0000000000000000, 0.0 },
2be75957 108 { 1.0000000000000000, 0.0000000000000000, 2.0000000000000000,
b4688136 109 -8.0000000000000000, 0.0 },
2be75957 110 { 1.0000000000000000, 0.0000000000000000, 2.0000000000000000,
b4688136 111 -7.0000000000000000, 0.0 },
2be75957 112 { 1.0000000000000000, 0.0000000000000000, 2.0000000000000000,
b4688136 113 -6.0000000000000000, 0.0 },
2be75957 114 { 1.0000000000000000, 0.0000000000000000, 2.0000000000000000,
b4688136 115 -5.0000000000000000, 0.0 },
2be75957 116 { 1.0000000000000000, 0.0000000000000000, 2.0000000000000000,
b4688136 117 -4.0000000000000000, 0.0 },
2be75957 118 { 1.0000000000000000, 0.0000000000000000, 2.0000000000000000,
b4688136 119 -3.0000000000000000, 0.0 },
2be75957 120 { 1.0000000000000000, 0.0000000000000000, 2.0000000000000000,
b4688136 121 -2.0000000000000000, 0.0 },
2be75957 122 { 1.0000000000000000, 0.0000000000000000, 2.0000000000000000,
b4688136 123 -1.0000000000000000, 0.0 },
2be75957 124 { 1.0000000000000000, 0.0000000000000000, 2.0000000000000000,
b4688136 125 0.0000000000000000, 0.0 },
2be75957 126 { 1.0000000000000000, 0.0000000000000000, 2.0000000000000000,
b4688136 127 1.0000000000000000, 0.0 },
2be75957 128 { 1.0000000000000000, 0.0000000000000000, 2.0000000000000000,
b4688136 129 2.0000000000000000, 0.0 },
2be75957 130 { 1.0000000000000000, 0.0000000000000000, 2.0000000000000000,
b4688136 131 3.0000000000000000, 0.0 },
2be75957 132 { 1.0000000000000000, 0.0000000000000000, 2.0000000000000000,
b4688136 133 4.0000000000000000, 0.0 },
2be75957 134 { 1.0000000000000000, 0.0000000000000000, 2.0000000000000000,
b4688136 135 5.0000000000000000, 0.0 },
2be75957 136 { 1.0000000000000000, 0.0000000000000000, 2.0000000000000000,
b4688136 137 6.0000000000000000, 0.0 },
2be75957 138 { 1.0000000000000000, 0.0000000000000000, 2.0000000000000000,
b4688136 139 7.0000000000000000, 0.0 },
2be75957 140 { 1.0000000000000000, 0.0000000000000000, 2.0000000000000000,
b4688136 141 8.0000000000000000, 0.0 },
2be75957 142 { 1.0000000000000000, 0.0000000000000000, 2.0000000000000000,
b4688136 143 9.0000000000000000, 0.0 },
2be75957 144 { 1.0000000000000000, 0.0000000000000000, 2.0000000000000000,
b4688136 145 10.000000000000000, 0.0 },
2be75957
ESR
146};
147const double toler002 = 2.5000000000000020e-13;
148
149// Test data for a=0.0000000000000000, c=3.0000000000000000.
b4688136 150// max(|f - f_GSL|): 0.0000000000000000 at index 0
2be75957 151// max(|f - f_GSL| / |f_GSL|): 0.0000000000000000
b4688136
ESR
152// mean(f - f_GSL): 0.0000000000000000
153// variance(f - f_GSL): 0.0000000000000000
154// stddev(f - f_GSL): 0.0000000000000000
2be75957
ESR
155const testcase_conf_hyperg<double>
156data003[21] =
157{
158 { 1.0000000000000000, 0.0000000000000000, 3.0000000000000000,
b4688136 159 -10.000000000000000, 0.0 },
2be75957 160 { 1.0000000000000000, 0.0000000000000000, 3.0000000000000000,
b4688136 161 -9.0000000000000000, 0.0 },
2be75957 162 { 1.0000000000000000, 0.0000000000000000, 3.0000000000000000,
b4688136 163 -8.0000000000000000, 0.0 },
2be75957 164 { 1.0000000000000000, 0.0000000000000000, 3.0000000000000000,
b4688136 165 -7.0000000000000000, 0.0 },
2be75957 166 { 1.0000000000000000, 0.0000000000000000, 3.0000000000000000,
b4688136 167 -6.0000000000000000, 0.0 },
2be75957 168 { 1.0000000000000000, 0.0000000000000000, 3.0000000000000000,
b4688136 169 -5.0000000000000000, 0.0 },
2be75957 170 { 1.0000000000000000, 0.0000000000000000, 3.0000000000000000,
b4688136 171 -4.0000000000000000, 0.0 },
2be75957 172 { 1.0000000000000000, 0.0000000000000000, 3.0000000000000000,
b4688136 173 -3.0000000000000000, 0.0 },
2be75957 174 { 1.0000000000000000, 0.0000000000000000, 3.0000000000000000,
b4688136 175 -2.0000000000000000, 0.0 },
2be75957 176 { 1.0000000000000000, 0.0000000000000000, 3.0000000000000000,
b4688136 177 -1.0000000000000000, 0.0 },
2be75957 178 { 1.0000000000000000, 0.0000000000000000, 3.0000000000000000,
b4688136 179 0.0000000000000000, 0.0 },
2be75957 180 { 1.0000000000000000, 0.0000000000000000, 3.0000000000000000,
b4688136 181 1.0000000000000000, 0.0 },
2be75957 182 { 1.0000000000000000, 0.0000000000000000, 3.0000000000000000,
b4688136 183 2.0000000000000000, 0.0 },
2be75957 184 { 1.0000000000000000, 0.0000000000000000, 3.0000000000000000,
b4688136 185 3.0000000000000000, 0.0 },
2be75957 186 { 1.0000000000000000, 0.0000000000000000, 3.0000000000000000,
b4688136 187 4.0000000000000000, 0.0 },
2be75957 188 { 1.0000000000000000, 0.0000000000000000, 3.0000000000000000,
b4688136 189 5.0000000000000000, 0.0 },
2be75957 190 { 1.0000000000000000, 0.0000000000000000, 3.0000000000000000,
b4688136 191 6.0000000000000000, 0.0 },
2be75957 192 { 1.0000000000000000, 0.0000000000000000, 3.0000000000000000,
b4688136 193 7.0000000000000000, 0.0 },
2be75957 194 { 1.0000000000000000, 0.0000000000000000, 3.0000000000000000,
b4688136 195 8.0000000000000000, 0.0 },
2be75957 196 { 1.0000000000000000, 0.0000000000000000, 3.0000000000000000,
b4688136 197 9.0000000000000000, 0.0 },
2be75957 198 { 1.0000000000000000, 0.0000000000000000, 3.0000000000000000,
b4688136 199 10.000000000000000, 0.0 },
2be75957
ESR
200};
201const double toler003 = 2.5000000000000020e-13;
202
203// Test data for a=0.0000000000000000, c=4.0000000000000000.
b4688136 204// max(|f - f_GSL|): 0.0000000000000000 at index 0
2be75957 205// max(|f - f_GSL| / |f_GSL|): 0.0000000000000000
b4688136
ESR
206// mean(f - f_GSL): 0.0000000000000000
207// variance(f - f_GSL): 0.0000000000000000
208// stddev(f - f_GSL): 0.0000000000000000
2be75957
ESR
209const testcase_conf_hyperg<double>
210data004[21] =
211{
212 { 1.0000000000000000, 0.0000000000000000, 4.0000000000000000,
b4688136 213 -10.000000000000000, 0.0 },
2be75957 214 { 1.0000000000000000, 0.0000000000000000, 4.0000000000000000,
b4688136 215 -9.0000000000000000, 0.0 },
2be75957 216 { 1.0000000000000000, 0.0000000000000000, 4.0000000000000000,
b4688136 217 -8.0000000000000000, 0.0 },
2be75957 218 { 1.0000000000000000, 0.0000000000000000, 4.0000000000000000,
b4688136 219 -7.0000000000000000, 0.0 },
2be75957 220 { 1.0000000000000000, 0.0000000000000000, 4.0000000000000000,
b4688136 221 -6.0000000000000000, 0.0 },
2be75957 222 { 1.0000000000000000, 0.0000000000000000, 4.0000000000000000,
b4688136 223 -5.0000000000000000, 0.0 },
2be75957 224 { 1.0000000000000000, 0.0000000000000000, 4.0000000000000000,
b4688136 225 -4.0000000000000000, 0.0 },
2be75957 226 { 1.0000000000000000, 0.0000000000000000, 4.0000000000000000,
b4688136 227 -3.0000000000000000, 0.0 },
2be75957 228 { 1.0000000000000000, 0.0000000000000000, 4.0000000000000000,
b4688136 229 -2.0000000000000000, 0.0 },
2be75957 230 { 1.0000000000000000, 0.0000000000000000, 4.0000000000000000,
b4688136 231 -1.0000000000000000, 0.0 },
2be75957 232 { 1.0000000000000000, 0.0000000000000000, 4.0000000000000000,
b4688136 233 0.0000000000000000, 0.0 },
2be75957 234 { 1.0000000000000000, 0.0000000000000000, 4.0000000000000000,
b4688136 235 1.0000000000000000, 0.0 },
2be75957 236 { 1.0000000000000000, 0.0000000000000000, 4.0000000000000000,
b4688136 237 2.0000000000000000, 0.0 },
2be75957 238 { 1.0000000000000000, 0.0000000000000000, 4.0000000000000000,
b4688136 239 3.0000000000000000, 0.0 },
2be75957 240 { 1.0000000000000000, 0.0000000000000000, 4.0000000000000000,
b4688136 241 4.0000000000000000, 0.0 },
2be75957 242 { 1.0000000000000000, 0.0000000000000000, 4.0000000000000000,
b4688136 243 5.0000000000000000, 0.0 },
2be75957 244 { 1.0000000000000000, 0.0000000000000000, 4.0000000000000000,
b4688136 245 6.0000000000000000, 0.0 },
2be75957 246 { 1.0000000000000000, 0.0000000000000000, 4.0000000000000000,
b4688136 247 7.0000000000000000, 0.0 },
2be75957 248 { 1.0000000000000000, 0.0000000000000000, 4.0000000000000000,
b4688136 249 8.0000000000000000, 0.0 },
2be75957 250 { 1.0000000000000000, 0.0000000000000000, 4.0000000000000000,
b4688136 251 9.0000000000000000, 0.0 },
2be75957 252 { 1.0000000000000000, 0.0000000000000000, 4.0000000000000000,
b4688136 253 10.000000000000000, 0.0 },
2be75957
ESR
254};
255const double toler004 = 2.5000000000000020e-13;
256
257// Test data for a=0.0000000000000000, c=5.0000000000000000.
b4688136 258// max(|f - f_GSL|): 0.0000000000000000 at index 0
2be75957 259// max(|f - f_GSL| / |f_GSL|): 0.0000000000000000
b4688136
ESR
260// mean(f - f_GSL): 0.0000000000000000
261// variance(f - f_GSL): 0.0000000000000000
262// stddev(f - f_GSL): 0.0000000000000000
2be75957
ESR
263const testcase_conf_hyperg<double>
264data005[21] =
265{
266 { 1.0000000000000000, 0.0000000000000000, 5.0000000000000000,
b4688136 267 -10.000000000000000, 0.0 },
2be75957 268 { 1.0000000000000000, 0.0000000000000000, 5.0000000000000000,
b4688136 269 -9.0000000000000000, 0.0 },
2be75957 270 { 1.0000000000000000, 0.0000000000000000, 5.0000000000000000,
b4688136 271 -8.0000000000000000, 0.0 },
2be75957 272 { 1.0000000000000000, 0.0000000000000000, 5.0000000000000000,
b4688136 273 -7.0000000000000000, 0.0 },
2be75957 274 { 1.0000000000000000, 0.0000000000000000, 5.0000000000000000,
b4688136 275 -6.0000000000000000, 0.0 },
2be75957 276 { 1.0000000000000000, 0.0000000000000000, 5.0000000000000000,
b4688136 277 -5.0000000000000000, 0.0 },
2be75957 278 { 1.0000000000000000, 0.0000000000000000, 5.0000000000000000,
b4688136 279 -4.0000000000000000, 0.0 },
2be75957 280 { 1.0000000000000000, 0.0000000000000000, 5.0000000000000000,
b4688136 281 -3.0000000000000000, 0.0 },
2be75957 282 { 1.0000000000000000, 0.0000000000000000, 5.0000000000000000,
b4688136 283 -2.0000000000000000, 0.0 },
2be75957 284 { 1.0000000000000000, 0.0000000000000000, 5.0000000000000000,
b4688136 285 -1.0000000000000000, 0.0 },
2be75957 286 { 1.0000000000000000, 0.0000000000000000, 5.0000000000000000,
b4688136 287 0.0000000000000000, 0.0 },
2be75957 288 { 1.0000000000000000, 0.0000000000000000, 5.0000000000000000,
b4688136 289 1.0000000000000000, 0.0 },
2be75957 290 { 1.0000000000000000, 0.0000000000000000, 5.0000000000000000,
b4688136 291 2.0000000000000000, 0.0 },
2be75957 292 { 1.0000000000000000, 0.0000000000000000, 5.0000000000000000,
b4688136 293 3.0000000000000000, 0.0 },
2be75957 294 { 1.0000000000000000, 0.0000000000000000, 5.0000000000000000,
b4688136 295 4.0000000000000000, 0.0 },
2be75957 296 { 1.0000000000000000, 0.0000000000000000, 5.0000000000000000,
b4688136 297 5.0000000000000000, 0.0 },
2be75957 298 { 1.0000000000000000, 0.0000000000000000, 5.0000000000000000,
b4688136 299 6.0000000000000000, 0.0 },
2be75957 300 { 1.0000000000000000, 0.0000000000000000, 5.0000000000000000,
b4688136 301 7.0000000000000000, 0.0 },
2be75957 302 { 1.0000000000000000, 0.0000000000000000, 5.0000000000000000,
b4688136 303 8.0000000000000000, 0.0 },
2be75957 304 { 1.0000000000000000, 0.0000000000000000, 5.0000000000000000,
b4688136 305 9.0000000000000000, 0.0 },
2be75957 306 { 1.0000000000000000, 0.0000000000000000, 5.0000000000000000,
b4688136 307 10.000000000000000, 0.0 },
2be75957
ESR
308};
309const double toler005 = 2.5000000000000020e-13;
310
311// Test data for a=0.0000000000000000, c=6.0000000000000000.
b4688136 312// max(|f - f_GSL|): 0.0000000000000000 at index 0
2be75957 313// max(|f - f_GSL| / |f_GSL|): 0.0000000000000000
b4688136
ESR
314// mean(f - f_GSL): 0.0000000000000000
315// variance(f - f_GSL): 0.0000000000000000
316// stddev(f - f_GSL): 0.0000000000000000
2be75957
ESR
317const testcase_conf_hyperg<double>
318data006[21] =
319{
320 { 1.0000000000000000, 0.0000000000000000, 6.0000000000000000,
b4688136 321 -10.000000000000000, 0.0 },
2be75957 322 { 1.0000000000000000, 0.0000000000000000, 6.0000000000000000,
b4688136 323 -9.0000000000000000, 0.0 },
2be75957 324 { 1.0000000000000000, 0.0000000000000000, 6.0000000000000000,
b4688136 325 -8.0000000000000000, 0.0 },
2be75957 326 { 1.0000000000000000, 0.0000000000000000, 6.0000000000000000,
b4688136 327 -7.0000000000000000, 0.0 },
2be75957 328 { 1.0000000000000000, 0.0000000000000000, 6.0000000000000000,
b4688136 329 -6.0000000000000000, 0.0 },
2be75957 330 { 1.0000000000000000, 0.0000000000000000, 6.0000000000000000,
b4688136 331 -5.0000000000000000, 0.0 },
2be75957 332 { 1.0000000000000000, 0.0000000000000000, 6.0000000000000000,
b4688136 333 -4.0000000000000000, 0.0 },
2be75957 334 { 1.0000000000000000, 0.0000000000000000, 6.0000000000000000,
b4688136 335 -3.0000000000000000, 0.0 },
2be75957 336 { 1.0000000000000000, 0.0000000000000000, 6.0000000000000000,
b4688136 337 -2.0000000000000000, 0.0 },
2be75957 338 { 1.0000000000000000, 0.0000000000000000, 6.0000000000000000,
b4688136 339 -1.0000000000000000, 0.0 },
2be75957 340 { 1.0000000000000000, 0.0000000000000000, 6.0000000000000000,
b4688136 341 0.0000000000000000, 0.0 },
2be75957 342 { 1.0000000000000000, 0.0000000000000000, 6.0000000000000000,
b4688136 343 1.0000000000000000, 0.0 },
2be75957 344 { 1.0000000000000000, 0.0000000000000000, 6.0000000000000000,
b4688136 345 2.0000000000000000, 0.0 },
2be75957 346 { 1.0000000000000000, 0.0000000000000000, 6.0000000000000000,
b4688136 347 3.0000000000000000, 0.0 },
2be75957 348 { 1.0000000000000000, 0.0000000000000000, 6.0000000000000000,
b4688136 349 4.0000000000000000, 0.0 },
2be75957 350 { 1.0000000000000000, 0.0000000000000000, 6.0000000000000000,
b4688136 351 5.0000000000000000, 0.0 },
2be75957 352 { 1.0000000000000000, 0.0000000000000000, 6.0000000000000000,
b4688136 353 6.0000000000000000, 0.0 },
2be75957 354 { 1.0000000000000000, 0.0000000000000000, 6.0000000000000000,
b4688136 355 7.0000000000000000, 0.0 },
2be75957 356 { 1.0000000000000000, 0.0000000000000000, 6.0000000000000000,
b4688136 357 8.0000000000000000, 0.0 },
2be75957 358 { 1.0000000000000000, 0.0000000000000000, 6.0000000000000000,
b4688136 359 9.0000000000000000, 0.0 },
2be75957 360 { 1.0000000000000000, 0.0000000000000000, 6.0000000000000000,
b4688136 361 10.000000000000000, 0.0 },
2be75957
ESR
362};
363const double toler006 = 2.5000000000000020e-13;
364
365// Test data for a=0.0000000000000000, c=7.0000000000000000.
b4688136 366// max(|f - f_GSL|): 0.0000000000000000 at index 0
2be75957 367// max(|f - f_GSL| / |f_GSL|): 0.0000000000000000
b4688136
ESR
368// mean(f - f_GSL): 0.0000000000000000
369// variance(f - f_GSL): 0.0000000000000000
370// stddev(f - f_GSL): 0.0000000000000000
2be75957
ESR
371const testcase_conf_hyperg<double>
372data007[21] =
373{
374 { 1.0000000000000000, 0.0000000000000000, 7.0000000000000000,
b4688136 375 -10.000000000000000, 0.0 },
2be75957 376 { 1.0000000000000000, 0.0000000000000000, 7.0000000000000000,
b4688136 377 -9.0000000000000000, 0.0 },
2be75957 378 { 1.0000000000000000, 0.0000000000000000, 7.0000000000000000,
b4688136 379 -8.0000000000000000, 0.0 },
2be75957 380 { 1.0000000000000000, 0.0000000000000000, 7.0000000000000000,
b4688136 381 -7.0000000000000000, 0.0 },
2be75957 382 { 1.0000000000000000, 0.0000000000000000, 7.0000000000000000,
b4688136 383 -6.0000000000000000, 0.0 },
2be75957 384 { 1.0000000000000000, 0.0000000000000000, 7.0000000000000000,
b4688136 385 -5.0000000000000000, 0.0 },
2be75957 386 { 1.0000000000000000, 0.0000000000000000, 7.0000000000000000,
b4688136 387 -4.0000000000000000, 0.0 },
2be75957 388 { 1.0000000000000000, 0.0000000000000000, 7.0000000000000000,
b4688136 389 -3.0000000000000000, 0.0 },
2be75957 390 { 1.0000000000000000, 0.0000000000000000, 7.0000000000000000,
b4688136 391 -2.0000000000000000, 0.0 },
2be75957 392 { 1.0000000000000000, 0.0000000000000000, 7.0000000000000000,
b4688136 393 -1.0000000000000000, 0.0 },
2be75957 394 { 1.0000000000000000, 0.0000000000000000, 7.0000000000000000,
b4688136 395 0.0000000000000000, 0.0 },
2be75957 396 { 1.0000000000000000, 0.0000000000000000, 7.0000000000000000,
b4688136 397 1.0000000000000000, 0.0 },
2be75957 398 { 1.0000000000000000, 0.0000000000000000, 7.0000000000000000,
b4688136 399 2.0000000000000000, 0.0 },
2be75957 400 { 1.0000000000000000, 0.0000000000000000, 7.0000000000000000,
b4688136 401 3.0000000000000000, 0.0 },
2be75957 402 { 1.0000000000000000, 0.0000000000000000, 7.0000000000000000,
b4688136 403 4.0000000000000000, 0.0 },
2be75957 404 { 1.0000000000000000, 0.0000000000000000, 7.0000000000000000,
b4688136 405 5.0000000000000000, 0.0 },
2be75957 406 { 1.0000000000000000, 0.0000000000000000, 7.0000000000000000,
b4688136 407 6.0000000000000000, 0.0 },
2be75957 408 { 1.0000000000000000, 0.0000000000000000, 7.0000000000000000,
b4688136 409 7.0000000000000000, 0.0 },
2be75957 410 { 1.0000000000000000, 0.0000000000000000, 7.0000000000000000,
b4688136 411 8.0000000000000000, 0.0 },
2be75957 412 { 1.0000000000000000, 0.0000000000000000, 7.0000000000000000,
b4688136 413 9.0000000000000000, 0.0 },
2be75957 414 { 1.0000000000000000, 0.0000000000000000, 7.0000000000000000,
b4688136 415 10.000000000000000, 0.0 },
2be75957
ESR
416};
417const double toler007 = 2.5000000000000020e-13;
418
419// Test data for a=0.0000000000000000, c=8.0000000000000000.
b4688136 420// max(|f - f_GSL|): 0.0000000000000000 at index 0
2be75957 421// max(|f - f_GSL| / |f_GSL|): 0.0000000000000000
b4688136
ESR
422// mean(f - f_GSL): 0.0000000000000000
423// variance(f - f_GSL): 0.0000000000000000
424// stddev(f - f_GSL): 0.0000000000000000
2be75957
ESR
425const testcase_conf_hyperg<double>
426data008[21] =
427{
428 { 1.0000000000000000, 0.0000000000000000, 8.0000000000000000,
b4688136 429 -10.000000000000000, 0.0 },
2be75957 430 { 1.0000000000000000, 0.0000000000000000, 8.0000000000000000,
b4688136 431 -9.0000000000000000, 0.0 },
2be75957 432 { 1.0000000000000000, 0.0000000000000000, 8.0000000000000000,
b4688136 433 -8.0000000000000000, 0.0 },
2be75957 434 { 1.0000000000000000, 0.0000000000000000, 8.0000000000000000,
b4688136 435 -7.0000000000000000, 0.0 },
2be75957 436 { 1.0000000000000000, 0.0000000000000000, 8.0000000000000000,
b4688136 437 -6.0000000000000000, 0.0 },
2be75957 438 { 1.0000000000000000, 0.0000000000000000, 8.0000000000000000,
b4688136 439 -5.0000000000000000, 0.0 },
2be75957 440 { 1.0000000000000000, 0.0000000000000000, 8.0000000000000000,
b4688136 441 -4.0000000000000000, 0.0 },
2be75957 442 { 1.0000000000000000, 0.0000000000000000, 8.0000000000000000,
b4688136 443 -3.0000000000000000, 0.0 },
2be75957 444 { 1.0000000000000000, 0.0000000000000000, 8.0000000000000000,
b4688136 445 -2.0000000000000000, 0.0 },
2be75957 446 { 1.0000000000000000, 0.0000000000000000, 8.0000000000000000,
b4688136 447 -1.0000000000000000, 0.0 },
2be75957 448 { 1.0000000000000000, 0.0000000000000000, 8.0000000000000000,
b4688136 449 0.0000000000000000, 0.0 },
2be75957 450 { 1.0000000000000000, 0.0000000000000000, 8.0000000000000000,
b4688136 451 1.0000000000000000, 0.0 },
2be75957 452 { 1.0000000000000000, 0.0000000000000000, 8.0000000000000000,
b4688136 453 2.0000000000000000, 0.0 },
2be75957 454 { 1.0000000000000000, 0.0000000000000000, 8.0000000000000000,
b4688136 455 3.0000000000000000, 0.0 },
2be75957 456 { 1.0000000000000000, 0.0000000000000000, 8.0000000000000000,
b4688136 457 4.0000000000000000, 0.0 },
2be75957 458 { 1.0000000000000000, 0.0000000000000000, 8.0000000000000000,
b4688136 459 5.0000000000000000, 0.0 },
2be75957 460 { 1.0000000000000000, 0.0000000000000000, 8.0000000000000000,
b4688136 461 6.0000000000000000, 0.0 },
2be75957 462 { 1.0000000000000000, 0.0000000000000000, 8.0000000000000000,
b4688136 463 7.0000000000000000, 0.0 },
2be75957 464 { 1.0000000000000000, 0.0000000000000000, 8.0000000000000000,
b4688136 465 8.0000000000000000, 0.0 },
2be75957 466 { 1.0000000000000000, 0.0000000000000000, 8.0000000000000000,
b4688136 467 9.0000000000000000, 0.0 },
2be75957 468 { 1.0000000000000000, 0.0000000000000000, 8.0000000000000000,
b4688136 469 10.000000000000000, 0.0 },
2be75957
ESR
470};
471const double toler008 = 2.5000000000000020e-13;
472
473// Test data for a=0.0000000000000000, c=9.0000000000000000.
b4688136 474// max(|f - f_GSL|): 0.0000000000000000 at index 0
2be75957 475// max(|f - f_GSL| / |f_GSL|): 0.0000000000000000
b4688136
ESR
476// mean(f - f_GSL): 0.0000000000000000
477// variance(f - f_GSL): 0.0000000000000000
478// stddev(f - f_GSL): 0.0000000000000000
2be75957
ESR
479const testcase_conf_hyperg<double>
480data009[21] =
481{
482 { 1.0000000000000000, 0.0000000000000000, 9.0000000000000000,
b4688136 483 -10.000000000000000, 0.0 },
2be75957 484 { 1.0000000000000000, 0.0000000000000000, 9.0000000000000000,
b4688136 485 -9.0000000000000000, 0.0 },
2be75957 486 { 1.0000000000000000, 0.0000000000000000, 9.0000000000000000,
b4688136 487 -8.0000000000000000, 0.0 },
2be75957 488 { 1.0000000000000000, 0.0000000000000000, 9.0000000000000000,
b4688136 489 -7.0000000000000000, 0.0 },
2be75957 490 { 1.0000000000000000, 0.0000000000000000, 9.0000000000000000,
b4688136 491 -6.0000000000000000, 0.0 },
2be75957 492 { 1.0000000000000000, 0.0000000000000000, 9.0000000000000000,
b4688136 493 -5.0000000000000000, 0.0 },
2be75957 494 { 1.0000000000000000, 0.0000000000000000, 9.0000000000000000,
b4688136 495 -4.0000000000000000, 0.0 },
2be75957 496 { 1.0000000000000000, 0.0000000000000000, 9.0000000000000000,
b4688136 497 -3.0000000000000000, 0.0 },
2be75957 498 { 1.0000000000000000, 0.0000000000000000, 9.0000000000000000,
b4688136 499 -2.0000000000000000, 0.0 },
2be75957 500 { 1.0000000000000000, 0.0000000000000000, 9.0000000000000000,
b4688136 501 -1.0000000000000000, 0.0 },
2be75957 502 { 1.0000000000000000, 0.0000000000000000, 9.0000000000000000,
b4688136 503 0.0000000000000000, 0.0 },
2be75957 504 { 1.0000000000000000, 0.0000000000000000, 9.0000000000000000,
b4688136 505 1.0000000000000000, 0.0 },
2be75957 506 { 1.0000000000000000, 0.0000000000000000, 9.0000000000000000,
b4688136 507 2.0000000000000000, 0.0 },
2be75957 508 { 1.0000000000000000, 0.0000000000000000, 9.0000000000000000,
b4688136 509 3.0000000000000000, 0.0 },
2be75957 510 { 1.0000000000000000, 0.0000000000000000, 9.0000000000000000,
b4688136 511 4.0000000000000000, 0.0 },
2be75957 512 { 1.0000000000000000, 0.0000000000000000, 9.0000000000000000,
b4688136 513 5.0000000000000000, 0.0 },
2be75957 514 { 1.0000000000000000, 0.0000000000000000, 9.0000000000000000,
b4688136 515 6.0000000000000000, 0.0 },
2be75957 516 { 1.0000000000000000, 0.0000000000000000, 9.0000000000000000,
b4688136 517 7.0000000000000000, 0.0 },
2be75957 518 { 1.0000000000000000, 0.0000000000000000, 9.0000000000000000,
b4688136 519 8.0000000000000000, 0.0 },
2be75957 520 { 1.0000000000000000, 0.0000000000000000, 9.0000000000000000,
b4688136 521 9.0000000000000000, 0.0 },
2be75957 522 { 1.0000000000000000, 0.0000000000000000, 9.0000000000000000,
b4688136 523 10.000000000000000, 0.0 },
2be75957
ESR
524};
525const double toler009 = 2.5000000000000020e-13;
526
527// Test data for a=0.0000000000000000, c=10.000000000000000.
b4688136 528// max(|f - f_GSL|): 0.0000000000000000 at index 0
2be75957 529// max(|f - f_GSL| / |f_GSL|): 0.0000000000000000
b4688136
ESR
530// mean(f - f_GSL): 0.0000000000000000
531// variance(f - f_GSL): 0.0000000000000000
532// stddev(f - f_GSL): 0.0000000000000000
2be75957
ESR
533const testcase_conf_hyperg<double>
534data010[21] =
535{
536 { 1.0000000000000000, 0.0000000000000000, 10.000000000000000,
b4688136 537 -10.000000000000000, 0.0 },
2be75957 538 { 1.0000000000000000, 0.0000000000000000, 10.000000000000000,
b4688136 539 -9.0000000000000000, 0.0 },
2be75957 540 { 1.0000000000000000, 0.0000000000000000, 10.000000000000000,
b4688136 541 -8.0000000000000000, 0.0 },
2be75957 542 { 1.0000000000000000, 0.0000000000000000, 10.000000000000000,
b4688136 543 -7.0000000000000000, 0.0 },
2be75957 544 { 1.0000000000000000, 0.0000000000000000, 10.000000000000000,
b4688136 545 -6.0000000000000000, 0.0 },
2be75957 546 { 1.0000000000000000, 0.0000000000000000, 10.000000000000000,
b4688136 547 -5.0000000000000000, 0.0 },
2be75957 548 { 1.0000000000000000, 0.0000000000000000, 10.000000000000000,
b4688136 549 -4.0000000000000000, 0.0 },
2be75957 550 { 1.0000000000000000, 0.0000000000000000, 10.000000000000000,
b4688136 551 -3.0000000000000000, 0.0 },
2be75957 552 { 1.0000000000000000, 0.0000000000000000, 10.000000000000000,
b4688136 553 -2.0000000000000000, 0.0 },
2be75957 554 { 1.0000000000000000, 0.0000000000000000, 10.000000000000000,
b4688136 555 -1.0000000000000000, 0.0 },
2be75957 556 { 1.0000000000000000, 0.0000000000000000, 10.000000000000000,
b4688136 557 0.0000000000000000, 0.0 },
2be75957 558 { 1.0000000000000000, 0.0000000000000000, 10.000000000000000,
b4688136 559 1.0000000000000000, 0.0 },
2be75957 560 { 1.0000000000000000, 0.0000000000000000, 10.000000000000000,
b4688136 561 2.0000000000000000, 0.0 },
2be75957 562 { 1.0000000000000000, 0.0000000000000000, 10.000000000000000,
b4688136 563 3.0000000000000000, 0.0 },
2be75957 564 { 1.0000000000000000, 0.0000000000000000, 10.000000000000000,
b4688136 565 4.0000000000000000, 0.0 },
2be75957 566 { 1.0000000000000000, 0.0000000000000000, 10.000000000000000,
b4688136 567 5.0000000000000000, 0.0 },
2be75957 568 { 1.0000000000000000, 0.0000000000000000, 10.000000000000000,
b4688136 569 6.0000000000000000, 0.0 },
2be75957 570 { 1.0000000000000000, 0.0000000000000000, 10.000000000000000,
b4688136 571 7.0000000000000000, 0.0 },
2be75957 572 { 1.0000000000000000, 0.0000000000000000, 10.000000000000000,
b4688136 573 8.0000000000000000, 0.0 },
2be75957 574 { 1.0000000000000000, 0.0000000000000000, 10.000000000000000,
b4688136 575 9.0000000000000000, 0.0 },
2be75957 576 { 1.0000000000000000, 0.0000000000000000, 10.000000000000000,
b4688136 577 10.000000000000000, 0.0 },
2be75957
ESR
578};
579const double toler010 = 2.5000000000000020e-13;
580
581// Test data for a=0.50000000000000000, c=1.0000000000000000.
b4688136 582// max(|f - f_GSL|): 1.1823431123048067e-11 at index 20
2be75957 583// max(|f - f_GSL| / |f_GSL|): 1.8179920344425603e-13
b4688136
ESR
584// mean(f - f_GSL): -5.8836665698233256e-13
585// variance(f - f_GSL): 6.6269003617242792e-24
586// stddev(f - f_GSL): 2.5742766676727424e-12
2be75957
ESR
587const testcase_conf_hyperg<double>
588data011[21] =
589{
590 { 0.18354081260932842, 0.50000000000000000, 1.0000000000000000,
b4688136 591 -10.000000000000000, 0.0 },
2be75957 592 { 0.19419827762834704, 0.50000000000000000, 1.0000000000000000,
b4688136 593 -9.0000000000000000, 0.0 },
2be75957 594 { 0.20700192122398287, 0.50000000000000000, 1.0000000000000000,
b4688136 595 -8.0000000000000000, 0.0 },
2be75957 596 { 0.22280243801078498, 0.50000000000000000, 1.0000000000000000,
b4688136 597 -7.0000000000000000, 0.0 },
2be75957 598 { 0.24300035416182644, 0.50000000000000000, 1.0000000000000000,
b4688136 599 -6.0000000000000000, 0.0 },
2be75957 600 { 0.27004644161220326, 0.50000000000000000, 1.0000000000000000,
b4688136 601 -5.0000000000000000, 0.0 },
2be75957 602 { 0.30850832255367100, 0.50000000000000000, 1.0000000000000000,
b4688136 603 -4.0000000000000000, 0.0 },
2be75957 604 { 0.36743360905415834, 0.50000000000000000, 1.0000000000000000,
b4688136 605 -3.0000000000000000, 0.0 },
2be75957 606 { 0.46575960759364043, 0.50000000000000000, 1.0000000000000000,
b4688136 607 -2.0000000000000000, 0.0 },
2be75957 608 { 0.64503527044915010, 0.50000000000000000, 1.0000000000000000,
b4688136 609 -1.0000000000000000, 0.0 },
2be75957 610 { 1.0000000000000000, 0.50000000000000000, 1.0000000000000000,
b4688136 611 0.0000000000000000, 0.0 },
2be75957 612 { 1.7533876543770910, 0.50000000000000000, 1.0000000000000000,
b4688136 613 1.0000000000000000, 0.0 },
2be75957 614 { 3.4415238691253340, 0.50000000000000000, 1.0000000000000000,
b4688136 615 2.0000000000000000, 0.0 },
2be75957 616 { 7.3801013214774045, 0.50000000000000000, 1.0000000000000000,
b4688136 617 3.0000000000000000, 0.0 },
2be75957 618 { 16.843983681258987, 0.50000000000000000, 1.0000000000000000,
b4688136 619 4.0000000000000000, 0.0 },
2be75957 620 { 40.078445504076420, 0.50000000000000000, 1.0000000000000000,
b4688136 621 5.0000000000000000, 0.0 },
2be75957 622 { 98.033339697812693, 0.50000000000000000, 1.0000000000000000,
b4688136 623 6.0000000000000000, 0.0 },
2be75957 624 { 244.33254130132138, 0.50000000000000000, 1.0000000000000000,
b4688136 625 7.0000000000000000, 0.0 },
2be75957 626 { 617.06403040562441, 0.50000000000000000, 1.0000000000000000,
b4688136 627 8.0000000000000000, 0.0 },
2be75957 628 { 1573.6049422133694, 0.50000000000000000, 1.0000000000000000,
b4688136 629 9.0000000000000000, 0.0 },
2be75957 630 { 4042.7554308904109, 0.50000000000000000, 1.0000000000000000,
b4688136 631 10.000000000000000, 0.0 },
2be75957
ESR
632};
633const double toler011 = 1.0000000000000006e-11;
634
635// Test data for a=0.50000000000000000, c=2.0000000000000000.
b4688136 636// max(|f - f_GSL|): 1.0231815394945443e-12 at index 20
2be75957 637// max(|f - f_GSL| / |f_GSL|): 2.3738284297189904e-15
b4688136
ESR
638// mean(f - f_GSL): -5.2558486663385687e-14
639// variance(f - f_GSL): 4.9460728311082100e-26
640// stddev(f - f_GSL): 2.2239768054339527e-13
2be75957
ESR
641const testcase_conf_hyperg<double>
642data012[21] =
643{
644 { 0.34751307955387056, 0.50000000000000000, 2.0000000000000000,
b4688136 645 -10.000000000000000, 0.0 },
2be75957 646 { 0.36515709992587503, 0.50000000000000000, 2.0000000000000000,
b4688136 647 -9.0000000000000000, 0.0 },
2be75957 648 { 0.38575276072642301, 0.50000000000000000, 2.0000000000000000,
b4688136 649 -8.0000000000000000, 0.0 },
2be75957 650 { 0.41020241461382889, 0.50000000000000000, 2.0000000000000000,
b4688136 651 -7.0000000000000000, 0.0 },
2be75957 652 { 0.43982706745912625, 0.50000000000000000, 2.0000000000000000,
b4688136 653 -6.0000000000000000, 0.0 },
2be75957 654 { 0.47663109114346930, 0.50000000000000000, 2.0000000000000000,
b4688136 655 -5.0000000000000000, 0.0 },
2be75957 656 { 0.52377761180260862, 0.50000000000000000, 2.0000000000000000,
b4688136 657 -4.0000000000000000, 0.0 },
2be75957 658 { 0.58647299647508400, 0.50000000000000000, 2.0000000000000000,
b4688136 659 -3.0000000000000000, 0.0 },
2be75957 660 { 0.67367002294334866, 0.50000000000000000, 2.0000000000000000,
b4688136 661 -2.0000000000000000, 0.0 },
2be75957 662 { 0.80145607363402172, 0.50000000000000000, 2.0000000000000000,
b4688136 663 -1.0000000000000000, 0.0 },
2be75957 664 { 1.0000000000000000, 0.50000000000000000, 2.0000000000000000,
b4688136 665 0.0000000000000000, 0.0 },
2be75957 666 { 1.3281918274866849, 0.50000000000000000, 2.0000000000000000,
b4688136 667 1.0000000000000000, 0.0 },
2be75957 668 { 1.9052621465543667, 0.50000000000000000, 2.0000000000000000,
b4688136 669 2.0000000000000000, 0.0 },
2be75957 670 { 2.9805776178019903, 0.50000000000000000, 2.0000000000000000,
b4688136 671 3.0000000000000000, 0.0 },
2be75957 672 { 5.0906787293171654, 0.50000000000000000, 2.0000000000000000,
b4688136 673 4.0000000000000000, 0.0 },
2be75957 674 { 9.4185650450425982, 0.50000000000000000, 2.0000000000000000,
b4688136 675 5.0000000000000000, 0.0 },
2be75957 676 { 18.627776225142014, 0.50000000000000000, 2.0000000000000000,
b4688136 677 6.0000000000000000, 0.0 },
2be75957 678 { 38.823513069699622, 0.50000000000000000, 2.0000000000000000,
b4688136 679 7.0000000000000000, 0.0 },
2be75957 680 { 84.215287700426956, 0.50000000000000000, 2.0000000000000000,
b4688136 681 8.0000000000000000, 0.0 },
2be75957 682 { 188.31125697734257, 0.50000000000000000, 2.0000000000000000,
b4688136 683 9.0000000000000000, 0.0 },
2be75957 684 { 431.02590173952319, 0.50000000000000000, 2.0000000000000000,
b4688136 685 10.000000000000000, 0.0 },
2be75957
ESR
686};
687const double toler012 = 2.5000000000000020e-13;
688
689// Test data for a=0.50000000000000000, c=3.0000000000000000.
b4688136 690// max(|f - f_GSL|): 2.4158453015843406e-13 at index 20
2be75957 691// max(|f - f_GSL| / |f_GSL|): 2.5938546713928606e-15
b4688136
ESR
692// mean(f - f_GSL): -1.2672402809650001e-14
693// variance(f - f_GSL): 2.7510400074856614e-27
694// stddev(f - f_GSL): 5.2450357553458695e-14
2be75957
ESR
695const testcase_conf_hyperg<double>
696data013[21] =
697{
698 { 0.44148780381255504, 0.50000000000000000, 3.0000000000000000,
b4688136 699 -10.000000000000000, 0.0 },
2be75957 700 { 0.46154890030153722, 0.50000000000000000, 3.0000000000000000,
b4688136 701 -9.0000000000000000, 0.0 },
2be75957 702 { 0.48454520771815751, 0.50000000000000000, 3.0000000000000000,
b4688136 703 -8.0000000000000000, 0.0 },
2be75957 704 { 0.51124131917976301, 0.50000000000000000, 3.0000000000000000,
b4688136 705 -7.0000000000000000, 0.0 },
2be75957 706 { 0.54269682032387934, 0.50000000000000000, 3.0000000000000000,
b4688136 707 -6.0000000000000000, 0.0 },
2be75957 708 { 0.58041888164962119, 0.50000000000000000, 3.0000000000000000,
b4688136 709 -5.0000000000000000, 0.0 },
2be75957 710 { 0.62661371932049892, 0.50000000000000000, 3.0000000000000000,
b4688136 711 -4.0000000000000000, 0.0 },
2be75957 712 { 0.68461315644636744, 0.50000000000000000, 3.0000000000000000,
b4688136 713 -3.0000000000000000, 0.0 },
2be75957 714 { 0.75961975369132639, 0.50000000000000000, 3.0000000000000000,
b4688136 715 -2.0000000000000000, 0.0 },
2be75957 716 { 0.86004702726553350, 0.50000000000000000, 3.0000000000000000,
b4688136 717 -1.0000000000000000, 0.0 },
2be75957 718 { 1.0000000000000000, 0.50000000000000000, 3.0000000000000000,
b4688136 719 0.0000000000000000, 0.0 },
2be75957 720 { 1.2039946674617061, 0.50000000000000000, 3.0000000000000000,
b4688136 721 1.0000000000000000, 0.0 },
2be75957 722 { 1.5161750470251780, 0.50000000000000000, 3.0000000000000000,
b4688136 723 2.0000000000000000, 0.0 },
2be75957 724 { 2.0187596221024697, 0.50000000000000000, 3.0000000000000000,
b4688136 725 3.0000000000000000, 0.0 },
2be75957 726 { 2.8698033217756134, 0.50000000000000000, 3.0000000000000000,
b4688136 727 4.0000000000000000, 0.0 },
2be75957 728 { 4.3821186043144449, 0.50000000000000000, 3.0000000000000000,
b4688136 729 5.0000000000000000, 0.0 },
2be75957 730 { 7.1913541951514235, 0.50000000000000000, 3.0000000000000000,
b4688136 731 6.0000000000000000, 0.0 },
2be75957 732 { 12.620107286909638, 0.50000000000000000, 3.0000000000000000,
b4688136 733 7.0000000000000000, 0.0 },
2be75957 734 { 23.478926483036361, 0.50000000000000000, 3.0000000000000000,
b4688136 735 8.0000000000000000, 0.0 },
2be75957 736 { 45.852981860749047, 0.50000000000000000, 3.0000000000000000,
b4688136 737 9.0000000000000000, 0.0 },
2be75957 738 { 93.137265099245838, 0.50000000000000000, 3.0000000000000000,
b4688136 739 10.000000000000000, 0.0 },
2be75957
ESR
740};
741const double toler013 = 2.5000000000000020e-13;
742
743// Test data for a=0.50000000000000000, c=4.0000000000000000.
b4688136 744// max(|f - f_GSL|): 9.2370555648813024e-14 at index 20
2be75957 745// max(|f - f_GSL| / |f_GSL|): 3.0116140491179400e-15
b4688136
ESR
746// mean(f - f_GSL): -4.1977003883446396e-15
747// variance(f - f_GSL): 4.0815875125113411e-28
748// stddev(f - f_GSL): 2.0202939173574080e-14
2be75957
ESR
749const testcase_conf_hyperg<double>
750data014[21] =
751{
752 { 0.50723143075298205, 0.50000000000000000, 4.0000000000000000,
b4688136 753 -10.000000000000000, 0.0 },
2be75957 754 { 0.52815420026166782, 0.50000000000000000, 4.0000000000000000,
b4688136 755 -9.0000000000000000, 0.0 },
2be75957 756 { 0.55181651516426766, 0.50000000000000000, 4.0000000000000000,
b4688136 757 -8.0000000000000000, 0.0 },
2be75957 758 { 0.57884767287882366, 0.50000000000000000, 4.0000000000000000,
b4688136 759 -7.0000000000000000, 0.0 },
2be75957 760 { 0.61008828324275399, 0.50000000000000000, 4.0000000000000000,
b4688136 761 -6.0000000000000000, 0.0 },
2be75957 762 { 0.64668451853659259, 0.50000000000000000, 4.0000000000000000,
b4688136 763 -5.0000000000000000, 0.0 },
2be75957 764 { 0.69023479867386495, 0.50000000000000000, 4.0000000000000000,
b4688136 765 -4.0000000000000000, 0.0 },
2be75957 766 { 0.74302365975861406, 0.50000000000000000, 4.0000000000000000,
b4688136 767 -3.0000000000000000, 0.0 },
2be75957 768 { 0.80840402753201868, 0.50000000000000000, 4.0000000000000000,
b4688136 769 -2.0000000000000000, 0.0 },
2be75957 770 { 0.89143814400301236, 0.50000000000000000, 4.0000000000000000,
b4688136 771 -1.0000000000000000, 0.0 },
2be75957 772 { 1.0000000000000000, 0.50000000000000000, 4.0000000000000000,
b4688136 773 0.0000000000000000, 0.0 },
2be75957 774 { 1.1467204168940972, 0.50000000000000000, 4.0000000000000000,
b4688136 775 1.0000000000000000, 0.0 },
2be75957 776 { 1.3525055369951857, 0.50000000000000000, 4.0000000000000000,
b4688136 777 2.0000000000000000, 0.0 },
2be75957 778 { 1.6530571499633475, 0.50000000000000000, 4.0000000000000000,
b4688136 779 3.0000000000000000, 0.0 },
2be75957 780 { 2.1112387416058045, 0.50000000000000000, 4.0000000000000000,
b4688136 781 4.0000000000000000, 0.0 },
2be75957 782 { 2.8410480336278199, 0.50000000000000000, 4.0000000000000000,
b4688136 783 5.0000000000000000, 0.0 },
2be75957 784 { 4.0550562221854713, 0.50000000000000000, 4.0000000000000000,
b4688136 785 6.0000000000000000, 0.0 },
2be75957 786 { 6.1601039044778583, 0.50000000000000000, 4.0000000000000000,
b4688136 787 7.0000000000000000, 0.0 },
2be75957 788 { 9.9538034144264511, 0.50000000000000000, 4.0000000000000000,
b4688136 789 8.0000000000000000, 0.0 },
2be75957 790 { 17.034704868473916, 0.50000000000000000, 4.0000000000000000,
b4688136 791 9.0000000000000000, 0.0 },
2be75957 792 { 30.671445325428429, 0.50000000000000000, 4.0000000000000000,
b4688136 793 10.000000000000000, 0.0 },
2be75957
ESR
794};
795const double toler014 = 2.5000000000000020e-13;
796
797// Test data for a=0.50000000000000000, c=5.0000000000000000.
b4688136 798// max(|f - f_GSL|): 3.5527136788005009e-14 at index 20
2be75957 799// max(|f - f_GSL| / |f_GSL|): 2.6053493022967024e-15
b4688136
ESR
800// mean(f - f_GSL): -1.8503717077085944e-15
801// variance(f - f_GSL): 5.9541536579357277e-29
802// stddev(f - f_GSL): 7.7163162570851951e-15
2be75957
ESR
803const testcase_conf_hyperg<double>
804data015[21] =
805{
806 { 0.55715239162383312, 0.50000000000000000, 5.0000000000000000,
b4688136 807 -10.000000000000000, 0.0 },
2be75957 808 { 0.57823135269518977, 0.50000000000000000, 5.0000000000000000,
b4688136 809 -9.0000000000000000, 0.0 },
2be75957 810 { 0.60181688556797253, 0.50000000000000000, 5.0000000000000000,
b4688136 811 -8.0000000000000000, 0.0 },
2be75957 812 { 0.62842688147829928, 0.50000000000000000, 5.0000000000000000,
b4688136 813 -7.0000000000000000, 0.0 },
2be75957 814 { 0.65873434489521876, 0.50000000000000000, 5.0000000000000000,
b4688136 815 -6.0000000000000000, 0.0 },
2be75957 816 { 0.69362872731932568, 0.50000000000000000, 5.0000000000000000,
b4688136 817 -5.0000000000000000, 0.0 },
2be75957 818 { 0.73430741618153195, 0.50000000000000000, 5.0000000000000000,
b4688136 819 -4.0000000000000000, 0.0 },
2be75957 820 { 0.78241503593870543, 0.50000000000000000, 5.0000000000000000,
b4688136 821 -3.0000000000000000, 0.0 },
2be75957 822 { 0.84026013345254857, 0.50000000000000000, 5.0000000000000000,
b4688136 823 -2.0000000000000000, 0.0 },
2be75957 824 { 0.91115976433208690, 0.50000000000000000, 5.0000000000000000,
b4688136 825 -1.0000000000000000, 0.0 },
2be75957 826 { 1.0000000000000000, 0.50000000000000000, 5.0000000000000000,
b4688136 827 0.0000000000000000, 0.0 },
2be75957 828 { 1.1141687602185972, 0.50000000000000000, 5.0000000000000000,
b4688136 829 1.0000000000000000, 0.0 },
2be75957 830 { 1.2651443108002267, 0.50000000000000000, 5.0000000000000000,
b4688136 831 2.0000000000000000, 0.0 },
2be75957 832 { 1.4712624889419719, 0.50000000000000000, 5.0000000000000000,
b4688136 833 3.0000000000000000, 0.0 },
2be75957 834 { 1.7626460645467978, 0.50000000000000000, 5.0000000000000000,
b4688136 835 4.0000000000000000, 0.0 },
2be75957 836 { 2.1901779328181084, 0.50000000000000000, 5.0000000000000000,
b4688136 837 5.0000000000000000, 0.0 },
2be75957 838 { 2.8421796979457090, 0.50000000000000000, 5.0000000000000000,
b4688136 839 6.0000000000000000, 0.0 },
2be75957 840 { 3.8760354586203540, 0.50000000000000000, 5.0000000000000000,
b4688136 841 7.0000000000000000, 0.0 },
2be75957 842 { 5.5792940156545541, 0.50000000000000000, 5.0000000000000000,
b4688136 843 8.0000000000000000, 0.0 },
2be75957 844 { 8.4898429002463303, 0.50000000000000000, 5.0000000000000000,
b4688136 845 9.0000000000000000, 0.0 },
2be75957 846 { 13.636227878037948, 0.50000000000000000, 5.0000000000000000,
b4688136 847 10.000000000000000, 0.0 },
2be75957
ESR
848};
849const double toler015 = 2.5000000000000020e-13;
850
851// Test data for a=0.50000000000000000, c=6.0000000000000000.
b4688136 852// max(|f - f_GSL|): 2.1316282072803006e-14 at index 20
2be75957 853// max(|f - f_GSL| / |f_GSL|): 2.8121163355193836e-15
b4688136
ESR
854// mean(f - f_GSL): -1.1525172350870673e-15
855// variance(f - f_GSL): 2.1345314152612258e-29
856// stddev(f - f_GSL): 4.6200989332061126e-15
2be75957
ESR
857const testcase_conf_hyperg<double>
858data016[21] =
859{
860 { 0.59687111919499192, 0.50000000000000000, 6.0000000000000000,
b4688136 861 -10.000000000000000, 0.0 },
2be75957 862 { 0.61774982278057033, 0.50000000000000000, 6.0000000000000000,
b4688136 863 -9.0000000000000000, 0.0 },
2be75957 864 { 0.64090744485124451, 0.50000000000000000, 6.0000000000000000,
b4688136 865 -8.0000000000000000, 0.0 },
2be75957 866 { 0.66677322792860194, 0.50000000000000000, 6.0000000000000000,
b4688136 867 -7.0000000000000000, 0.0 },
2be75957 868 { 0.69589293014100995, 0.50000000000000000, 6.0000000000000000,
b4688136 869 -6.0000000000000000, 0.0 },
2be75957 870 { 0.72897040032571048, 0.50000000000000000, 6.0000000000000000,
b4688136 871 -5.0000000000000000, 0.0 },
2be75957 872 { 0.76692755408207181, 0.50000000000000000, 6.0000000000000000,
b4688136 873 -4.0000000000000000, 0.0 },
2be75957 874 { 0.81099244559101891, 0.50000000000000000, 6.0000000000000000,
b4688136 875 -3.0000000000000000, 0.0 },
2be75957 876 { 0.86283102401276535, 0.50000000000000000, 6.0000000000000000,
b4688136 877 -2.0000000000000000, 0.0 },
2be75957 878 { 0.92474809223976406, 0.50000000000000000, 6.0000000000000000,
b4688136 879 -1.0000000000000000, 0.0 },
2be75957 880 { 1.0000000000000000, 0.50000000000000000, 6.0000000000000000,
b4688136 881 0.0000000000000000, 0.0 },
2be75957 882 { 1.0932912594628821, 0.50000000000000000, 6.0000000000000000,
b4688136 883 1.0000000000000000, 0.0 },
2be75957 884 { 1.2115798426781204, 0.50000000000000000, 6.0000000000000000,
b4688136 885 2.0000000000000000, 0.0 },
2be75957 886 { 1.3654106750890422, 0.50000000000000000, 6.0000000000000000,
b4688136 887 3.0000000000000000, 0.0 },
2be75957 888 { 1.5711704305419896, 0.50000000000000000, 6.0000000000000000,
b4688136 889 4.0000000000000000, 0.0 },
2be75957 890 { 1.8549798357448213, 0.50000000000000000, 6.0000000000000000,
b4688136 891 5.0000000000000000, 0.0 },
2be75957 892 { 2.2595503871694826, 0.50000000000000000, 6.0000000000000000,
b4688136 893 6.0000000000000000, 0.0 },
2be75957 894 { 2.8565038772876932, 0.50000000000000000, 6.0000000000000000,
b4688136 895 7.0000000000000000, 0.0 },
2be75957 896 { 3.7689325736317838, 0.50000000000000000, 6.0000000000000000,
b4688136 897 8.0000000000000000, 0.0 },
2be75957 898 { 5.2134738554699531, 0.50000000000000000, 6.0000000000000000,
b4688136 899 9.0000000000000000, 0.0 },
2be75957 900 { 7.5801565545352858, 0.50000000000000000, 6.0000000000000000,
b4688136 901 10.000000000000000, 0.0 },
2be75957
ESR
902};
903const double toler016 = 2.5000000000000020e-13;
904
905// Test data for a=0.50000000000000000, c=7.0000000000000000.
b4688136 906// max(|f - f_GSL|): 1.2434497875801753e-14 at index 20
2be75957 907// max(|f - f_GSL| / |f_GSL|): 2.5039514520700816e-15
b4688136
ESR
908// mean(f - f_GSL): -8.2473710400725917e-16
909// variance(f - f_GSL): 7.0762936218606606e-30
910// stddev(f - f_GSL): 2.6601303768538602e-15
2be75957
ESR
911const testcase_conf_hyperg<double>
912data017[21] =
913{
914 { 0.62946736953754079, 0.50000000000000000, 7.0000000000000000,
b4688136 915 -10.000000000000000, 0.0 },
2be75957 916 { 0.64995830964827050, 0.50000000000000000, 7.0000000000000000,
b4688136 917 -9.0000000000000000, 0.0 },
2be75957 918 { 0.67251910396276349, 0.50000000000000000, 7.0000000000000000,
b4688136 919 -8.0000000000000000, 0.0 },
2be75957 920 { 0.69750870596083636, 0.50000000000000000, 7.0000000000000000,
b4688136 921 -7.0000000000000000, 0.0 },
2be75957 922 { 0.72537539174856436, 0.50000000000000000, 7.0000000000000000,
b4688136 923 -6.0000000000000000, 0.0 },
2be75957 924 { 0.75668588434835504, 0.50000000000000000, 7.0000000000000000,
b4688136 925 -5.0000000000000000, 0.0 },
2be75957 926 { 0.79216623458879654, 0.50000000000000000, 7.0000000000000000,
b4688136 927 -4.0000000000000000, 0.0 },
2be75957 928 { 0.83276010491326891, 0.50000000000000000, 7.0000000000000000,
b4688136 929 -3.0000000000000000, 0.0 },
2be75957 930 { 0.87971323375878940, 0.50000000000000000, 7.0000000000000000,
b4688136 931 -2.0000000000000000, 0.0 },
2be75957 932 { 0.93469794840150233, 0.50000000000000000, 7.0000000000000000,
b4688136 933 -1.0000000000000000, 0.0 },
2be75957 934 { 1.0000000000000000, 0.50000000000000000, 7.0000000000000000,
b4688136 935 0.0000000000000000, 0.0 },
2be75957 936 { 1.0788040971101556, 0.50000000000000000, 7.0000000000000000,
b4688136 937 1.0000000000000000, 0.0 },
2be75957 938 { 1.1756385516794761, 0.50000000000000000, 7.0000000000000000,
b4688136 939 2.0000000000000000, 0.0 },
2be75957 940 { 1.2970810749099917, 0.50000000000000000, 7.0000000000000000,
b4688136 941 3.0000000000000000, 0.0 },
2be75957 942 { 1.4529009687665237, 0.50000000000000000, 7.0000000000000000,
b4688136 943 4.0000000000000000, 0.0 },
2be75957 944 { 1.6579437149144023, 0.50000000000000000, 7.0000000000000000,
b4688136 945 5.0000000000000000, 0.0 },
2be75957 946 { 1.9353010489337754, 0.50000000000000000, 7.0000000000000000,
b4688136 947 6.0000000000000000, 0.0 },
2be75957 948 { 2.3217458547039813, 0.50000000000000000, 7.0000000000000000,
b4688136 949 7.0000000000000000, 0.0 },
2be75957 950 { 2.8772254607646022, 0.50000000000000000, 7.0000000000000000,
b4688136 951 8.0000000000000000, 0.0 },
2be75957 952 { 3.7017478151936585, 0.50000000000000000, 7.0000000000000000,
b4688136 953 9.0000000000000000, 0.0 },
2be75957 954 { 4.9659500648552237, 0.50000000000000000, 7.0000000000000000,
b4688136 955 10.000000000000000, 0.0 },
2be75957
ESR
956};
957const double toler017 = 2.5000000000000020e-13;
958
959// Test data for a=0.50000000000000000, c=8.0000000000000000.
b4688136 960// max(|f - f_GSL|): 1.0658141036401503e-14 at index 20
2be75957 961// max(|f - f_GSL| / |f_GSL|): 2.9130420352995081e-15
b4688136
ESR
962// mean(f - f_GSL): -6.7670736739057157e-16
963// variance(f - f_GSL): 5.2305234496654133e-30
964// stddev(f - f_GSL): 2.2870337666211692e-15
2be75957
ESR
965const testcase_conf_hyperg<double>
966data018[21] =
967{
968 { 0.65682574389601267, 0.50000000000000000, 8.0000000000000000,
b4688136 969 -10.000000000000000, 0.0 },
2be75957 970 { 0.67683106084440448, 0.50000000000000000, 8.0000000000000000,
b4688136 971 -9.0000000000000000, 0.0 },
2be75957 972 { 0.69871884883136481, 0.50000000000000000, 8.0000000000000000,
b4688136 973 -8.0000000000000000, 0.0 },
2be75957 974 { 0.72279201131268422, 0.50000000000000000, 8.0000000000000000,
b4688136 975 -7.0000000000000000, 0.0 },
2be75957 976 { 0.74942315553647221, 0.50000000000000000, 8.0000000000000000,
b4688136 977 -6.0000000000000000, 0.0 },
2be75957 978 { 0.77907555763819503, 0.50000000000000000, 8.0000000000000000,
b4688136 979 -5.0000000000000000, 0.0 },
2be75957 980 { 0.81233192258476394, 0.50000000000000000, 8.0000000000000000,
b4688136 981 -4.0000000000000000, 0.0 },
2be75957 982 { 0.84993438521252052, 0.50000000000000000, 8.0000000000000000,
b4688136 983 -3.0000000000000000, 0.0 },
2be75957 984 { 0.89284095871461888, 0.50000000000000000, 8.0000000000000000,
b4688136 985 -2.0000000000000000, 0.0 },
2be75957 986 { 0.94230641231038748, 0.50000000000000000, 8.0000000000000000,
b4688136 987 -1.0000000000000000, 0.0 },
2be75957 988 { 1.0000000000000000, 0.50000000000000000, 8.0000000000000000,
b4688136 989 0.0000000000000000, 0.0 },
2be75957 990 { 1.0681796709163929, 0.50000000000000000, 8.0000000000000000,
b4688136 991 1.0000000000000000, 0.0 },
2be75957 992 { 1.1499542693515108, 0.50000000000000000, 8.0000000000000000,
b4688136 993 2.0000000000000000, 0.0 },
2be75957 994 { 1.2496850956712680, 0.50000000000000000, 8.0000000000000000,
b4688136 995 3.0000000000000000, 0.0 },
2be75957 996 { 1.3736119127266571, 0.50000000000000000, 8.0000000000000000,
b4688136 997 4.0000000000000000, 0.0 },
2be75957 998 { 1.5308465522192733, 0.50000000000000000, 8.0000000000000000,
b4688136 999 5.0000000000000000, 0.0 },
2be75957 1000 { 1.7349787653671505, 0.50000000000000000, 8.0000000000000000,
b4688136 1001 6.0000000000000000, 0.0 },
2be75957 1002 { 2.0067188996039378, 0.50000000000000000, 8.0000000000000000,
b4688136 1003 7.0000000000000000, 0.0 },
2be75957 1004 { 2.3783255204306939, 0.50000000000000000, 8.0000000000000000,
b4688136 1005 8.0000000000000000, 0.0 },
2be75957 1006 { 2.9011558746255748, 0.50000000000000000, 8.0000000000000000,
b4688136 1007 9.0000000000000000, 0.0 },
2be75957 1008 { 3.6587666457431234, 0.50000000000000000, 8.0000000000000000,
b4688136 1009 10.000000000000000, 0.0 },
2be75957
ESR
1010};
1011const double toler018 = 2.5000000000000020e-13;
1012
1013// Test data for a=0.50000000000000000, c=9.0000000000000000.
b4688136 1014// max(|f - f_GSL|): 7.1054273576010019e-15 at index 20
2be75957 1015// max(|f - f_GSL| / |f_GSL|): 2.4278329545502228e-15
b4688136
ESR
1016// mean(f - f_GSL): -2.7491236800241972e-16
1017// variance(f - f_GSL): 2.4494365887143733e-30
1018// stddev(f - f_GSL): 1.5650675987683002e-15
2be75957
ESR
1019const testcase_conf_hyperg<double>
1020data019[21] =
1021{
1022 { 0.68018654063475448, 0.50000000000000000, 9.0000000000000000,
b4688136 1023 -10.000000000000000, 0.0 },
2be75957 1024 { 0.69965870094538662, 0.50000000000000000, 9.0000000000000000,
b4688136 1025 -9.0000000000000000, 0.0 },
2be75957 1026 { 0.72084701020942776, 0.50000000000000000, 9.0000000000000000,
b4688136 1027 -8.0000000000000000, 0.0 },
2be75957 1028 { 0.74400928635822572, 0.50000000000000000, 9.0000000000000000,
b4688136 1029 -7.0000000000000000, 0.0 },
2be75957 1030 { 0.76945859319172982, 0.50000000000000000, 9.0000000000000000,
b4688136 1031 -6.0000000000000000, 0.0 },
2be75957 1032 { 0.79757868270124699, 0.50000000000000000, 9.0000000000000000,
b4688136 1033 -5.0000000000000000, 0.0 },
2be75957 1034 { 0.82884476649794248, 0.50000000000000000, 9.0000000000000000,
b4688136 1035 -4.0000000000000000, 0.0 },
2be75957 1036 { 0.86385180214855140, 0.50000000000000000, 9.0000000000000000,
b4688136 1037 -3.0000000000000000, 0.0 },
2be75957 1038 { 0.90335351612716308, 0.50000000000000000, 9.0000000000000000,
b4688136 1039 -2.0000000000000000, 0.0 },
2be75957 1040 { 0.94831697594473685, 0.50000000000000000, 9.0000000000000000,
b4688136 1041 -1.0000000000000000, 0.0 },
2be75957 1042 { 1.0000000000000000, 0.50000000000000000, 9.0000000000000000,
b4688136 1043 0.0000000000000000, 0.0 },
2be75957 1044 { 1.0600626000640645, 0.50000000000000000, 9.0000000000000000,
b4688136 1045 1.0000000000000000, 0.0 },
2be75957 1046 { 1.1307298999505393, 0.50000000000000000, 9.0000000000000000,
b4688136 1047 2.0000000000000000, 0.0 },
2be75957 1048 { 1.2150341092774180, 0.50000000000000000, 9.0000000000000000,
b4688136 1049 3.0000000000000000, 0.0 },
2be75957 1050 { 1.3171798023006840, 0.50000000000000000, 9.0000000000000000,
b4688136 1051 4.0000000000000000, 0.0 },
2be75957 1052 { 1.4431045594091672, 0.50000000000000000, 9.0000000000000000,
b4688136 1053 5.0000000000000000, 0.0 },
2be75957 1054 { 1.6013540635087158, 0.50000000000000000, 9.0000000000000000,
b4688136 1055 6.0000000000000000, 0.0 },
2be75957 1056 { 1.8044714074708206, 0.50000000000000000, 9.0000000000000000,
b4688136 1057 7.0000000000000000, 0.0 },
2be75957 1058 { 2.0712406108144257, 0.50000000000000000, 9.0000000000000000,
b4688136 1059 8.0000000000000000, 0.0 },
2be75957 1060 { 2.4303714711293143, 0.50000000000000000, 9.0000000000000000,
b4688136 1061 9.0000000000000000, 0.0 },
2be75957 1062 { 2.9266541358556295, 0.50000000000000000, 9.0000000000000000,
b4688136 1063 10.000000000000000, 0.0 },
2be75957
ESR
1064};
1065const double toler019 = 2.5000000000000020e-13;
1066
1067// Test data for a=0.50000000000000000, c=10.000000000000000.
b4688136 1068// max(|f - f_GSL|): 5.3290705182007514e-15 at index 20
2be75957 1069// max(|f - f_GSL| / |f_GSL|): 2.1499735877560022e-15
b4688136
ESR
1070// mean(f - f_GSL): -3.4892723631076348e-16
1071// variance(f - f_GSL): 1.3020959231780839e-30
1072// stddev(f - f_GSL): 1.1410941780493336e-15
2be75957
ESR
1073const testcase_conf_hyperg<double>
1074data020[21] =
1075{
1076 { 0.70040954461104099, 0.50000000000000000, 10.000000000000000,
b4688136 1077 -10.000000000000000, 0.0 },
2be75957 1078 { 0.71933025737654444, 0.50000000000000000, 10.000000000000000,
b4688136 1079 -9.0000000000000000, 0.0 },
2be75957 1080 { 0.73981995758615027, 0.50000000000000000, 10.000000000000000,
b4688136 1081 -8.0000000000000000, 0.0 },
2be75957 1082 { 0.76209985272755054, 0.50000000000000000, 10.000000000000000,
b4688136 1083 -7.0000000000000000, 0.0 },
2be75957 1084 { 0.78643553963087975, 0.50000000000000000, 10.000000000000000,
b4688136 1085 -6.0000000000000000, 0.0 },
2be75957 1086 { 0.81314860510626796, 0.50000000000000000, 10.000000000000000,
b4688136 1087 -5.0000000000000000, 0.0 },
2be75957 1088 { 0.84263196565226672, 0.50000000000000000, 10.000000000000000,
b4688136 1089 -4.0000000000000000, 0.0 },
2be75957 1090 { 0.87537037798496642, 0.50000000000000000, 10.000000000000000,
b4688136 1091 -3.0000000000000000, 0.0 },
2be75957 1092 { 0.91196818568151450, 0.50000000000000000, 10.000000000000000,
b4688136 1093 -2.0000000000000000, 0.0 },
2be75957 1094 { 0.95318731786229316, 0.50000000000000000, 10.000000000000000,
b4688136 1095 -1.0000000000000000, 0.0 },
2be75957 1096 { 1.0000000000000000, 0.50000000000000000, 10.000000000000000,
b4688136 1097 0.0000000000000000, 0.0 },
2be75957 1098 { 1.0536628587304602, 0.50000000000000000, 10.000000000000000,
b4688136 1099 1.0000000000000000, 0.0 },
2be75957 1100 { 1.1158225648376323, 0.50000000000000000, 10.000000000000000,
b4688136 1101 2.0000000000000000, 0.0 },
2be75957 1102 { 1.1886686247111011, 0.50000000000000000, 10.000000000000000,
b4688136 1103 3.0000000000000000, 0.0 },
2be75957 1104 { 1.2751576744751334, 0.50000000000000000, 10.000000000000000,
b4688136 1105 4.0000000000000000, 0.0 },
2be75957 1106 { 1.3793478044961116, 0.50000000000000000, 10.000000000000000,
b4688136 1107 5.0000000000000000, 0.0 },
2be75957 1108 { 1.5069047234443802, 0.50000000000000000, 10.000000000000000,
b4688136 1109 6.0000000000000000, 0.0 },
2be75957 1110 { 1.6658803233122232, 0.50000000000000000, 10.000000000000000,
b4688136 1111 7.0000000000000000, 0.0 },
2be75957 1112 { 1.8679295659745196, 0.50000000000000000, 10.000000000000000,
b4688136 1113 8.0000000000000000, 0.0 },
2be75957 1114 { 2.1302432955522050, 0.50000000000000000, 10.000000000000000,
b4688136 1115 9.0000000000000000, 0.0 },
2be75957 1116 { 2.4786679001777303, 0.50000000000000000, 10.000000000000000,
b4688136 1117 10.000000000000000, 0.0 },
2be75957
ESR
1118};
1119const double toler020 = 2.5000000000000020e-13;
1120
1121// Test data for a=1.0000000000000000, c=1.0000000000000000.
b4688136 1122// max(|f - f_GSL|): 0.0000000000000000 at index 0
2be75957 1123// max(|f - f_GSL| / |f_GSL|): 0.0000000000000000
b4688136
ESR
1124// mean(f - f_GSL): 0.0000000000000000
1125// variance(f - f_GSL): 0.0000000000000000
1126// stddev(f - f_GSL): 0.0000000000000000
2be75957
ESR
1127const testcase_conf_hyperg<double>
1128data021[21] =
1129{
b4688136
ESR
1130 { 4.5399929762484847e-05, 1.0000000000000000, 1.0000000000000000,
1131 -10.000000000000000, 0.0 },
2be75957 1132 { 0.00012340980408667956, 1.0000000000000000, 1.0000000000000000,
b4688136 1133 -9.0000000000000000, 0.0 },
2be75957 1134 { 0.00033546262790251185, 1.0000000000000000, 1.0000000000000000,
b4688136 1135 -8.0000000000000000, 0.0 },
2be75957 1136 { 0.00091188196555451624, 1.0000000000000000, 1.0000000000000000,
b4688136 1137 -7.0000000000000000, 0.0 },
2be75957 1138 { 0.0024787521766663585, 1.0000000000000000, 1.0000000000000000,
b4688136 1139 -6.0000000000000000, 0.0 },
2be75957 1140 { 0.0067379469990854670, 1.0000000000000000, 1.0000000000000000,
b4688136
ESR
1141 -5.0000000000000000, 0.0 },
1142 { 0.018315638888734182, 1.0000000000000000, 1.0000000000000000,
1143 -4.0000000000000000, 0.0 },
2be75957 1144 { 0.049787068367863944, 1.0000000000000000, 1.0000000000000000,
b4688136 1145 -3.0000000000000000, 0.0 },
2be75957 1146 { 0.13533528323661270, 1.0000000000000000, 1.0000000000000000,
b4688136
ESR
1147 -2.0000000000000000, 0.0 },
1148 { 0.36787944117144228, 1.0000000000000000, 1.0000000000000000,
1149 -1.0000000000000000, 0.0 },
2be75957 1150 { 1.0000000000000000, 1.0000000000000000, 1.0000000000000000,
b4688136
ESR
1151 0.0000000000000000, 0.0 },
1152 { 2.7182818284590455, 1.0000000000000000, 1.0000000000000000,
1153 1.0000000000000000, 0.0 },
2be75957 1154 { 7.3890560989306504, 1.0000000000000000, 1.0000000000000000,
b4688136 1155 2.0000000000000000, 0.0 },
2be75957 1156 { 20.085536923187668, 1.0000000000000000, 1.0000000000000000,
b4688136 1157 3.0000000000000000, 0.0 },
2be75957 1158 { 54.598150033144236, 1.0000000000000000, 1.0000000000000000,
b4688136 1159 4.0000000000000000, 0.0 },
2be75957 1160 { 148.41315910257660, 1.0000000000000000, 1.0000000000000000,
b4688136 1161 5.0000000000000000, 0.0 },
2be75957 1162 { 403.42879349273511, 1.0000000000000000, 1.0000000000000000,
b4688136 1163 6.0000000000000000, 0.0 },
2be75957 1164 { 1096.6331584284585, 1.0000000000000000, 1.0000000000000000,
b4688136 1165 7.0000000000000000, 0.0 },
2be75957 1166 { 2980.9579870417283, 1.0000000000000000, 1.0000000000000000,
b4688136 1167 8.0000000000000000, 0.0 },
2be75957 1168 { 8103.0839275753842, 1.0000000000000000, 1.0000000000000000,
b4688136 1169 9.0000000000000000, 0.0 },
2be75957 1170 { 22026.465794806718, 1.0000000000000000, 1.0000000000000000,
b4688136 1171 10.000000000000000, 0.0 },
2be75957
ESR
1172};
1173const double toler021 = 2.5000000000000020e-13;
1174
1175// Test data for a=1.0000000000000000, c=2.0000000000000000.
b4688136 1176// max(|f - f_GSL|): 4.5474735088646412e-13 at index 20
2be75957 1177// max(|f - f_GSL| / |f_GSL|): 2.3593310407919961e-15
b4688136
ESR
1178// mean(f - f_GSL): 8.1284185731484669e-15
1179// variance(f - f_GSL): 1.0472094711786016e-26
1180// stddev(f - f_GSL): 1.0233325320630639e-13
2be75957
ESR
1181const testcase_conf_hyperg<double>
1182data022[21] =
1183{
1184 { 0.099995460007023751, 1.0000000000000000, 2.0000000000000000,
b4688136 1185 -10.000000000000000, 0.0 },
2be75957 1186 { 0.11109739891065704, 1.0000000000000000, 2.0000000000000000,
b4688136 1187 -9.0000000000000000, 0.0 },
2be75957 1188 { 0.12495806717151219, 1.0000000000000000, 2.0000000000000000,
b4688136 1189 -8.0000000000000000, 0.0 },
2be75957 1190 { 0.14272687400492079, 1.0000000000000000, 2.0000000000000000,
b4688136 1191 -7.0000000000000000, 0.0 },
2be75957 1192 { 0.16625354130388895, 1.0000000000000000, 2.0000000000000000,
b4688136 1193 -6.0000000000000000, 0.0 },
2be75957 1194 { 0.19865241060018290, 1.0000000000000000, 2.0000000000000000,
b4688136 1195 -5.0000000000000000, 0.0 },
2be75957 1196 { 0.24542109027781644, 1.0000000000000000, 2.0000000000000000,
b4688136 1197 -4.0000000000000000, 0.0 },
2be75957 1198 { 0.31673764387737868, 1.0000000000000000, 2.0000000000000000,
b4688136 1199 -3.0000000000000000, 0.0 },
2be75957 1200 { 0.43233235838169365, 1.0000000000000000, 2.0000000000000000,
b4688136 1201 -2.0000000000000000, 0.0 },
2be75957 1202 { 0.63212055882855767, 1.0000000000000000, 2.0000000000000000,
b4688136 1203 -1.0000000000000000, 0.0 },
2be75957 1204 { 1.0000000000000000, 1.0000000000000000, 2.0000000000000000,
b4688136
ESR
1205 0.0000000000000000, 0.0 },
1206 { 1.7182818284590455, 1.0000000000000000, 2.0000000000000000,
1207 1.0000000000000000, 0.0 },
2be75957 1208 { 3.1945280494653252, 1.0000000000000000, 2.0000000000000000,
b4688136 1209 2.0000000000000000, 0.0 },
2be75957 1210 { 6.3618456410625557, 1.0000000000000000, 2.0000000000000000,
b4688136 1211 3.0000000000000000, 0.0 },
2be75957 1212 { 13.399537508286059, 1.0000000000000000, 2.0000000000000000,
b4688136 1213 4.0000000000000000, 0.0 },
2be75957 1214 { 29.482631820515319, 1.0000000000000000, 2.0000000000000000,
b4688136 1215 5.0000000000000000, 0.0 },
2be75957 1216 { 67.071465582122514, 1.0000000000000000, 2.0000000000000000,
b4688136 1217 6.0000000000000000, 0.0 },
2be75957 1218 { 156.51902263263693, 1.0000000000000000, 2.0000000000000000,
b4688136 1219 7.0000000000000000, 0.0 },
2be75957 1220 { 372.49474838021604, 1.0000000000000000, 2.0000000000000000,
b4688136 1221 8.0000000000000000, 0.0 },
2be75957 1222 { 900.23154750837602, 1.0000000000000000, 2.0000000000000000,
b4688136 1223 9.0000000000000000, 0.0 },
2be75957 1224 { 2202.5465794806719, 1.0000000000000000, 2.0000000000000000,
b4688136 1225 10.000000000000000, 0.0 },
2be75957
ESR
1226};
1227const double toler022 = 2.5000000000000020e-13;
1228
1229// Test data for a=1.0000000000000000, c=3.0000000000000000.
b4688136
ESR
1230// max(|f - f_GSL|): 5.6843418860808015e-14 at index 18
1231// max(|f - f_GSL| / |f_GSL|): 7.7283245979294494e-16
1232// mean(f - f_GSL): 2.8456073476404308e-15
1233// variance(f - f_GSL): 1.5307759153110761e-28
1234// stddev(f - f_GSL): 1.2372452931052420e-14
2be75957
ESR
1235const testcase_conf_hyperg<double>
1236data023[21] =
1237{
1238 { 0.18000090799859525, 1.0000000000000000, 3.0000000000000000,
b4688136 1239 -10.000000000000000, 0.0 },
2be75957 1240 { 0.19753391135318732, 1.0000000000000000, 3.0000000000000000,
b4688136 1241 -9.0000000000000000, 0.0 },
2be75957 1242 { 0.21876048320712196, 1.0000000000000000, 3.0000000000000000,
b4688136 1243 -8.0000000000000000, 0.0 },
2be75957 1244 { 0.24493517885573690, 1.0000000000000000, 3.0000000000000000,
b4688136 1245 -7.0000000000000000, 0.0 },
2be75957 1246 { 0.27791548623203705, 1.0000000000000000, 3.0000000000000000,
b4688136 1247 -6.0000000000000000, 0.0 },
2be75957 1248 { 0.32053903575992687, 1.0000000000000000, 3.0000000000000000,
b4688136 1249 -5.0000000000000000, 0.0 },
2be75957 1250 { 0.37728945486109178, 1.0000000000000000, 3.0000000000000000,
b4688136 1251 -4.0000000000000000, 0.0 },
2be75957 1252 { 0.45550823741508090, 1.0000000000000000, 3.0000000000000000,
b4688136 1253 -3.0000000000000000, 0.0 },
2be75957 1254 { 0.56766764161830641, 1.0000000000000000, 3.0000000000000000,
b4688136 1255 -2.0000000000000000, 0.0 },
2be75957 1256 { 0.73575888234288467, 1.0000000000000000, 3.0000000000000000,
b4688136 1257 -1.0000000000000000, 0.0 },
2be75957 1258 { 1.0000000000000000, 1.0000000000000000, 3.0000000000000000,
b4688136
ESR
1259 0.0000000000000000, 0.0 },
1260 { 1.4365636569180911, 1.0000000000000000, 3.0000000000000000,
1261 1.0000000000000000, 0.0 },
2be75957 1262 { 2.1945280494653252, 1.0000000000000000, 3.0000000000000000,
b4688136 1263 2.0000000000000000, 0.0 },
2be75957 1264 { 3.5745637607083705, 1.0000000000000000, 3.0000000000000000,
b4688136 1265 3.0000000000000000, 0.0 },
2be75957 1266 { 6.1997687541430295, 1.0000000000000000, 3.0000000000000000,
b4688136 1267 4.0000000000000000, 0.0 },
2be75957 1268 { 11.393052728206127, 1.0000000000000000, 3.0000000000000000,
b4688136 1269 5.0000000000000000, 0.0 },
2be75957 1270 { 22.023821860707507, 1.0000000000000000, 3.0000000000000000,
b4688136 1271 6.0000000000000000, 0.0 },
2be75957 1272 { 44.434006466467693, 1.0000000000000000, 3.0000000000000000,
b4688136 1273 7.0000000000000000, 0.0 },
2be75957 1274 { 92.873687095054009, 1.0000000000000000, 3.0000000000000000,
b4688136 1275 8.0000000000000000, 0.0 },
2be75957 1276 { 199.82923277963911, 1.0000000000000000, 3.0000000000000000,
b4688136 1277 9.0000000000000000, 0.0 },
2be75957 1278 { 440.30931589613436, 1.0000000000000000, 3.0000000000000000,
b4688136 1279 10.000000000000000, 0.0 },
2be75957
ESR
1280};
1281const double toler023 = 2.5000000000000020e-13;
1282
1283// Test data for a=1.0000000000000000, c=4.0000000000000000.
b4688136 1284// max(|f - f_GSL|): 8.5265128291212022e-14 at index 20
2be75957 1285// max(|f - f_GSL| / |f_GSL|): 8.2495029364968388e-16
b4688136
ESR
1286// mean(f - f_GSL): 4.6338594337330941e-15
1287// variance(f - f_GSL): 3.4132357967227019e-28
1288// stddev(f - f_GSL): 1.8474944645986633e-14
2be75957
ESR
1289const testcase_conf_hyperg<double>
1290data024[21] =
1291{
1292 { 0.24599972760042138, 1.0000000000000000, 4.0000000000000000,
b4688136 1293 -10.000000000000000, 0.0 },
2be75957 1294 { 0.26748869621560417, 1.0000000000000000, 4.0000000000000000,
b4688136 1295 -9.0000000000000000, 0.0 },
2be75957 1296 { 0.29296481879732927, 1.0000000000000000, 4.0000000000000000,
b4688136 1297 -8.0000000000000000, 0.0 },
2be75957 1298 { 0.32359920906182715, 1.0000000000000000, 4.0000000000000000,
b4688136 1299 -7.0000000000000000, 0.0 },
2be75957 1300 { 0.36104225688398156, 1.0000000000000000, 4.0000000000000000,
b4688136 1301 -6.0000000000000000, 0.0 },
2be75957 1302 { 0.40767657854404388, 1.0000000000000000, 4.0000000000000000,
b4688136 1303 -5.0000000000000000, 0.0 },
2be75957 1304 { 0.46703290885418114, 1.0000000000000000, 4.0000000000000000,
b4688136 1305 -4.0000000000000000, 0.0 },
2be75957 1306 { 0.54449176258491916, 1.0000000000000000, 4.0000000000000000,
b4688136 1307 -3.0000000000000000, 0.0 },
2be75957 1308 { 0.64849853757254050, 1.0000000000000000, 4.0000000000000000,
b4688136 1309 -2.0000000000000000, 0.0 },
2be75957 1310 { 0.79272335297134611, 1.0000000000000000, 4.0000000000000000,
b4688136 1311 -1.0000000000000000, 0.0 },
2be75957 1312 { 1.0000000000000000, 1.0000000000000000, 4.0000000000000000,
b4688136 1313 0.0000000000000000, 0.0 },
2be75957 1314 { 1.3096909707542714, 1.0000000000000000, 4.0000000000000000,
b4688136 1315 1.0000000000000000, 0.0 },
2be75957 1316 { 1.7917920741979876, 1.0000000000000000, 4.0000000000000000,
b4688136 1317 2.0000000000000000, 0.0 },
2be75957 1318 { 2.5745637607083705, 1.0000000000000000, 4.0000000000000000,
b4688136 1319 3.0000000000000000, 0.0 },
2be75957 1320 { 3.8998265656072717, 1.0000000000000000, 4.0000000000000000,
b4688136 1321 4.0000000000000000, 0.0 },
2be75957 1322 { 6.2358316369236775, 1.0000000000000000, 4.0000000000000000,
b4688136 1323 5.0000000000000000, 0.0 },
2be75957 1324 { 10.511910930353745, 1.0000000000000000, 4.0000000000000000,
b4688136 1325 6.0000000000000000, 0.0 },
2be75957 1326 { 18.614574199914728, 1.0000000000000000, 4.0000000000000000,
b4688136 1327 7.0000000000000000, 0.0 },
2be75957 1328 { 34.452632660645271, 1.0000000000000000, 4.0000000000000000,
b4688136 1329 8.0000000000000000, 0.0 },
2be75957 1330 { 66.276410926546333, 1.0000000000000000, 4.0000000000000000,
b4688136 1331 9.0000000000000000, 0.0 },
2be75957 1332 { 131.79279476884014, 1.0000000000000000, 4.0000000000000000,
b4688136 1333 10.000000000000000, 0.0 },
2be75957
ESR
1334};
1335const double toler024 = 2.5000000000000020e-13;
1336
1337// Test data for a=1.0000000000000000, c=5.0000000000000000.
b4688136 1338// max(|f - f_GSL|): 6.3948846218409017e-14 at index 20
2be75957 1339// max(|f - f_GSL| / |f_GSL|): 1.3470358174143053e-15
b4688136
ESR
1340// mean(f - f_GSL): 4.1316156844979041e-15
1341// variance(f - f_GSL): 1.8785030610922107e-28
1342// stddev(f - f_GSL): 1.3705849339213571e-14
2be75957
ESR
1343const testcase_conf_hyperg<double>
1344data025[21] =
1345{
1346 { 0.30160010895983153, 1.0000000000000000, 5.0000000000000000,
b4688136 1347 -10.000000000000000, 0.0 },
2be75957 1348 { 0.32556057945973133, 1.0000000000000000, 5.0000000000000000,
b4688136 1349 -9.0000000000000000, 0.0 },
2be75957 1350 { 0.35351759060133559, 1.0000000000000000, 5.0000000000000000,
b4688136 1351 -8.0000000000000000, 0.0 },
2be75957 1352 { 0.38651473767895589, 1.0000000000000000, 5.0000000000000000,
b4688136 1353 -7.0000000000000000, 0.0 },
2be75957 1354 { 0.42597182874401246, 1.0000000000000000, 5.0000000000000000,
b4688136 1355 -6.0000000000000000, 0.0 },
2be75957 1356 { 0.47385873716476473, 1.0000000000000000, 5.0000000000000000,
b4688136 1357 -5.0000000000000000, 0.0 },
2be75957 1358 { 0.53296709114581886, 1.0000000000000000, 5.0000000000000000,
b4688136 1359 -4.0000000000000000, 0.0 },
2be75957 1360 { 0.60734431655344123, 1.0000000000000000, 5.0000000000000000,
b4688136 1361 -3.0000000000000000, 0.0 },
2be75957 1362 { 0.70300292485491900, 1.0000000000000000, 5.0000000000000000,
b4688136 1363 -2.0000000000000000, 0.0 },
2be75957 1364 { 0.82910658811461568, 1.0000000000000000, 5.0000000000000000,
b4688136 1365 -1.0000000000000000, 0.0 },
2be75957 1366 { 1.0000000000000000, 1.0000000000000000, 5.0000000000000000,
b4688136 1367 0.0000000000000000, 0.0 },
2be75957 1368 { 1.2387638830170857, 1.0000000000000000, 5.0000000000000000,
b4688136 1369 1.0000000000000000, 0.0 },
2be75957 1370 { 1.5835841483959754, 1.0000000000000000, 5.0000000000000000,
b4688136 1371 2.0000000000000000, 0.0 },
2be75957 1372 { 2.0994183476111612, 1.0000000000000000, 5.0000000000000000,
b4688136 1373 3.0000000000000000, 0.0 },
2be75957 1374 { 2.8998265656072730, 1.0000000000000000, 5.0000000000000000,
b4688136 1375 4.0000000000000000, 0.0 },
2be75957 1376 { 4.1886653095389432, 1.0000000000000000, 5.0000000000000000,
b4688136 1377 5.0000000000000000, 0.0 },
2be75957 1378 { 6.3412739535691678, 1.0000000000000000, 5.0000000000000000,
b4688136
ESR
1379 6.0000000000000000, 0.0 },
1380 { 10.065470971379845, 1.0000000000000000, 5.0000000000000000,
1381 7.0000000000000000, 0.0 },
2be75957 1382 { 16.726316330322632, 1.0000000000000000, 5.0000000000000000,
b4688136 1383 8.0000000000000000, 0.0 },
2be75957 1384 { 29.011738189576135, 1.0000000000000000, 5.0000000000000000,
b4688136 1385 9.0000000000000000, 0.0 },
2be75957 1386 { 52.317117907536058, 1.0000000000000000, 5.0000000000000000,
b4688136 1387 10.000000000000000, 0.0 },
2be75957
ESR
1388};
1389const double toler025 = 2.5000000000000020e-13;
1390
1391// Test data for a=1.0000000000000000, c=6.0000000000000000.
b4688136 1392// max(|f - f_GSL|): 8.1712414612411521e-14 at index 20
2be75957 1393// max(|f - f_GSL| / |f_GSL|): 3.1846065384904241e-15
b4688136
ESR
1394// mean(f - f_GSL): 5.9529101225139347e-15
1395// variance(f - f_GSL): 3.0132388232912765e-28
1396// stddev(f - f_GSL): 1.7358683196865125e-14
2be75957
ESR
1397const testcase_conf_hyperg<double>
1398data026[21] =
1399{
1400 { 0.34919994552008421, 1.0000000000000000, 6.0000000000000000,
b4688136 1401 -10.000000000000000, 0.0 },
2be75957 1402 { 0.37468856696681579, 1.0000000000000000, 6.0000000000000000,
b4688136 1403 -9.0000000000000000, 0.0 },
2be75957 1404 { 0.40405150587416555, 1.0000000000000000, 6.0000000000000000,
b4688136 1405 -8.0000000000000000, 0.0 },
2be75957 1406 { 0.43820375880074558, 1.0000000000000000, 6.0000000000000000,
b4688136 1407 -7.0000000000000000, 0.0 },
2be75957 1408 { 0.47835680937998981, 1.0000000000000000, 6.0000000000000000,
b4688136 1409 -6.0000000000000000, 0.0 },
2be75957 1410 { 0.52614126283523510, 1.0000000000000000, 6.0000000000000000,
b4688136 1411 -5.0000000000000000, 0.0 },
2be75957 1412 { 0.58379113606772659, 1.0000000000000000, 6.0000000000000000,
b4688136 1413 -4.0000000000000000, 0.0 },
2be75957 1414 { 0.65442613907759817, 1.0000000000000000, 6.0000000000000000,
b4688136 1415 -3.0000000000000000, 0.0 },
2be75957 1416 { 0.74249268786270239, 1.0000000000000000, 6.0000000000000000,
b4688136 1417 -2.0000000000000000, 0.0 },
2be75957 1418 { 0.85446705942692136, 1.0000000000000000, 6.0000000000000000,
b4688136 1419 -1.0000000000000000, 0.0 },
2be75957 1420 { 1.0000000000000000, 1.0000000000000000, 6.0000000000000000,
b4688136 1421 0.0000000000000000, 0.0 },
2be75957 1422 { 1.1938194150854282, 1.0000000000000000, 6.0000000000000000,
b4688136 1423 1.0000000000000000, 0.0 },
2be75957 1424 { 1.4589603709899384, 1.0000000000000000, 6.0000000000000000,
b4688136 1425 2.0000000000000000, 0.0 },
2be75957 1426 { 1.8323639126852680, 1.0000000000000000, 6.0000000000000000,
b4688136 1427 3.0000000000000000, 0.0 },
2be75957 1428 { 2.3747832070090902, 1.0000000000000000, 6.0000000000000000,
b4688136 1429 4.0000000000000000, 0.0 },
2be75957 1430 { 3.1886653095389423, 1.0000000000000000, 6.0000000000000000,
b4688136 1431 5.0000000000000000, 0.0 },
2be75957 1432 { 4.4510616279743056, 1.0000000000000000, 6.0000000000000000,
b4688136
ESR
1433 6.0000000000000000, 0.0 },
1434 { 6.4753364081284603, 1.0000000000000000, 6.0000000000000000,
1435 7.0000000000000000, 0.0 },
1436 { 9.8289477064516362, 1.0000000000000000, 6.0000000000000000,
1437 8.0000000000000000, 0.0 },
2be75957 1438 { 15.562076771986721, 1.0000000000000000, 6.0000000000000000,
b4688136 1439 9.0000000000000000, 0.0 },
2be75957 1440 { 25.658558953767979, 1.0000000000000000, 6.0000000000000000,
b4688136 1441 10.000000000000000, 0.0 },
2be75957
ESR
1442};
1443const double toler026 = 2.5000000000000020e-13;
1444
1445// Test data for a=1.0000000000000000, c=7.0000000000000000.
b4688136 1446// max(|f - f_GSL|): 4.6185277824406512e-14 at index 20
2be75957 1447// max(|f - f_GSL| / |f_GSL|): 3.1216529394518888e-15
b4688136
ESR
1448// mean(f - f_GSL): 1.1710209521641532e-15
1449// variance(f - f_GSL): 1.0637987439241148e-28
1450// stddev(f - f_GSL): 1.0314061973461835e-14
2be75957
ESR
1451const testcase_conf_hyperg<double>
1452data027[21] =
1453{
1454 { 0.39048003268794934, 1.0000000000000000, 7.0000000000000000,
b4688136 1455 -10.000000000000000, 0.0 },
2be75957 1456 { 0.41687428868878917, 1.0000000000000000, 7.0000000000000000,
b4688136 1457 -9.0000000000000000, 0.0 },
2be75957 1458 { 0.44696137059437591, 1.0000000000000000, 7.0000000000000000,
b4688136 1459 -8.0000000000000000, 0.0 },
2be75957 1460 { 0.48153963531364674, 1.0000000000000000, 7.0000000000000000,
b4688136 1461 -7.0000000000000000, 0.0 },
2be75957 1462 { 0.52164319062001030, 1.0000000000000000, 7.0000000000000000,
b4688136 1463 -6.0000000000000000, 0.0 },
2be75957 1464 { 0.56863048459771781, 1.0000000000000000, 7.0000000000000000,
b4688136 1465 -5.0000000000000000, 0.0 },
2be75957 1466 { 0.62431329589841034, 1.0000000000000000, 7.0000000000000000,
b4688136 1467 -4.0000000000000000, 0.0 },
2be75957 1468 { 0.69114772184480389, 1.0000000000000000, 7.0000000000000000,
b4688136 1469 -3.0000000000000000, 0.0 },
2be75957 1470 { 0.77252193641189282, 1.0000000000000000, 7.0000000000000000,
b4688136 1471 -2.0000000000000000, 0.0 },
2be75957 1472 { 0.87319764343847150, 1.0000000000000000, 7.0000000000000000,
b4688136 1473 -1.0000000000000000, 0.0 },
2be75957 1474 { 1.0000000000000000, 1.0000000000000000, 7.0000000000000000,
b4688136 1475 0.0000000000000000, 0.0 },
2be75957 1476 { 1.1629164905125695, 1.0000000000000000, 7.0000000000000000,
b4688136 1477 1.0000000000000000, 0.0 },
2be75957 1478 { 1.3768811129698151, 1.0000000000000000, 7.0000000000000000,
b4688136 1479 2.0000000000000000, 0.0 },
2be75957 1480 { 1.6647278253705360, 1.0000000000000000, 7.0000000000000000,
b4688136 1481 3.0000000000000000, 0.0 },
2be75957 1482 { 2.0621748105136359, 1.0000000000000000, 7.0000000000000000,
b4688136 1483 4.0000000000000000, 0.0 },
2be75957 1484 { 2.6263983714467289, 1.0000000000000000, 7.0000000000000000,
b4688136 1485 5.0000000000000000, 0.0 },
2be75957 1486 { 3.4510616279743087, 1.0000000000000000, 7.0000000000000000,
b4688136
ESR
1487 6.0000000000000000, 0.0 },
1488 { 4.6931454926815457, 1.0000000000000000, 7.0000000000000000,
1489 7.0000000000000000, 0.0 },
2be75957 1490 { 6.6217107798387467, 1.0000000000000000, 7.0000000000000000,
b4688136 1491 8.0000000000000000, 0.0 },
2be75957 1492 { 9.7080511813245050, 1.0000000000000000, 7.0000000000000000,
b4688136 1493 9.0000000000000000, 0.0 },
2be75957 1494 { 14.795135372260791, 1.0000000000000000, 7.0000000000000000,
b4688136 1495 10.000000000000000, 0.0 },
2be75957
ESR
1496};
1497const double toler027 = 2.5000000000000020e-13;
1498
1499// Test data for a=1.0000000000000000, c=8.0000000000000000.
b4688136 1500// max(|f - f_GSL|): 1.5099033134902129e-14 at index 18
2be75957 1501// max(|f - f_GSL| / |f_GSL|): 3.0695349768517519e-15
b4688136
ESR
1502// mean(f - f_GSL): -2.2997476938663959e-16
1503// variance(f - f_GSL): 4.3587679517313822e-30
1504// stddev(f - f_GSL): 2.0877662588832549e-15
2be75957
ESR
1505const testcase_conf_hyperg<double>
1506data028[21] =
1507{
1508 { 0.42666397711843551, 1.0000000000000000, 8.0000000000000000,
b4688136 1509 -10.000000000000000, 0.0 },
2be75957 1510 { 0.45354221990871935, 1.0000000000000000, 8.0000000000000000,
b4688136 1511 -9.0000000000000000, 0.0 },
2be75957 1512 { 0.48390880072992098, 1.0000000000000000, 8.0000000000000000,
b4688136 1513 -8.0000000000000000, 0.0 },
2be75957 1514 { 0.51846036468635348, 1.0000000000000000, 8.0000000000000000,
b4688136 1515 -7.0000000000000000, 0.0 },
2be75957 1516 { 0.55808294427665472, 1.0000000000000000, 8.0000000000000000,
b4688136 1517 -6.0000000000000000, 0.0 },
2be75957 1518 { 0.60391732156319500, 1.0000000000000000, 8.0000000000000000,
b4688136 1519 -5.0000000000000000, 0.0 },
2be75957 1520 { 0.65745173217778197, 1.0000000000000000, 8.0000000000000000,
b4688136 1521 -4.0000000000000000, 0.0 },
2be75957 1522 { 0.72065531569545760, 1.0000000000000000, 8.0000000000000000,
b4688136 1523 -3.0000000000000000, 0.0 },
2be75957 1524 { 0.79617322255837530, 1.0000000000000000, 8.0000000000000000,
b4688136 1525 -2.0000000000000000, 0.0 },
2be75957 1526 { 0.88761649593069913, 1.0000000000000000, 8.0000000000000000,
b4688136 1527 -1.0000000000000000, 0.0 },
2be75957 1528 { 1.0000000000000000, 1.0000000000000000, 8.0000000000000000,
b4688136 1529 0.0000000000000000, 0.0 },
2be75957 1530 { 1.1404154335879861, 1.0000000000000000, 8.0000000000000000,
b4688136 1531 1.0000000000000000, 0.0 },
2be75957 1532 { 1.3190838953943527, 1.0000000000000000, 8.0000000000000000,
b4688136 1533 2.0000000000000000, 0.0 },
2be75957 1534 { 1.5510315925312508, 1.0000000000000000, 8.0000000000000000,
b4688136 1535 3.0000000000000000, 0.0 },
2be75957 1536 { 1.8588059183988626, 1.0000000000000000, 8.0000000000000000,
b4688136 1537 4.0000000000000000, 0.0 },
2be75957 1538 { 2.2769577200254218, 1.0000000000000000, 8.0000000000000000,
b4688136 1539 5.0000000000000000, 0.0 },
2be75957 1540 { 2.8595718993033583, 1.0000000000000000, 8.0000000000000000,
b4688136 1541 6.0000000000000000, 0.0 },
2be75957 1542 { 3.6931454926815390, 1.0000000000000000, 8.0000000000000000,
b4688136 1543 7.0000000000000000, 0.0 },
2be75957 1544 { 4.9189969323589047, 1.0000000000000000, 8.0000000000000000,
b4688136 1545 8.0000000000000000, 0.0 },
2be75957 1546 { 6.7729286965857236, 1.0000000000000000, 8.0000000000000000,
b4688136 1547 9.0000000000000000, 0.0 },
2be75957 1548 { 9.6565947605825802, 1.0000000000000000, 8.0000000000000000,
b4688136 1549 10.000000000000000, 0.0 },
2be75957
ESR
1550};
1551const double toler028 = 2.5000000000000020e-13;
1552
1553// Test data for a=1.0000000000000000, c=9.0000000000000000.
b4688136 1554// max(|f - f_GSL|): 2.1316282072803006e-14 at index 20
2be75957 1555// max(|f - f_GSL| / |f_GSL|): 3.0780408841975893e-15
b4688136
ESR
1556// mean(f - f_GSL): 1.6309704909374323e-15
1557// variance(f - f_GSL): 2.0344353333944372e-29
1558// stddev(f - f_GSL): 4.5104715201344935e-15
2be75957
ESR
1559const testcase_conf_hyperg<double>
1560data029[21] =
1561{
1562 { 0.45866881830525147, 1.0000000000000000, 9.0000000000000000,
b4688136 1563 -10.000000000000000, 0.0 },
2be75957 1564 { 0.48574024897002727, 1.0000000000000000, 9.0000000000000000,
b4688136 1565 -9.0000000000000000, 0.0 },
2be75957 1566 { 0.51609119927007907, 1.0000000000000000, 9.0000000000000000,
b4688136 1567 -8.0000000000000000, 0.0 },
2be75957 1568 { 0.55033101178702448, 1.0000000000000000, 9.0000000000000000,
b4688136 1569 -7.0000000000000000, 0.0 },
2be75957 1570 { 0.58922274096446048, 1.0000000000000000, 9.0000000000000000,
b4688136 1571 -6.0000000000000000, 0.0 },
2be75957 1572 { 0.63373228549888794, 1.0000000000000000, 9.0000000000000000,
b4688136 1573 -5.0000000000000000, 0.0 },
2be75957 1574 { 0.68509653564443607, 1.0000000000000000, 9.0000000000000000,
b4688136 1575 -4.0000000000000000, 0.0 },
2be75957 1576 { 0.74491915814544640, 1.0000000000000000, 9.0000000000000000,
b4688136 1577 -3.0000000000000000, 0.0 },
2be75957 1578 { 0.81530710976649901, 1.0000000000000000, 9.0000000000000000,
b4688136 1579 -2.0000000000000000, 0.0 },
2be75957 1580 { 0.89906803255440670, 1.0000000000000000, 9.0000000000000000,
b4688136 1581 -1.0000000000000000, 0.0 },
2be75957 1582 { 1.0000000000000000, 1.0000000000000000, 9.0000000000000000,
b4688136 1583 0.0000000000000000, 0.0 },
2be75957 1584 { 1.1233234687038898, 1.0000000000000000, 9.0000000000000000,
b4688136 1585 1.0000000000000000, 0.0 },
2be75957 1586 { 1.2763355815774109, 1.0000000000000000, 9.0000000000000000,
b4688136 1587 2.0000000000000000, 0.0 },
2be75957 1588 { 1.4694175800833351, 1.0000000000000000, 9.0000000000000000,
b4688136 1589 3.0000000000000000, 0.0 },
2be75957 1590 { 1.7176118367977251, 1.0000000000000000, 9.0000000000000000,
b4688136 1591 4.0000000000000000, 0.0 },
2be75957 1592 { 2.0431323520406743, 1.0000000000000000, 9.0000000000000000,
b4688136 1593 5.0000000000000000, 0.0 },
2be75957 1594 { 2.4794291990711450, 1.0000000000000000, 9.0000000000000000,
b4688136 1595 6.0000000000000000, 0.0 },
2be75957 1596 { 3.0778805630646149, 1.0000000000000000, 9.0000000000000000,
b4688136 1597 7.0000000000000000, 0.0 },
2be75957 1598 { 3.9189969323588909, 1.0000000000000000, 9.0000000000000000,
b4688136 1599 8.0000000000000000, 0.0 },
2be75957 1600 { 5.1314921747428537, 1.0000000000000000, 9.0000000000000000,
b4688136 1601 9.0000000000000000, 0.0 },
2be75957 1602 { 6.9252758084660471, 1.0000000000000000, 9.0000000000000000,
b4688136 1603 10.000000000000000, 0.0 },
2be75957
ESR
1604};
1605const double toler029 = 2.5000000000000020e-13;
1606
1607// Test data for a=1.0000000000000000, c=10.000000000000000.
b4688136 1608// max(|f - f_GSL|): 1.5987211554602254e-14 at index 20
2be75957 1609// max(|f - f_GSL| / |f_GSL|): 2.9979310614742812e-15
b4688136
ESR
1610// mean(f - f_GSL): 7.0049786077539637e-16
1611// variance(f - f_GSL): 1.2268389816744262e-29
1612// stddev(f - f_GSL): 3.5026261314539785e-15
2be75957
ESR
1613const testcase_conf_hyperg<double>
1614data030[21] =
1615{
1616 { 0.48719806352527351, 1.0000000000000000, 10.000000000000000,
b4688136 1617 -10.000000000000000, 0.0 },
2be75957 1618 { 0.51425975102997290, 1.0000000000000000, 10.000000000000000,
b4688136 1619 -9.0000000000000000, 0.0 },
2be75957 1620 { 0.54439740082116106, 1.0000000000000000, 10.000000000000000,
b4688136 1621 -8.0000000000000000, 0.0 },
2be75957 1622 { 0.57814584198811136, 1.0000000000000000, 10.000000000000000,
b4688136 1623 -7.0000000000000000, 0.0 },
2be75957 1624 { 0.61616588855330934, 1.0000000000000000, 10.000000000000000,
b4688136 1625 -6.0000000000000000, 0.0 },
2be75957 1626 { 0.65928188610200156, 1.0000000000000000, 10.000000000000000,
b4688136 1627 -5.0000000000000000, 0.0 },
2be75957 1628 { 0.70853279480001885, 1.0000000000000000, 10.000000000000000,
b4688136 1629 -4.0000000000000000, 0.0 },
2be75957 1630 { 0.76524252556366068, 1.0000000000000000, 10.000000000000000,
b4688136 1631 -3.0000000000000000, 0.0 },
2be75957 1632 { 0.83111800605075459, 1.0000000000000000, 10.000000000000000,
b4688136 1633 -2.0000000000000000, 0.0 },
2be75957 1634 { 0.90838770701033944, 1.0000000000000000, 10.000000000000000,
b4688136 1635 -1.0000000000000000, 0.0 },
2be75957 1636 { 1.0000000000000000, 1.0000000000000000, 10.000000000000000,
b4688136 1637 0.0000000000000000, 0.0 },
2be75957 1638 { 1.1099112183350075, 1.0000000000000000, 10.000000000000000,
b4688136 1639 1.0000000000000000, 0.0 },
2be75957 1640 { 1.2435101170983485, 1.0000000000000000, 10.000000000000000,
b4688136 1641 2.0000000000000000, 0.0 },
2be75957 1642 { 1.4082527402500060, 1.0000000000000000, 10.000000000000000,
b4688136 1643 3.0000000000000000, 0.0 },
2be75957 1644 { 1.6146266327948817, 1.0000000000000000, 10.000000000000000,
b4688136 1645 4.0000000000000000, 0.0 },
2be75957 1646 { 1.8776382336732149, 1.0000000000000000, 10.000000000000000,
b4688136 1647 5.0000000000000000, 0.0 },
2be75957 1648 { 2.2191437986067180, 1.0000000000000000, 10.000000000000000,
b4688136 1649 6.0000000000000000, 0.0 },
2be75957 1650 { 2.6715607239402184, 1.0000000000000000, 10.000000000000000,
b4688136 1651 7.0000000000000000, 0.0 },
2be75957 1652 { 3.2838715489037495, 1.0000000000000000, 10.000000000000000,
b4688136 1653 8.0000000000000000, 0.0 },
2be75957 1654 { 4.1314921747428688, 1.0000000000000000, 10.000000000000000,
b4688136 1655 9.0000000000000000, 0.0 },
2be75957 1656 { 5.3327482276194447, 1.0000000000000000, 10.000000000000000,
b4688136 1657 10.000000000000000, 0.0 },
2be75957
ESR
1658};
1659const double toler030 = 2.5000000000000020e-13;
1660
1661// Test data for a=2.0000000000000000, c=1.0000000000000000.
b4688136
ESR
1662// max(|f - f_GSL|): 1.8189894035458565e-12 at index 16
1663// max(|f - f_GSL| / |f_GSL|): 1.2471263079384817e-14
1664// mean(f - f_GSL): -1.4303634774011364e-13
1665// variance(f - f_GSL): 1.1334845858631974e-27
1666// stddev(f - f_GSL): 3.3667262821072896e-14
2be75957
ESR
1667const testcase_conf_hyperg<double>
1668data031[20] =
1669{
b4688136
ESR
1670 { -0.00040859936786236361, 2.0000000000000000, 1.0000000000000000,
1671 -10.000000000000000, 0.0 },
2be75957 1672 { -0.00098727843269343649, 2.0000000000000000, 1.0000000000000000,
b4688136 1673 -9.0000000000000000, 0.0 },
2be75957 1674 { -0.0023482383953175828, 2.0000000000000000, 1.0000000000000000,
b4688136 1675 -8.0000000000000000, 0.0 },
2be75957 1676 { -0.0054712917933270972, 2.0000000000000000, 1.0000000000000000,
b4688136 1677 -7.0000000000000000, 0.0 },
2be75957 1678 { -0.012393760883331793, 2.0000000000000000, 1.0000000000000000,
b4688136 1679 -6.0000000000000000, 0.0 },
2be75957 1680 { -0.026951787996341868, 2.0000000000000000, 1.0000000000000000,
b4688136
ESR
1681 -5.0000000000000000, 0.0 },
1682 { -0.054946916666202550, 2.0000000000000000, 1.0000000000000000,
1683 -4.0000000000000000, 0.0 },
2be75957 1684 { -0.099574136735727889, 2.0000000000000000, 1.0000000000000000,
b4688136 1685 -3.0000000000000000, 0.0 },
2be75957 1686 { -0.13533528323661270, 2.0000000000000000, 1.0000000000000000,
b4688136 1687 -2.0000000000000000, 0.0 },
2be75957 1688 { 1.0000000000000000, 2.0000000000000000, 1.0000000000000000,
b4688136
ESR
1689 0.0000000000000000, 0.0 },
1690 { 5.4365636569180911, 2.0000000000000000, 1.0000000000000000,
1691 1.0000000000000000, 0.0 },
2be75957 1692 { 22.167168296791949, 2.0000000000000000, 1.0000000000000000,
b4688136 1693 2.0000000000000000, 0.0 },
2be75957 1694 { 80.342147692750672, 2.0000000000000000, 1.0000000000000000,
b4688136 1695 3.0000000000000000, 0.0 },
2be75957 1696 { 272.99075016572118, 2.0000000000000000, 1.0000000000000000,
b4688136 1697 4.0000000000000000, 0.0 },
2be75957 1698 { 890.47895461545954, 2.0000000000000000, 1.0000000000000000,
b4688136 1699 5.0000000000000000, 0.0 },
2be75957 1700 { 2824.0015544491457, 2.0000000000000000, 1.0000000000000000,
b4688136 1701 6.0000000000000000, 0.0 },
2be75957 1702 { 8773.0652674276680, 2.0000000000000000, 1.0000000000000000,
b4688136 1703 7.0000000000000000, 0.0 },
2be75957 1704 { 26828.621883375556, 2.0000000000000000, 1.0000000000000000,
b4688136 1705 8.0000000000000000, 0.0 },
2be75957 1706 { 81030.839275753839, 2.0000000000000000, 1.0000000000000000,
b4688136 1707 9.0000000000000000, 0.0 },
2be75957 1708 { 242291.12374287390, 2.0000000000000000, 1.0000000000000000,
b4688136 1709 10.000000000000000, 0.0 },
2be75957
ESR
1710};
1711const double toler031 = 1.0000000000000008e-12;
1712
1713// Test data for a=2.0000000000000000, c=2.0000000000000000.
b4688136 1714// max(|f - f_GSL|): 0.0000000000000000 at index 0
2be75957 1715// max(|f - f_GSL| / |f_GSL|): 0.0000000000000000
b4688136
ESR
1716// mean(f - f_GSL): 0.0000000000000000
1717// variance(f - f_GSL): 0.0000000000000000
1718// stddev(f - f_GSL): 0.0000000000000000
2be75957
ESR
1719const testcase_conf_hyperg<double>
1720data032[21] =
1721{
b4688136
ESR
1722 { 4.5399929762484847e-05, 2.0000000000000000, 2.0000000000000000,
1723 -10.000000000000000, 0.0 },
2be75957 1724 { 0.00012340980408667956, 2.0000000000000000, 2.0000000000000000,
b4688136 1725 -9.0000000000000000, 0.0 },
2be75957 1726 { 0.00033546262790251185, 2.0000000000000000, 2.0000000000000000,
b4688136 1727 -8.0000000000000000, 0.0 },
2be75957 1728 { 0.00091188196555451624, 2.0000000000000000, 2.0000000000000000,
b4688136 1729 -7.0000000000000000, 0.0 },
2be75957 1730 { 0.0024787521766663585, 2.0000000000000000, 2.0000000000000000,
b4688136 1731 -6.0000000000000000, 0.0 },
2be75957 1732 { 0.0067379469990854670, 2.0000000000000000, 2.0000000000000000,
b4688136
ESR
1733 -5.0000000000000000, 0.0 },
1734 { 0.018315638888734182, 2.0000000000000000, 2.0000000000000000,
1735 -4.0000000000000000, 0.0 },
2be75957 1736 { 0.049787068367863944, 2.0000000000000000, 2.0000000000000000,
b4688136 1737 -3.0000000000000000, 0.0 },
2be75957 1738 { 0.13533528323661270, 2.0000000000000000, 2.0000000000000000,
b4688136
ESR
1739 -2.0000000000000000, 0.0 },
1740 { 0.36787944117144228, 2.0000000000000000, 2.0000000000000000,
1741 -1.0000000000000000, 0.0 },
2be75957 1742 { 1.0000000000000000, 2.0000000000000000, 2.0000000000000000,
b4688136
ESR
1743 0.0000000000000000, 0.0 },
1744 { 2.7182818284590455, 2.0000000000000000, 2.0000000000000000,
1745 1.0000000000000000, 0.0 },
2be75957 1746 { 7.3890560989306504, 2.0000000000000000, 2.0000000000000000,
b4688136 1747 2.0000000000000000, 0.0 },
2be75957 1748 { 20.085536923187668, 2.0000000000000000, 2.0000000000000000,
b4688136 1749 3.0000000000000000, 0.0 },
2be75957 1750 { 54.598150033144236, 2.0000000000000000, 2.0000000000000000,
b4688136 1751 4.0000000000000000, 0.0 },
2be75957 1752 { 148.41315910257660, 2.0000000000000000, 2.0000000000000000,
b4688136 1753 5.0000000000000000, 0.0 },
2be75957 1754 { 403.42879349273511, 2.0000000000000000, 2.0000000000000000,
b4688136 1755 6.0000000000000000, 0.0 },
2be75957 1756 { 1096.6331584284585, 2.0000000000000000, 2.0000000000000000,
b4688136 1757 7.0000000000000000, 0.0 },
2be75957 1758 { 2980.9579870417283, 2.0000000000000000, 2.0000000000000000,
b4688136 1759 8.0000000000000000, 0.0 },
2be75957 1760 { 8103.0839275753842, 2.0000000000000000, 2.0000000000000000,
b4688136 1761 9.0000000000000000, 0.0 },
2be75957 1762 { 22026.465794806718, 2.0000000000000000, 2.0000000000000000,
b4688136 1763 10.000000000000000, 0.0 },
2be75957
ESR
1764};
1765const double toler032 = 2.5000000000000020e-13;
1766
1767// Test data for a=2.0000000000000000, c=3.0000000000000000.
b4688136 1768// max(|f - f_GSL|): 9.0949470177292824e-13 at index 20
2be75957 1769// max(|f - f_GSL| / |f_GSL|): 3.7963989072999328e-15
b4688136
ESR
1770// mean(f - f_GSL): -6.7995212634944630e-14
1771// variance(f - f_GSL): 3.7176372986523090e-26
1772// stddev(f - f_GSL): 1.9281175531207399e-13
2be75957
ESR
1773const testcase_conf_hyperg<double>
1774data033[21] =
1775{
b4688136
ESR
1776 { 0.019990012015452252, 2.0000000000000000, 3.0000000000000000,
1777 -10.000000000000000, 0.0 },
2be75957 1778 { 0.024660886468126749, 2.0000000000000000, 3.0000000000000000,
b4688136 1779 -9.0000000000000000, 0.0 },
2be75957 1780 { 0.031155651135902421, 2.0000000000000000, 3.0000000000000000,
b4688136 1781 -8.0000000000000000, 0.0 },
2be75957 1782 { 0.040518569154104643, 2.0000000000000000, 3.0000000000000000,
b4688136 1783 -7.0000000000000000, 0.0 },
2be75957 1784 { 0.054591596375740861, 2.0000000000000000, 3.0000000000000000,
b4688136 1785 -6.0000000000000000, 0.0 },
2be75957 1786 { 0.076765785440438966, 2.0000000000000000, 3.0000000000000000,
b4688136
ESR
1787 -5.0000000000000000, 0.0 },
1788 { 0.11355272569454114, 2.0000000000000000, 3.0000000000000000,
1789 -4.0000000000000000, 0.0 },
2be75957 1790 { 0.17796705033967650, 2.0000000000000000, 3.0000000000000000,
b4688136 1791 -3.0000000000000000, 0.0 },
2be75957 1792 { 0.29699707514508100, 2.0000000000000000, 3.0000000000000000,
b4688136
ESR
1793 -2.0000000000000000, 0.0 },
1794 { 0.52848223531423089, 2.0000000000000000, 3.0000000000000000,
1795 -1.0000000000000000, 0.0 },
2be75957 1796 { 1.0000000000000000, 2.0000000000000000, 3.0000000000000000,
b4688136
ESR
1797 0.0000000000000000, 0.0 },
1798 { 2.0000000000000004, 2.0000000000000000, 3.0000000000000000,
1799 1.0000000000000000, 0.0 },
2be75957 1800 { 4.1945280494653261, 2.0000000000000000, 3.0000000000000000,
b4688136 1801 2.0000000000000000, 0.0 },
2be75957 1802 { 9.1491275214167409, 2.0000000000000000, 3.0000000000000000,
b4688136 1803 3.0000000000000000, 0.0 },
2be75957 1804 { 20.599306262429089, 2.0000000000000000, 3.0000000000000000,
b4688136 1805 4.0000000000000000, 0.0 },
2be75957 1806 { 47.572210912824517, 2.0000000000000000, 3.0000000000000000,
b4688136 1807 5.0000000000000000, 0.0 },
2be75957 1808 { 112.11910930353754, 2.0000000000000000, 3.0000000000000000,
b4688136 1809 6.0000000000000000, 0.0 },
2be75957 1810 { 268.60403879880613, 2.0000000000000000, 3.0000000000000000,
b4688136 1811 7.0000000000000000, 0.0 },
2be75957 1812 { 652.11580966537815, 2.0000000000000000, 3.0000000000000000,
b4688136 1813 8.0000000000000000, 0.0 },
2be75957 1814 { 1600.6338622371129, 2.0000000000000000, 3.0000000000000000,
b4688136 1815 9.0000000000000000, 0.0 },
2be75957 1816 { 3964.7838430652091, 2.0000000000000000, 3.0000000000000000,
b4688136 1817 10.000000000000000, 0.0 },
2be75957
ESR
1818};
1819const double toler033 = 2.5000000000000020e-13;
1820
1821// Test data for a=2.0000000000000000, c=4.0000000000000000.
b4688136
ESR
1822// max(|f - f_GSL|): 2.2737367544323206e-12 at index 20
1823// max(|f - f_GSL| / |f_GSL|): 2.2177310789485502e-15
1824// mean(f - f_GSL): -1.3190936438383412e-13
1825// variance(f - f_GSL): 2.4083978986000037e-25
1826// stddev(f - f_GSL): 4.9075430702134478e-13
2be75957
ESR
1827const testcase_conf_hyperg<double>
1828data034[21] =
1829{
1830 { 0.048003268794942940, 2.0000000000000000, 4.0000000000000000,
b4688136 1831 -10.000000000000000, 0.0 },
2be75957 1832 { 0.057624341628353531, 2.0000000000000000, 4.0000000000000000,
b4688136 1833 -9.0000000000000000, 0.0 },
2be75957 1834 { 0.070351812026707330, 2.0000000000000000, 4.0000000000000000,
b4688136
ESR
1835 -8.0000000000000000, 0.0 },
1836 { 0.087607118443556675, 2.0000000000000000, 4.0000000000000000,
1837 -7.0000000000000000, 0.0 },
1838 { 0.11166194492814810, 2.0000000000000000, 4.0000000000000000,
1839 -6.0000000000000000, 0.0 },
1840 { 0.14626395019169272, 2.0000000000000000, 4.0000000000000000,
1841 -5.0000000000000000, 0.0 },
1842 { 0.19780254687491297, 2.0000000000000000, 4.0000000000000000,
1843 -4.0000000000000000, 0.0 },
1844 { 0.27754118707540437, 2.0000000000000000, 4.0000000000000000,
1845 -3.0000000000000000, 0.0 },
1846 { 0.40600584970983794, 2.0000000000000000, 4.0000000000000000,
1847 -2.0000000000000000, 0.0 },
1848 { 0.62182994108596157, 2.0000000000000000, 4.0000000000000000,
1849 -1.0000000000000000, 0.0 },
2be75957 1850 { 1.0000000000000000, 2.0000000000000000, 4.0000000000000000,
b4688136
ESR
1851 0.0000000000000000, 0.0 },
1852 { 1.6903090292457281, 2.0000000000000000, 4.0000000000000000,
1853 1.0000000000000000, 0.0 },
1854 { 2.9999999999999987, 2.0000000000000000, 4.0000000000000000,
1855 2.0000000000000000, 0.0 },
1856 { 5.5745637607083687, 2.0000000000000000, 4.0000000000000000,
1857 3.0000000000000000, 0.0 },
2be75957 1858 { 10.799653131214550, 2.0000000000000000, 4.0000000000000000,
b4688136
ESR
1859 4.0000000000000000, 0.0 },
1860 { 21.707494910771032, 2.0000000000000000, 4.0000000000000000,
1861 5.0000000000000000, 0.0 },
1862 { 45.047643721415049, 2.0000000000000000, 4.0000000000000000,
1863 6.0000000000000000, 0.0 },
1864 { 96.072870999573666, 2.0000000000000000, 4.0000000000000000,
1865 7.0000000000000000, 0.0 },
2be75957 1866 { 209.71579596387159, 2.0000000000000000, 4.0000000000000000,
b4688136
ESR
1867 8.0000000000000000, 0.0 },
1868 { 466.93487648582487, 2.0000000000000000, 4.0000000000000000,
1869 9.0000000000000000, 0.0 },
2be75957 1870 { 1057.3423581507243, 2.0000000000000000, 4.0000000000000000,
b4688136 1871 10.000000000000000, 0.0 },
2be75957
ESR
1872};
1873const double toler034 = 2.5000000000000020e-13;
1874
1875// Test data for a=2.0000000000000000, c=5.0000000000000000.
b4688136 1876// max(|f - f_GSL|): 2.8421709430404007e-13 at index 20
2be75957 1877// max(|f - f_GSL| / |f_GSL|): 2.6284159117427726e-15
b4688136
ESR
1878// mean(f - f_GSL): 1.7819079545233762e-14
1879// variance(f - f_GSL): 3.7258148690402422e-27
1880// stddev(f - f_GSL): 6.1039453380909643e-14
2be75957
ESR
1881const testcase_conf_hyperg<double>
1882data035[21] =
1883{
1884 { 0.079198583522191404, 2.0000000000000000, 5.0000000000000000,
b4688136 1885 -10.000000000000000, 0.0 },
2be75957 1886 { 0.093273046483222530, 2.0000000000000000, 5.0000000000000000,
b4688136 1887 -9.0000000000000000, 0.0 },
2be75957 1888 { 0.11130650338531098, 2.0000000000000000, 5.0000000000000000,
b4688136 1889 -8.0000000000000000, 0.0 },
2be75957 1890 { 0.13485262321044020, 2.0000000000000000, 5.0000000000000000,
b4688136 1891 -7.0000000000000000, 0.0 },
2be75957 1892 { 0.16625354130388895, 2.0000000000000000, 5.0000000000000000,
b4688136 1893 -6.0000000000000000, 0.0 },
2be75957 1894 { 0.20913010268188095, 2.0000000000000000, 5.0000000000000000,
b4688136 1895 -5.0000000000000000, 0.0 },
2be75957 1896 { 0.26923036197926808, 2.0000000000000000, 5.0000000000000000,
b4688136 1897 -4.0000000000000000, 0.0 },
2be75957 1898 { 0.35593410067935288, 2.0000000000000000, 5.0000000000000000,
b4688136 1899 -3.0000000000000000, 0.0 },
2be75957 1900 { 0.48498537572540468, 2.0000000000000000, 5.0000000000000000,
b4688136 1901 -2.0000000000000000, 0.0 },
2be75957 1902 { 0.68357364754153715, 2.0000000000000000, 5.0000000000000000,
b4688136 1903 -1.0000000000000000, 0.0 },
2be75957 1904 { 1.0000000000000000, 2.0000000000000000, 5.0000000000000000,
b4688136 1905 0.0000000000000000, 0.0 },
2be75957 1906 { 1.5224722339658285, 2.0000000000000000, 5.0000000000000000,
b4688136 1907 1.0000000000000000, 0.0 },
2be75957 1908 { 2.4164158516040235, 2.0000000000000000, 5.0000000000000000,
b4688136 1909 2.0000000000000000, 0.0 },
2be75957 1910 { 4.0000000000000009, 2.0000000000000000, 5.0000000000000000,
b4688136 1911 3.0000000000000000, 0.0 },
2be75957 1912 { 6.8998265656072721, 2.0000000000000000, 5.0000000000000000,
b4688136 1913 4.0000000000000000, 0.0 },
2be75957 1914 { 12.377330619077886, 2.0000000000000000, 5.0000000000000000,
b4688136 1915 5.0000000000000000, 0.0 },
2be75957 1916 { 23.023821860707503, 2.0000000000000000, 5.0000000000000000,
b4688136
ESR
1917 6.0000000000000000, 0.0 },
1918 { 44.261883885519381, 2.0000000000000000, 5.0000000000000000,
1919 7.0000000000000000, 0.0 },
2be75957 1920 { 87.631581651613160, 2.0000000000000000, 5.0000000000000000,
b4688136 1921 8.0000000000000000, 0.0 },
2be75957 1922 { 178.07042913745681, 2.0000000000000000, 5.0000000000000000,
b4688136 1923 9.0000000000000000, 0.0 },
2be75957 1924 { 370.21982535275242, 2.0000000000000000, 5.0000000000000000,
b4688136 1925 10.000000000000000, 0.0 },
2be75957
ESR
1926};
1927const double toler035 = 2.5000000000000020e-13;
1928
1929// Test data for a=2.0000000000000000, c=6.0000000000000000.
b4688136 1930// max(|f - f_GSL|): 5.1159076974727213e-13 at index 20
2be75957 1931// max(|f - f_GSL| / |f_GSL|): 3.2185367269036845e-15
b4688136
ESR
1932// mean(f - f_GSL): 3.1802602879202997e-14
1933// variance(f - f_GSL): 1.2085325965997663e-26
1934// stddev(f - f_GSL): 1.0993327961085153e-13
2be75957
ESR
1935const testcase_conf_hyperg<double>
1936data036[21] =
1937{
1938 { 0.11120076271882003, 2.0000000000000000, 6.0000000000000000,
b4688136 1939 -10.000000000000000, 0.0 },
2be75957 1940 { 0.12904862943139384, 2.0000000000000000, 6.0000000000000000,
b4688136 1941 -9.0000000000000000, 0.0 },
2be75957 1942 { 0.15138192951001525, 2.0000000000000000, 6.0000000000000000,
b4688136 1943 -8.0000000000000000, 0.0 },
2be75957 1944 { 0.17975865319179699, 2.0000000000000000, 6.0000000000000000,
b4688136 1945 -7.0000000000000000, 0.0 },
2be75957 1946 { 0.21643190620010283, 2.0000000000000000, 6.0000000000000000,
b4688136 1947 -6.0000000000000000, 0.0 },
2be75957 1948 { 0.26472863448288397, 2.0000000000000000, 6.0000000000000000,
b4688136 1949 -5.0000000000000000, 0.0 },
2be75957 1950 { 0.32967091145818839, 2.0000000000000000, 6.0000000000000000,
b4688136 1951 -4.0000000000000000, 0.0 },
2be75957 1952 { 0.41901702645681349, 2.0000000000000000, 6.0000000000000000,
b4688136 1953 -3.0000000000000000, 0.0 },
2be75957 1954 { 0.54504387282378575, 2.0000000000000000, 6.0000000000000000,
b4688136 1955 -2.0000000000000000, 0.0 },
2be75957 1956 { 0.72766470286539298, 2.0000000000000000, 6.0000000000000000,
b4688136 1957 -1.0000000000000000, 0.0 },
2be75957 1958 { 1.0000000000000000, 2.0000000000000000, 6.0000000000000000,
b4688136 1959 0.0000000000000000, 0.0 },
2be75957 1960 { 1.4185417547437151, 2.0000000000000000, 6.0000000000000000,
b4688136 1961 1.0000000000000000, 0.0 },
2be75957 1962 { 2.0820792580201224, 2.0000000000000000, 6.0000000000000000,
b4688136 1963 2.0000000000000000, 0.0 },
2be75957 1964 { 3.1676360873147318, 2.0000000000000000, 6.0000000000000000,
b4688136 1965 3.0000000000000000, 0.0 },
2be75957 1966 { 4.9999999999999982, 2.0000000000000000, 6.0000000000000000,
b4688136 1967 4.0000000000000000, 0.0 },
2be75957 1968 { 8.1886653095389406, 2.0000000000000000, 6.0000000000000000,
b4688136 1969 5.0000000000000000, 0.0 },
2be75957 1970 { 13.902123255948611, 2.0000000000000000, 6.0000000000000000,
b4688136
ESR
1971 6.0000000000000000, 0.0 },
1972 { 24.426009224385382, 2.0000000000000000, 6.0000000000000000,
1973 7.0000000000000000, 0.0 },
1974 { 44.315790825806545, 2.0000000000000000, 6.0000000000000000,
1975 8.0000000000000000, 0.0 },
2be75957 1976 { 82.810383859933609, 2.0000000000000000, 6.0000000000000000,
b4688136 1977 9.0000000000000000, 0.0 },
2be75957 1978 { 158.95135372260788, 2.0000000000000000, 6.0000000000000000,
b4688136 1979 10.000000000000000, 0.0 },
2be75957
ESR
1980};
1981const double toler036 = 2.5000000000000020e-13;
1982
1983// Test data for a=2.0000000000000000, c=7.0000000000000000.
b4688136 1984// max(|f - f_GSL|): 2.1316282072803006e-13 at index 20
2be75957 1985// max(|f - f_GSL| / |f_GSL|): 2.6653456287428861e-15
b4688136
ESR
1986// mean(f - f_GSL): 7.4160254656806591e-15
1987// variance(f - f_GSL): 2.2224165474381737e-27
1988// stddev(f - f_GSL): 4.7142513164214887e-14
2be75957
ESR
1989const testcase_conf_hyperg<double>
1990data037[21] =
1991{
1992 { 0.14279950968075855, 2.0000000000000000, 7.0000000000000000,
b4688136 1993 -10.000000000000000, 0.0 },
2be75957 1994 { 0.16375995835694801, 2.0000000000000000, 7.0000000000000000,
b4688136 1995 -9.0000000000000000, 0.0 },
2be75957 1996 { 0.18950218227311263, 2.0000000000000000, 7.0000000000000000,
b4688136 1997 -8.0000000000000000, 0.0 },
2be75957 1998 { 0.22152437623624174, 2.0000000000000000, 7.0000000000000000,
b4688136 1999 -7.0000000000000000, 0.0 },
2be75957 2000 { 0.26192490317988687, 2.0000000000000000, 7.0000000000000000,
b4688136 2001 -6.0000000000000000, 0.0 },
2be75957 2002 { 0.31369515402282139, 2.0000000000000000, 7.0000000000000000,
b4688136 2003 -5.0000000000000000, 0.0 },
2be75957 2004 { 0.38118033691430731, 2.0000000000000000, 7.0000000000000000,
b4688136 2005 -4.0000000000000000, 0.0 },
2be75957 2006 { 0.47081822524156886, 2.0000000000000000, 7.0000000000000000,
b4688136 2007 -3.0000000000000000, 0.0 },
2be75957 2008 { 0.59234644511675072, 2.0000000000000000, 7.0000000000000000,
b4688136 2009 -2.0000000000000000, 0.0 },
2be75957 2010 { 0.76081413936917086, 2.0000000000000000, 7.0000000000000000,
b4688136 2011 -1.0000000000000000, 0.0 },
2be75957 2012 { 1.0000000000000000, 2.0000000000000000, 7.0000000000000000,
b4688136 2013 0.0000000000000000, 0.0 },
2be75957 2014 { 1.3483340379497220, 2.0000000000000000, 7.0000000000000000,
b4688136 2015 1.0000000000000000, 0.0 },
2be75957 2016 { 1.8693566610905543, 2.0000000000000000, 7.0000000000000000,
b4688136 2017 2.0000000000000000, 0.0 },
2be75957 2018 { 2.6705443492589280, 2.0000000000000000, 7.0000000000000000,
b4688136 2019 3.0000000000000000, 0.0 },
2be75957 2020 { 3.9378251894863650, 2.0000000000000000, 7.0000000000000000,
b4688136 2021 4.0000000000000000, 0.0 },
2be75957 2022 { 6.0000000000000018, 2.0000000000000000, 7.0000000000000000,
b4688136 2023 5.0000000000000000, 0.0 },
2be75957 2024 { 9.4510616279743118, 2.0000000000000000, 7.0000000000000000,
b4688136
ESR
2025 6.0000000000000000, 0.0 },
2026 { 15.386290985363091, 2.0000000000000000, 7.0000000000000000,
2027 7.0000000000000000, 0.0 },
2be75957 2028 { 25.865132339516240, 2.0000000000000000, 7.0000000000000000,
b4688136 2029 8.0000000000000000, 0.0 },
2be75957 2030 { 44.832204725298020, 2.0000000000000000, 7.0000000000000000,
b4688136 2031 9.0000000000000000, 0.0 },
2be75957 2032 { 79.975676861303953, 2.0000000000000000, 7.0000000000000000,
b4688136 2033 10.000000000000000, 0.0 },
2be75957
ESR
2034};
2035const double toler037 = 2.5000000000000020e-13;
2036
2037// Test data for a=2.0000000000000000, c=8.0000000000000000.
b4688136 2038// max(|f - f_GSL|): 3.9079850466805510e-14 at index 18
2be75957 2039// max(|f - f_GSL| / |f_GSL|): 2.3209326942856951e-15
b4688136
ESR
2040// mean(f - f_GSL): -1.4115692741662704e-15
2041// variance(f - f_GSL): 1.0460771032794031e-31
2042// stddev(f - f_GSL): 3.2343115237704035e-16
2be75957
ESR
2043const testcase_conf_hyperg<double>
2044data038[21] =
2045{
2046 { 0.17337636610503362, 2.0000000000000000, 8.0000000000000000,
b4688136 2047 -10.000000000000000, 0.0 },
2be75957 2048 { 0.19686670136921000, 2.0000000000000000, 8.0000000000000000,
b4688136 2049 -9.0000000000000000, 0.0 },
2be75957 2050 { 0.22527678978110538, 2.0000000000000000, 8.0000000000000000,
b4688136 2051 -8.0000000000000000, 0.0 },
2be75957 2052 { 0.26001525907740475, 2.0000000000000000, 8.0000000000000000,
b4688136 2053 -7.0000000000000000, 0.0 },
2be75957 2054 { 0.30300466868014397, 2.0000000000000000, 8.0000000000000000,
b4688136 2055 -6.0000000000000000, 0.0 },
2be75957 2056 { 0.35690946280485503, 2.0000000000000000, 8.0000000000000000,
b4688136 2057 -5.0000000000000000, 0.0 },
2be75957 2058 { 0.42548267822218039, 2.0000000000000000, 8.0000000000000000,
b4688136 2059 -4.0000000000000000, 0.0 },
2be75957 2060 { 0.51410215874088183, 2.0000000000000000, 8.0000000000000000,
b4688136 2061 -3.0000000000000000, 0.0 },
2be75957 2062 { 0.63061421953299790, 2.0000000000000000, 8.0000000000000000,
b4688136 2063 -2.0000000000000000, 0.0 },
2be75957 2064 { 0.78668452848510595, 2.0000000000000000, 8.0000000000000000,
b4688136 2065 -1.0000000000000000, 0.0 },
2be75957 2066 { 1.0000000000000000, 2.0000000000000000, 8.0000000000000000,
b4688136 2067 0.0000000000000000, 0.0 },
2be75957 2068 { 1.2979228320600693, 2.0000000000000000, 8.0000000000000000,
b4688136 2069 1.0000000000000000, 0.0 },
2be75957 2070 { 1.7236644184225898, 2.0000000000000000, 8.0000000000000000,
b4688136 2071 2.0000000000000000, 0.0 },
2be75957 2072 { 2.3469052224062485, 2.0000000000000000, 8.0000000000000000,
b4688136 2073 3.0000000000000000, 0.0 },
2be75957 2074 { 3.2823881632022749, 2.0000000000000000, 8.0000000000000000,
b4688136 2075 4.0000000000000000, 0.0 },
2be75957 2076 { 4.7230422799745782, 2.0000000000000000, 8.0000000000000000,
b4688136 2077 5.0000000000000000, 0.0 },
2be75957 2078 { 7.0000000000000009, 2.0000000000000000, 8.0000000000000000,
b4688136 2079 6.0000000000000000, 0.0 },
2be75957 2080 { 10.693145492681536, 2.0000000000000000, 8.0000000000000000,
b4688136 2081 7.0000000000000000, 0.0 },
2be75957 2082 { 16.837993864717809, 2.0000000000000000, 8.0000000000000000,
b4688136 2083 8.0000000000000000, 0.0 },
2be75957 2084 { 27.318786089757172, 2.0000000000000000, 8.0000000000000000,
b4688136 2085 9.0000000000000000, 0.0 },
2be75957 2086 { 45.626379042330321, 2.0000000000000000, 8.0000000000000000,
b4688136 2087 10.000000000000000, 0.0 },
2be75957
ESR
2088};
2089const double toler038 = 2.5000000000000020e-13;
2090
2091// Test data for a=2.0000000000000000, c=9.0000000000000000.
b4688136 2092// max(|f - f_GSL|): 6.3948846218409017e-14 at index 20
2be75957 2093// max(|f - f_GSL| / |f_GSL|): 2.2223112918020366e-15
b4688136
ESR
2094// mean(f - f_GSL): 5.1453550415068266e-15
2095// variance(f - f_GSL): 1.8153715516608073e-28
2096// stddev(f - f_GSL): 1.3473572472291108e-14
2be75957
ESR
2097const testcase_conf_hyperg<double>
2098data039[21] =
2099{
2100 { 0.20263008881072142, 2.0000000000000000, 9.0000000000000000,
b4688136 2101 -10.000000000000000, 0.0 },
2be75957 2102 { 0.22815601647956382, 2.0000000000000000, 9.0000000000000000,
b4688136 2103 -9.0000000000000000, 0.0 },
2be75957 2104 { 0.25863201094881560, 2.0000000000000000, 9.0000000000000000,
b4688136 2105 -8.0000000000000000, 0.0 },
2be75957 2106 { 0.29536583498165569, 2.0000000000000000, 9.0000000000000000,
b4688136 2107 -7.0000000000000000, 0.0 },
2be75957 2108 { 0.34010436746201422, 2.0000000000000000, 9.0000000000000000,
b4688136 2109 -6.0000000000000000, 0.0 },
2be75957 2110 { 0.39521257401334392, 2.0000000000000000, 9.0000000000000000,
b4688136 2111 -5.0000000000000000, 0.0 },
2be75957 2112 { 0.46393810791120338, 2.0000000000000000, 9.0000000000000000,
b4688136 2113 -4.0000000000000000, 0.0 },
2be75957 2114 { 0.55080841854553553, 2.0000000000000000, 9.0000000000000000,
b4688136 2115 -3.0000000000000000, 0.0 },
2be75957 2116 { 0.66223601210150940, 2.0000000000000000, 9.0000000000000000,
b4688136 2117 -2.0000000000000000, 0.0 },
2be75957 2118 { 0.80745573956474603, 2.0000000000000000, 9.0000000000000000,
b4688136 2119 -1.0000000000000000, 0.0 },
2be75957 2120 { 1.0000000000000000, 2.0000000000000000, 9.0000000000000000,
b4688136 2121 0.0000000000000000, 0.0 },
2be75957 2122 { 1.2600591877766618, 2.0000000000000000, 9.0000000000000000,
b4688136 2123 1.0000000000000000, 0.0 },
2be75957 2124 { 1.6183220921129462, 2.0000000000000000, 9.0000000000000000,
b4688136 2125 2.0000000000000000, 0.0 },
2be75957 2126 { 2.1223296796666578, 2.0000000000000000, 9.0000000000000000,
b4688136 2127 3.0000000000000000, 0.0 },
2be75957 2128 { 2.8471644896068233, 2.0000000000000000, 9.0000000000000000,
b4688136 2129 4.0000000000000000, 0.0 },
2be75957 2130 { 3.9137352959186495, 2.0000000000000000, 9.0000000000000000,
b4688136 2131 5.0000000000000000, 0.0 },
2be75957 2132 { 5.5205708009288541, 2.0000000000000000, 9.0000000000000000,
b4688136 2133 6.0000000000000000, 0.0 },
2be75957 2134 { 7.9999999999999982, 2.0000000000000000, 9.0000000000000000,
b4688136 2135 7.0000000000000000, 0.0 },
2be75957 2136 { 11.918996932358892, 2.0000000000000000, 9.0000000000000000,
b4688136 2137 8.0000000000000000, 0.0 },
2be75957 2138 { 18.262984349485706, 2.0000000000000000, 9.0000000000000000,
b4688136 2139 9.0000000000000000, 0.0 },
2be75957 2140 { 28.775827425398141, 2.0000000000000000, 9.0000000000000000,
b4688136 2141 10.000000000000000, 0.0 },
2be75957
ESR
2142};
2143const double toler039 = 2.5000000000000020e-13;
2144
2145// Test data for a=2.0000000000000000, c=10.000000000000000.
b4688136 2146// max(|f - f_GSL|): 3.5527136788005009e-14 at index 20
2be75957 2147// max(|f - f_GSL| / |f_GSL|): 1.8065720775912871e-15
b4688136
ESR
2148// mean(f - f_GSL): 1.6864816421686901e-15
2149// variance(f - f_GSL): 6.0122471886719455e-29
2150// stddev(f - f_GSL): 7.7538681886345901e-15
2be75957
ESR
2151const testcase_conf_hyperg<double>
2152data040[21] =
2153{
2154 { 0.23043485654507717, 2.0000000000000000, 10.000000000000000,
b4688136 2155 -10.000000000000000, 0.0 },
2be75957 2156 { 0.25758423249046342, 2.0000000000000000, 10.000000000000000,
b4688136 2157 -9.0000000000000000, 0.0 },
2be75957 2158 { 0.28964158686142122, 2.0000000000000000, 10.000000000000000,
b4688136 2159 -8.0000000000000000, 0.0 },
2be75957 2160 { 0.32781237017833142, 2.0000000000000000, 10.000000000000000,
b4688136 2161 -7.0000000000000000, 0.0 },
2be75957 2162 { 0.37367756025366927, 2.0000000000000000, 10.000000000000000,
b4688136 2163 -6.0000000000000000, 0.0 },
2be75957 2164 { 0.42933548067397925, 2.0000000000000000, 10.000000000000000,
b4688136 2165 -5.0000000000000000, 0.0 },
2be75957 2166 { 0.49760646239977369, 2.0000000000000000, 10.000000000000000,
b4688136 2167 -4.0000000000000000, 0.0 },
2be75957 2168 { 0.58233221879973318, 2.0000000000000000, 10.000000000000000,
b4688136 2169 -3.0000000000000000, 0.0 },
2be75957 2170 { 0.68881993949245379, 2.0000000000000000, 10.000000000000000,
b4688136 2171 -2.0000000000000000, 0.0 },
2be75957 2172 { 0.82451063690694526, 2.0000000000000000, 10.000000000000000,
b4688136 2173 -1.0000000000000000, 0.0 },
2be75957 2174 { 1.0000000000000000, 2.0000000000000000, 10.000000000000000,
b4688136 2175 0.0000000000000000, 0.0 },
2be75957 2176 { 1.2306214716549471, 2.0000000000000000, 10.000000000000000,
b4688136 2177 1.0000000000000000, 0.0 },
2be75957 2178 { 1.5389392974099088, 2.0000000000000000, 10.000000000000000,
b4688136 2179 2.0000000000000000, 0.0 },
2be75957 2180 { 1.9587362987499699, 2.0000000000000000, 10.000000000000000,
b4688136 2181 3.0000000000000000, 0.0 },
2be75957 2182 { 2.5414934688204727, 2.0000000000000000, 10.000000000000000,
b4688136 2183 4.0000000000000000, 0.0 },
2be75957 2184 { 3.3670852989803555, 2.0000000000000000, 10.000000000000000,
b4688136 2185 5.0000000000000000, 0.0 },
2be75957 2186 { 4.5617124027865650, 2.0000000000000000, 10.000000000000000,
b4688136 2187 6.0000000000000000, 0.0 },
2be75957 2188 { 6.3284392760597825, 2.0000000000000000, 10.000000000000000,
b4688136 2189 7.0000000000000000, 0.0 },
2be75957 2190 { 9.0000000000000036, 2.0000000000000000, 10.000000000000000,
b4688136 2191 8.0000000000000000, 0.0 },
2be75957 2192 { 13.131492174742865, 2.0000000000000000, 10.000000000000000,
b4688136 2193 9.0000000000000000, 0.0 },
2be75957 2194 { 19.665496455238888, 2.0000000000000000, 10.000000000000000,
b4688136 2195 10.000000000000000, 0.0 },
2be75957
ESR
2196};
2197const double toler040 = 2.5000000000000020e-13;
2198
2199// Test data for a=5.0000000000000000, c=1.0000000000000000.
b4688136 2200// max(|f - f_GSL|): 1.1175870895385742e-08 at index 20
2be75957 2201// max(|f - f_GSL| / |f_GSL|): 5.3427429899548483e-12
b4688136
ESR
2202// mean(f - f_GSL): 7.1806275564715547e-10
2203// variance(f - f_GSL): 5.7417019320980887e-18
2204// stddev(f - f_GSL): 2.3961848701838697e-09
2be75957
ESR
2205const testcase_conf_hyperg<double>
2206data041[21] =
2207{
b4688136
ESR
2208 { 0.00049939922738733312, 5.0000000000000000, 1.0000000000000000,
2209 -10.000000000000000, 0.0 },
2be75957 2210 { -0.00057077034390089253, 5.0000000000000000, 1.0000000000000000,
b4688136 2211 -9.0000000000000000, 0.0 },
2be75957 2212 { -0.0032428054030576147, 5.0000000000000000, 1.0000000000000000,
b4688136 2213 -8.0000000000000000, 0.0 },
2be75957 2214 { -0.0078649819529077025, 5.0000000000000000, 1.0000000000000000,
b4688136 2215 -7.0000000000000000, 0.0 },
2be75957 2216 { -0.012393760883331793, 5.0000000000000000, 1.0000000000000000,
b4688136 2217 -6.0000000000000000, 0.0 },
2be75957 2218 { -0.0087031815404853934, 5.0000000000000000, 1.0000000000000000,
b4688136 2219 -5.0000000000000000, 0.0 },
2be75957 2220 { 0.018315638888832021, 5.0000000000000000, 1.0000000000000000,
b4688136 2221 -4.0000000000000000, 0.0 },
2be75957 2222 { 0.068457219005814696, 5.0000000000000000, 1.0000000000000000,
b4688136 2223 -3.0000000000000000, 0.0 },
2be75957 2224 { 0.045111761078875295, 5.0000000000000000, 1.0000000000000000,
b4688136 2225 -2.0000000000000000, 0.0 },
2be75957 2226 { -0.22992465073215118, 5.0000000000000000, 1.0000000000000000,
b4688136 2227 -1.0000000000000000, 0.0 },
2be75957 2228 { 1.0000000000000000, 5.0000000000000000, 1.0000000000000000,
b4688136 2229 0.0000000000000000, 0.0 },
2be75957 2230 { 23.671704256164183, 5.0000000000000000, 1.0000000000000000,
b4688136 2231 1.0000000000000000, 0.0 },
2be75957 2232 { 199.50451467112745, 5.0000000000000000, 1.0000000000000000,
b4688136 2233 2.0000000000000000, 0.0 },
2be75957 2234 { 1232.7498286606428, 5.0000000000000000, 1.0000000000000000,
b4688136 2235 3.0000000000000000, 0.0 },
2be75957 2236 { 6460.7810872554019, 5.0000000000000000, 1.0000000000000000,
b4688136 2237 4.0000000000000000, 0.0 },
2be75957 2238 { 30480.352550691663, 5.0000000000000000, 1.0000000000000000,
b4688136 2239 5.0000000000000000, 0.0 },
2be75957 2240 { 133534.93064609537, 5.0000000000000000, 1.0000000000000000,
b4688136 2241 6.0000000000000000, 0.0 },
2be75957 2242 { 553479.89366849652, 5.0000000000000000, 1.0000000000000000,
b4688136 2243 7.0000000000000000, 0.0 },
2be75957 2244 { 2196966.0364497532, 5.0000000000000000, 1.0000000000000000,
b4688136 2245 8.0000000000000000, 0.0 },
2be75957 2246 { 8422142.8572236635, 5.0000000000000000, 1.0000000000000000,
b4688136 2247 9.0000000000000000, 0.0 },
2be75957 2248 { 31373029.447069697, 5.0000000000000000, 1.0000000000000000,
b4688136 2249 10.000000000000000, 0.0 },
2be75957
ESR
2250};
2251const double toler041 = 5.0000000000000034e-10;
2252
2253// Test data for a=5.0000000000000000, c=2.0000000000000000.
b4688136 2254// max(|f - f_GSL|): 1.8626451492309570e-09 at index 20
2be75957 2255// max(|f - f_GSL| / |f_GSL|): 1.4711248979266200e-12
b4688136
ESR
2256// mean(f - f_GSL): -8.7549301031074165e-11
2257// variance(f - f_GSL): 1.6542567669056424e-19
2258// stddev(f - f_GSL): 4.0672555450889020e-10
2be75957
ESR
2259const testcase_conf_hyperg<double>
2260data042[21] =
2261{
b4688136
ESR
2262 { -0.00025726626865408083, 5.0000000000000000, 2.0000000000000000,
2263 -10.000000000000000, 0.0 },
2be75957 2264 { -0.00029309828470586396, 5.0000000000000000, 2.0000000000000000,
b4688136 2265 -9.0000000000000000, 0.0 },
2be75957 2266 { -0.00011182087596750400, 5.0000000000000000, 2.0000000000000000,
b4688136 2267 -8.0000000000000000, 0.0 },
2be75957 2268 { 0.00064591639226778245, 5.0000000000000000, 2.0000000000000000,
b4688136 2269 -7.0000000000000000, 0.0 },
2be75957 2270 { 0.0024787521766663585, 5.0000000000000000, 2.0000000000000000,
b4688136 2271 -6.0000000000000000, 0.0 },
2be75957 2272 { 0.0053342080409426616, 5.0000000000000000, 2.0000000000000000,
b4688136 2273 -5.0000000000000000, 0.0 },
2be75957 2274 { 0.0061052129629022966, 5.0000000000000000, 2.0000000000000000,
b4688136 2275 -4.0000000000000000, 0.0 },
2be75957 2276 { -0.0062233835459823200, 5.0000000000000000, 2.0000000000000000,
b4688136 2277 -3.0000000000000000, 0.0 },
2be75957 2278 { -0.045111761078871798, 5.0000000000000000, 2.0000000000000000,
b4688136 2279 -2.0000000000000000, 0.0 },
2be75957 2280 { -0.015328310048810216, 5.0000000000000000, 2.0000000000000000,
b4688136 2281 -1.0000000000000000, 0.0 },
2be75957 2282 { 1.0000000000000000, 5.0000000000000000, 2.0000000000000000,
b4688136 2283 0.0000000000000000, 0.0 },
2be75957 2284 { 8.2681072282295975, 5.0000000000000000, 2.0000000000000000,
b4688136 2285 1.0000000000000000, 0.0 },
2be75957 2286 { 46.797355293227440, 5.0000000000000000, 2.0000000000000000,
b4688136 2287 2.0000000000000000, 0.0 },
2be75957 2288 { 223.45159827046285, 5.0000000000000000, 2.0000000000000000,
b4688136 2289 3.0000000000000000, 0.0 },
2be75957 2290 { 964.56731725221459, 5.0000000000000000, 2.0000000000000000,
b4688136 2291 4.0000000000000000, 0.0 },
2be75957 2292 { 3889.6615448133625, 5.0000000000000000, 2.0000000000000000,
b4688136 2293 5.0000000000000000, 0.0 },
2be75957 2294 { 14926.865359231202, 5.0000000000000000, 2.0000000000000000,
b4688136 2295 6.0000000000000000, 0.0 },
2be75957 2296 { 55151.509259297891, 5.0000000000000000, 2.0000000000000000,
b4688136 2297 7.0000000000000000, 0.0 },
2be75957 2298 { 197736.87980710136, 5.0000000000000000, 2.0000000000000000,
b4688136 2299 8.0000000000000000, 0.0 },
2be75957 2300 { 691800.79031674843, 5.0000000000000000, 2.0000000000000000,
b4688136 2301 9.0000000000000000, 0.0 },
2be75957 2302 { 2371516.1505741901, 5.0000000000000000, 2.0000000000000000,
b4688136 2303 10.000000000000000, 0.0 },
2be75957
ESR
2304};
2305const double toler042 = 1.0000000000000006e-10;
2306
2307// Test data for a=5.0000000000000000, c=3.0000000000000000.
b4688136
ESR
2308// max(|f - f_GSL|): 5.8207660913467407e-11 at index 20
2309// max(|f - f_GSL| / |f_GSL|): 7.8460745975133666e-13
2310// mean(f - f_GSL): 4.8403470031658968e-12
2311// variance(f - f_GSL): 1.4952368518503471e-22
2312// stddev(f - f_GSL): 1.2227987781521321e-11
2be75957
ESR
2313const testcase_conf_hyperg<double>
2314data043[21] =
2315{
b4688136
ESR
2316 { 0.00012106647936662628, 5.0000000000000000, 3.0000000000000000,
2317 -10.000000000000000, 0.0 },
2be75957 2318 { 0.00021596715715168925, 5.0000000000000000, 3.0000000000000000,
b4688136 2319 -9.0000000000000000, 0.0 },
2be75957 2320 { 0.00033546262790251185, 5.0000000000000000, 3.0000000000000000,
b4688136 2321 -8.0000000000000000, 0.0 },
2be75957 2322 { 0.00037995081898104839, 5.0000000000000000, 3.0000000000000000,
b4688136 2323 -7.0000000000000000, 0.0 },
2be75957 2324 { 0.0000000000000000, 5.0000000000000000, 3.0000000000000000,
b4688136 2325 -6.0000000000000000, 0.0 },
2be75957 2326 { -0.0016844867497713668, 5.0000000000000000, 3.0000000000000000,
b4688136
ESR
2327 -5.0000000000000000, 0.0 },
2328 { -0.0061052129629113926, 5.0000000000000000, 3.0000000000000000,
2329 -4.0000000000000000, 0.0 },
2be75957 2330 { -0.012446767091965986, 5.0000000000000000, 3.0000000000000000,
b4688136 2331 -3.0000000000000000, 0.0 },
2be75957 2332 { 0.0000000000000000, 5.0000000000000000, 3.0000000000000000,
b4688136
ESR
2333 -2.0000000000000000, 0.0 },
2334 { 0.15328310048810098, 5.0000000000000000, 3.0000000000000000,
2335 -1.0000000000000000, 0.0 },
2be75957 2336 { 1.0000000000000000, 5.0000000000000000, 3.0000000000000000,
b4688136
ESR
2337 0.0000000000000000, 0.0 },
2338 { 4.7569931998033299, 5.0000000000000000, 3.0000000000000000,
2339 1.0000000000000000, 0.0 },
2be75957 2340 { 19.704149597148401, 5.0000000000000000, 3.0000000000000000,
b4688136 2341 2.0000000000000000, 0.0 },
2be75957 2342 { 75.320763461953760, 5.0000000000000000, 3.0000000000000000,
b4688136 2343 3.0000000000000000, 0.0 },
2be75957 2344 { 272.99075016572118, 5.0000000000000000, 3.0000000000000000,
b4688136 2345 4.0000000000000000, 0.0 },
2be75957 2346 { 952.31777090819992, 5.0000000000000000, 3.0000000000000000,
b4688136 2347 5.0000000000000000, 0.0 },
2be75957 2348 { 3227.4303479418809, 5.0000000000000000, 3.0000000000000000,
b4688136 2349 6.0000000000000000, 0.0 },
2be75957 2350 { 10692.173294677470, 5.0000000000000000, 3.0000000000000000,
b4688136 2351 7.0000000000000000, 0.0 },
2be75957 2352 { 34777.843182153498, 5.0000000000000000, 3.0000000000000000,
b4688136 2353 8.0000000000000000, 0.0 },
2be75957 2354 { 111417.40400416154, 5.0000000000000000, 3.0000000000000000,
b4688136 2355 9.0000000000000000, 0.0 },
2be75957 2356 { 352423.45271690749, 5.0000000000000000, 3.0000000000000000,
b4688136 2357 10.000000000000000, 0.0 },
2be75957
ESR
2358};
2359const double toler043 = 5.0000000000000028e-11;
2360
2361// Test data for a=5.0000000000000000, c=4.0000000000000000.
b4688136 2362// max(|f - f_GSL|): 1.4551915228366852e-11 at index 20
2be75957 2363// max(|f - f_GSL| / |f_GSL|): 4.8846719461489400e-13
b4688136
ESR
2364// mean(f - f_GSL): -4.3556563012715198e-13
2365// variance(f - f_GSL): 1.0461744613935412e-23
2366// stddev(f - f_GSL): 3.2344620285196441e-12
2be75957
ESR
2367const testcase_conf_hyperg<double>
2368data044[21] =
2369{
2370 { -6.8099894643727278e-05, 5.0000000000000000, 4.0000000000000000,
b4688136 2371 -10.000000000000000, 0.0 },
2be75957 2372 { -0.00015426225510834944, 5.0000000000000000, 4.0000000000000000,
b4688136 2373 -9.0000000000000000, 0.0 },
2be75957 2374 { -0.00033546262790251185, 5.0000000000000000, 4.0000000000000000,
b4688136 2375 -8.0000000000000000, 0.0 },
2be75957 2376 { -0.00068391147416588716, 5.0000000000000000, 4.0000000000000000,
b4688136 2377 -7.0000000000000000, 0.0 },
2be75957 2378 { -0.0012393760883331792, 5.0000000000000000, 4.0000000000000000,
b4688136 2379 -6.0000000000000000, 0.0 },
2be75957 2380 { -0.0016844867497713668, 5.0000000000000000, 4.0000000000000000,
b4688136 2381 -5.0000000000000000, 0.0 },
2be75957 2382 { 0.0000000000000000, 5.0000000000000000, 4.0000000000000000,
b4688136 2383 -4.0000000000000000, 0.0 },
2be75957 2384 { 0.012446767091965986, 5.0000000000000000, 4.0000000000000000,
b4688136 2385 -3.0000000000000000, 0.0 },
2be75957 2386 { 0.067667641618306351, 5.0000000000000000, 4.0000000000000000,
b4688136
ESR
2387 -2.0000000000000000, 0.0 },
2388 { 0.27590958087858170, 5.0000000000000000, 4.0000000000000000,
2389 -1.0000000000000000, 0.0 },
2be75957 2390 { 1.0000000000000000, 5.0000000000000000, 4.0000000000000000,
b4688136
ESR
2391 0.0000000000000000, 0.0 },
2392 { 3.3978522855738067, 5.0000000000000000, 4.0000000000000000,
2393 1.0000000000000000, 0.0 },
2be75957 2394 { 11.083584148395975, 5.0000000000000000, 4.0000000000000000,
b4688136 2395 2.0000000000000000, 0.0 },
2be75957 2396 { 35.149689615578417, 5.0000000000000000, 4.0000000000000000,
b4688136 2397 3.0000000000000000, 0.0 },
2be75957 2398 { 109.19630006628847, 5.0000000000000000, 4.0000000000000000,
b4688136 2399 4.0000000000000000, 0.0 },
2be75957 2400 { 333.92960798079736, 5.0000000000000000, 4.0000000000000000,
b4688136 2401 5.0000000000000000, 0.0 },
2be75957 2402 { 1008.5719837318378, 5.0000000000000000, 4.0000000000000000,
b4688136 2403 6.0000000000000000, 0.0 },
2be75957 2404 { 3015.7411856782610, 5.0000000000000000, 4.0000000000000000,
b4688136 2405 7.0000000000000000, 0.0 },
2be75957 2406 { 8942.8739611251840, 5.0000000000000000, 4.0000000000000000,
b4688136 2407 8.0000000000000000, 0.0 },
2be75957 2408 { 26335.022764620000, 5.0000000000000000, 4.0000000000000000,
b4688136 2409 9.0000000000000000, 0.0 },
2be75957 2410 { 77092.630281823513, 5.0000000000000000, 4.0000000000000000,
b4688136 2411 10.000000000000000, 0.0 },
2be75957
ESR
2412};
2413const double toler044 = 2.5000000000000014e-11;
2414
2415// Test data for a=5.0000000000000000, c=5.0000000000000000.
b4688136 2416// max(|f - f_GSL|): 0.0000000000000000 at index 0
2be75957 2417// max(|f - f_GSL| / |f_GSL|): 0.0000000000000000
b4688136
ESR
2418// mean(f - f_GSL): 0.0000000000000000
2419// variance(f - f_GSL): 0.0000000000000000
2420// stddev(f - f_GSL): 0.0000000000000000
2be75957
ESR
2421const testcase_conf_hyperg<double>
2422data045[21] =
2423{
b4688136
ESR
2424 { 4.5399929762484847e-05, 5.0000000000000000, 5.0000000000000000,
2425 -10.000000000000000, 0.0 },
2be75957 2426 { 0.00012340980408667956, 5.0000000000000000, 5.0000000000000000,
b4688136 2427 -9.0000000000000000, 0.0 },
2be75957 2428 { 0.00033546262790251185, 5.0000000000000000, 5.0000000000000000,
b4688136 2429 -8.0000000000000000, 0.0 },
2be75957 2430 { 0.00091188196555451624, 5.0000000000000000, 5.0000000000000000,
b4688136 2431 -7.0000000000000000, 0.0 },
2be75957 2432 { 0.0024787521766663585, 5.0000000000000000, 5.0000000000000000,
b4688136 2433 -6.0000000000000000, 0.0 },
2be75957 2434 { 0.0067379469990854670, 5.0000000000000000, 5.0000000000000000,
b4688136
ESR
2435 -5.0000000000000000, 0.0 },
2436 { 0.018315638888734182, 5.0000000000000000, 5.0000000000000000,
2437 -4.0000000000000000, 0.0 },
2be75957 2438 { 0.049787068367863944, 5.0000000000000000, 5.0000000000000000,
b4688136 2439 -3.0000000000000000, 0.0 },
2be75957 2440 { 0.13533528323661270, 5.0000000000000000, 5.0000000000000000,
b4688136
ESR
2441 -2.0000000000000000, 0.0 },
2442 { 0.36787944117144228, 5.0000000000000000, 5.0000000000000000,
2443 -1.0000000000000000, 0.0 },
2be75957 2444 { 1.0000000000000000, 5.0000000000000000, 5.0000000000000000,
b4688136
ESR
2445 0.0000000000000000, 0.0 },
2446 { 2.7182818284590455, 5.0000000000000000, 5.0000000000000000,
2447 1.0000000000000000, 0.0 },
2be75957 2448 { 7.3890560989306504, 5.0000000000000000, 5.0000000000000000,
b4688136 2449 2.0000000000000000, 0.0 },
2be75957 2450 { 20.085536923187668, 5.0000000000000000, 5.0000000000000000,
b4688136 2451 3.0000000000000000, 0.0 },
2be75957 2452 { 54.598150033144236, 5.0000000000000000, 5.0000000000000000,
b4688136 2453 4.0000000000000000, 0.0 },
2be75957 2454 { 148.41315910257660, 5.0000000000000000, 5.0000000000000000,
b4688136 2455 5.0000000000000000, 0.0 },
2be75957 2456 { 403.42879349273511, 5.0000000000000000, 5.0000000000000000,
b4688136 2457 6.0000000000000000, 0.0 },
2be75957 2458 { 1096.6331584284585, 5.0000000000000000, 5.0000000000000000,
b4688136 2459 7.0000000000000000, 0.0 },
2be75957 2460 { 2980.9579870417283, 5.0000000000000000, 5.0000000000000000,
b4688136 2461 8.0000000000000000, 0.0 },
2be75957 2462 { 8103.0839275753842, 5.0000000000000000, 5.0000000000000000,
b4688136 2463 9.0000000000000000, 0.0 },
2be75957 2464 { 22026.465794806718, 5.0000000000000000, 5.0000000000000000,
b4688136 2465 10.000000000000000, 0.0 },
2be75957
ESR
2466};
2467const double toler045 = 2.5000000000000020e-13;
2468
2469// Test data for a=5.0000000000000000, c=6.0000000000000000.
b4688136
ESR
2470// max(|f - f_GSL|): 9.0949470177292824e-13 at index 19
2471// max(|f - f_GSL| / |f_GSL|): 1.4519358507818386e-13
2472// mean(f - f_GSL): 3.9988628727782860e-14
2473// variance(f - f_GSL): 4.7329726232182936e-26
2474// stddev(f - f_GSL): 2.1755396165591409e-13
2be75957
ESR
2475const testcase_conf_hyperg<double>
2476data046[21] =
2477{
b4688136
ESR
2478 { 0.0011648967743076429, 5.0000000000000000, 6.0000000000000000,
2479 -10.000000000000000, 0.0 },
2be75957 2480 { 0.0019205128456127479, 5.0000000000000000, 6.0000000000000000,
b4688136
ESR
2481 -9.0000000000000000, 0.0 },
2482 { 0.0032972446271226324, 5.0000000000000000, 6.0000000000000000,
2483 -8.0000000000000000, 0.0 },
2484 { 0.0059047424914709015, 5.0000000000000000, 6.0000000000000000,
2485 -7.0000000000000000, 0.0 },
2be75957 2486 { 0.011033078698817415, 5.0000000000000000, 6.0000000000000000,
b4688136 2487 -6.0000000000000000, 0.0 },
2be75957 2488 { 0.021485057853495849, 5.0000000000000000, 6.0000000000000000,
b4688136
ESR
2489 -5.0000000000000000, 0.0 },
2490 { 0.043495671658608570, 5.0000000000000000, 6.0000000000000000,
2491 -4.0000000000000000, 0.0 },
2be75957 2492 { 0.091228027395668113, 5.0000000000000000, 6.0000000000000000,
b4688136 2493 -3.0000000000000000, 0.0 },
2be75957 2494 { 0.19744881503891684, 5.0000000000000000, 6.0000000000000000,
b4688136
ESR
2495 -2.0000000000000000, 0.0 },
2496 { 0.43918161928124544, 5.0000000000000000, 6.0000000000000000,
2497 -1.0000000000000000, 0.0 },
2be75957 2498 { 1.0000000000000000, 5.0000000000000000, 6.0000000000000000,
b4688136
ESR
2499 0.0000000000000000, 0.0 },
2500 { 2.3226822806570357, 5.0000000000000000, 6.0000000000000000,
2501 1.0000000000000000, 0.0 },
2be75957 2502 { 5.4863201236633126, 5.0000000000000000, 6.0000000000000000,
b4688136 2503 2.0000000000000000, 0.0 },
2be75957 2504 { 13.144500379942246, 5.0000000000000000, 6.0000000000000000,
b4688136 2505 3.0000000000000000, 0.0 },
2be75957 2506 { 31.873916035045458, 5.0000000000000000, 6.0000000000000000,
b4688136 2507 4.0000000000000000, 0.0 },
2be75957 2508 { 78.086286951596321, 5.0000000000000000, 6.0000000000000000,
b4688136 2509 5.0000000000000000, 0.0 },
2be75957 2510 { 192.98291046720357, 5.0000000000000000, 6.0000000000000000,
b4688136 2511 6.0000000000000000, 0.0 },
2be75957 2512 { 480.54877204888402, 5.0000000000000000, 6.0000000000000000,
b4688136 2513 7.0000000000000000, 0.0 },
2be75957 2514 { 1204.4605636118315, 5.0000000000000000, 6.0000000000000000,
b4688136 2515 8.0000000000000000, 0.0 },
2be75957 2516 { 3036.1329048350581, 5.0000000000000000, 6.0000000000000000,
b4688136 2517 9.0000000000000000, 0.0 },
2be75957 2518 { 7691.6406555465046, 5.0000000000000000, 6.0000000000000000,
b4688136 2519 10.000000000000000, 0.0 },
2be75957
ESR
2520};
2521const double toler046 = 1.0000000000000006e-11;
2522
2523// Test data for a=5.0000000000000000, c=7.0000000000000000.
b4688136 2524// max(|f - f_GSL|): 1.0004441719502211e-11 at index 20
2be75957 2525// max(|f - f_GSL| / |f_GSL|): 5.0762860793473551e-14
b4688136
ESR
2526// mean(f - f_GSL): 3.9645909323339697e-13
2527// variance(f - f_GSL): 4.8464498327008765e-24
2528// stddev(f - f_GSL): 2.2014653830348723e-12
2be75957
ESR
2529const testcase_conf_hyperg<double>
2530data047[21] =
2531{
2532 { 0.0036308901122103932, 5.0000000000000000, 7.0000000000000000,
b4688136 2533 -10.000000000000000, 0.0 },
2be75957 2534 { 0.0055327336019229401, 5.0000000000000000, 7.0000000000000000,
b4688136 2535 -9.0000000000000000, 0.0 },
2be75957 2536 { 0.0086767852656603455, 5.0000000000000000, 7.0000000000000000,
b4688136 2537 -8.0000000000000000, 0.0 },
2be75957 2538 { 0.014030481266326614, 5.0000000000000000, 7.0000000000000000,
b4688136 2539 -7.0000000000000000, 0.0 },
2be75957 2540 { 0.023426839582149212, 5.0000000000000000, 7.0000000000000000,
b4688136 2541 -6.0000000000000000, 0.0 },
2be75957 2542 { 0.040427681994512799, 5.0000000000000000, 7.0000000000000000,
b4688136 2543 -5.0000000000000000, 0.0 },
2be75957 2544 { 0.072123784177593755, 5.0000000000000000, 7.0000000000000000,
b4688136 2545 -4.0000000000000000, 0.0 },
2be75957 2546 { 0.13295857409596740, 5.0000000000000000, 7.0000000000000000,
b4688136 2547 -3.0000000000000000, 0.0 },
2be75957 2548 { 0.25298991319893882, 5.0000000000000000, 7.0000000000000000,
b4688136 2549 -2.0000000000000000, 0.0 },
2be75957 2550 { 0.49602437239337821, 5.0000000000000000, 7.0000000000000000,
b4688136 2551 -1.0000000000000000, 0.0 },
2be75957 2552 { 1.0000000000000000, 5.0000000000000000, 7.0000000000000000,
b4688136 2553 0.0000000000000000, 0.0 },
2be75957 2554 { 2.0681072498819240, 5.0000000000000000, 7.0000000000000000,
b4688136 2555 1.0000000000000000, 0.0 },
2be75957 2556 { 4.3768811129698140, 5.0000000000000000, 7.0000000000000000,
b4688136 2557 2.0000000000000000, 0.0 },
2be75957 2558 { 9.4566368471992224, 5.0000000000000000, 7.0000000000000000,
b4688136 2559 3.0000000000000000, 0.0 },
2be75957 2560 { 20.811741224531826, 5.0000000000000000, 7.0000000000000000,
b4688136 2561 4.0000000000000000, 0.0 },
2be75957 2562 { 46.556488803696276, 5.0000000000000000, 7.0000000000000000,
b4688136 2563 5.0000000000000000, 0.0 },
2be75957 2564 { 105.66804767556316, 5.0000000000000000, 7.0000000000000000,
b4688136
ESR
2565 6.0000000000000000, 0.0 },
2566 { 242.93097638084427, 5.0000000000000000, 7.0000000000000000,
2567 7.0000000000000000, 0.0 },
2be75957 2568 { 564.89804380887358, 5.0000000000000000, 7.0000000000000000,
b4688136 2569 8.0000000000000000, 0.0 },
2be75957 2570 { 1326.9606865425994, 5.0000000000000000, 7.0000000000000000,
b4688136 2571 9.0000000000000000, 0.0 },
2be75957 2572 { 3145.3685154983905, 5.0000000000000000, 7.0000000000000000,
b4688136 2573 10.000000000000000, 0.0 },
2be75957
ESR
2574};
2575const double toler047 = 5.0000000000000029e-12;
2576
2577// Test data for a=5.0000000000000000, c=8.0000000000000000.
b4688136 2578// max(|f - f_GSL|): 6.2527760746888816e-13 at index 18
2be75957 2579// max(|f - f_GSL| / |f_GSL|): 3.7668660800670828e-14
b4688136
ESR
2580// mean(f - f_GSL): -1.0866266550578816e-14
2581// variance(f - f_GSL): 1.1381792138997471e-26
2582// stddev(f - f_GSL): 1.0668548232537298e-13
2be75957
ESR
2583const testcase_conf_hyperg<double>
2584data048[21] =
2585{
2586 { 0.0075295293831406113, 5.0000000000000000, 8.0000000000000000,
b4688136 2587 -10.000000000000000, 0.0 },
2be75957 2588 { 0.010936052508673187, 5.0000000000000000, 8.0000000000000000,
b4688136 2589 -9.0000000000000000, 0.0 },
2be75957 2590 { 0.016247454253649721, 5.0000000000000000, 8.0000000000000000,
b4688136 2591 -8.0000000000000000, 0.0 },
2be75957 2592 { 0.024729468107576008, 5.0000000000000000, 8.0000000000000000,
b4688136 2593 -7.0000000000000000, 0.0 },
2be75957 2594 { 0.038615775445860964, 5.0000000000000000, 8.0000000000000000,
b4688136 2595 -6.0000000000000000, 0.0 },
2be75957 2596 { 0.061937865588523586, 5.0000000000000000, 8.0000000000000000,
b4688136 2597 -5.0000000000000000, 0.0 },
2be75957 2598 { 0.10213565389690644, 5.0000000000000000, 8.0000000000000000,
b4688136 2599 -4.0000000000000000, 0.0 },
2be75957 2600 { 0.17324118243379236, 5.0000000000000000, 8.0000000000000000,
b4688136 2601 -3.0000000000000000, 0.0 },
2be75957 2602 { 0.30228316551605494, 5.0000000000000000, 8.0000000000000000,
b4688136 2603 -2.0000000000000000, 0.0 },
2be75957 2604 { 0.54238748802203829, 5.0000000000000000, 8.0000000000000000,
b4688136 2605 -1.0000000000000000, 0.0 },
2be75957 2606 { 1.0000000000000000, 5.0000000000000000, 8.0000000000000000,
b4688136 2607 0.0000000000000000, 0.0 },
2be75957 2608 { 1.8922997283093959, 5.0000000000000000, 8.0000000000000000,
b4688136 2609 1.0000000000000000, 0.0 },
2be75957 2610 { 3.6699742831126270, 5.0000000000000000, 8.0000000000000000,
b4688136 2611 2.0000000000000000, 0.0 },
2be75957 2612 { 7.2831842359960941, 5.0000000000000000, 8.0000000000000000,
b4688136 2613 3.0000000000000000, 0.0 },
2be75957 2614 { 14.764676530664770, 5.0000000000000000, 8.0000000000000000,
b4688136 2615 4.0000000000000000, 0.0 },
2be75957 2616 { 30.522558591756702, 5.0000000000000000, 8.0000000000000000,
b4688136 2617 5.0000000000000000, 0.0 },
2be75957 2618 { 64.236147093730224, 5.0000000000000000, 8.0000000000000000,
b4688136 2619 6.0000000000000000, 0.0 },
2be75957 2620 { 137.40503032883331, 5.0000000000000000, 8.0000000000000000,
b4688136 2621 7.0000000000000000, 0.0 },
2be75957 2622 { 298.29153884828770, 5.0000000000000000, 8.0000000000000000,
b4688136 2623 8.0000000000000000, 0.0 },
2be75957 2624 { 656.29389355002752, 5.0000000000000000, 8.0000000000000000,
b4688136 2625 9.0000000000000000, 0.0 },
2be75957 2626 { 1461.6183101433730, 5.0000000000000000, 8.0000000000000000,
b4688136 2627 10.000000000000000, 0.0 },
2be75957
ESR
2628};
2629const double toler048 = 2.5000000000000015e-12;
2630
2631// Test data for a=5.0000000000000000, c=9.0000000000000000.
b4688136 2632// max(|f - f_GSL|): 1.4779288903810084e-12 at index 20
2be75957 2633// max(|f - f_GSL| / |f_GSL|): 1.3332193464342236e-14
b4688136
ESR
2634// mean(f - f_GSL): 1.0197547171765718e-13
2635// variance(f - f_GSL): 9.9395510042396581e-26
2636// stddev(f - f_GSL): 3.1527053468790352e-13
2be75957
ESR
2637const testcase_conf_hyperg<double>
2638data049[21] =
2639{
2640 { 0.012801285049305222, 5.0000000000000000, 9.0000000000000000,
b4688136 2641 -10.000000000000000, 0.0 },
2be75957 2642 { 0.017955923031350202, 5.0000000000000000, 9.0000000000000000,
b4688136 2643 -9.0000000000000000, 0.0 },
2be75957 2644 { 0.025661650371090718, 5.0000000000000000, 9.0000000000000000,
b4688136 2645 -8.0000000000000000, 0.0 },
2be75957 2646 { 0.037414616710204310, 5.0000000000000000, 9.0000000000000000,
b4688136 2647 -7.0000000000000000, 0.0 },
2be75957 2648 { 0.055720934057414885, 5.0000000000000000, 9.0000000000000000,
b4688136 2649 -6.0000000000000000, 0.0 },
2be75957 2650 { 0.084862956151756000, 5.0000000000000000, 9.0000000000000000,
b4688136 2651 -5.0000000000000000, 0.0 },
2be75957 2652 { 0.13230635170162319, 5.0000000000000000, 9.0000000000000000,
b4688136 2653 -4.0000000000000000, 0.0 },
2be75957 2654 { 0.21132914572142125, 5.0000000000000000, 9.0000000000000000,
b4688136 2655 -3.0000000000000000, 0.0 },
2be75957 2656 { 0.34601808641639625, 5.0000000000000000, 9.0000000000000000,
b4688136 2657 -2.0000000000000000, 0.0 },
2be75957 2658 { 0.58092180965710882, 5.0000000000000000, 9.0000000000000000,
b4688136 2659 -1.0000000000000000, 0.0 },
2be75957 2660 { 1.0000000000000000, 5.0000000000000000, 9.0000000000000000,
b4688136 2661 0.0000000000000000, 0.0 },
2be75957 2662 { 1.7643922061378634, 5.0000000000000000, 9.0000000000000000,
b4688136 2663 1.0000000000000000, 0.0 },
2be75957 2664 { 3.1888010096332451, 5.0000000000000000, 9.0000000000000000,
b4688136 2665 2.0000000000000000, 0.0 },
2be75957 2666 { 5.8981194929479273, 5.0000000000000000, 9.0000000000000000,
b4688136 2667 3.0000000000000000, 0.0 },
2be75957 2668 { 11.152835510393174, 5.0000000000000000, 9.0000000000000000,
b4688136 2669 4.0000000000000000, 0.0 },
2be75957 2670 { 21.533483453443495, 5.0000000000000000, 9.0000000000000000,
b4688136 2671 5.0000000000000000, 0.0 },
2be75957 2672 { 42.397145995355721, 5.0000000000000000, 9.0000000000000000,
b4688136 2673 6.0000000000000000, 0.0 },
2be75957 2674 { 85.010891404859976, 5.0000000000000000, 9.0000000000000000,
b4688136 2675 7.0000000000000000, 0.0 },
2be75957 2676 { 173.36225868739959, 5.0000000000000000, 9.0000000000000000,
b4688136 2677 8.0000000000000000, 0.0 },
2be75957 2678 { 359.10444177844266, 5.0000000000000000, 9.0000000000000000,
b4688136 2679 9.0000000000000000, 0.0 },
2be75957 2680 { 754.64844371961408, 5.0000000000000000, 9.0000000000000000,
b4688136 2681 10.000000000000000, 0.0 },
2be75957
ESR
2682};
2683const double toler049 = 1.0000000000000008e-12;
2684
2685// Test data for a=5.0000000000000000, c=10.000000000000000.
b4688136
ESR
2686// max(|f - f_GSL|): 5.1159076974727213e-13 at index 20
2687// max(|f - f_GSL| / |f_GSL|): 7.6335218104993094e-15
2688// mean(f - f_GSL): -5.4482542815883388e-14
2689// variance(f - f_GSL): 1.0969766384238795e-26
2690// stddev(f - f_GSL): 1.0473665253500703e-13
2be75957
ESR
2691const testcase_conf_hyperg<double>
2692data050[21] =
2693{
2694 { 0.019313731161840469, 5.0000000000000000, 10.000000000000000,
b4688136
ESR
2695 -10.000000000000000, 0.0 },
2696 { 0.026361085775183930, 5.0000000000000000, 10.000000000000000,
2697 -9.0000000000000000, 0.0 },
2698 { 0.036556772070711917, 5.0000000000000000, 10.000000000000000,
2699 -8.0000000000000000, 0.0 },
2be75957 2700 { 0.051563934048344140, 5.0000000000000000, 10.000000000000000,
b4688136
ESR
2701 -7.0000000000000000, 0.0 },
2702 { 0.074056625794521838, 5.0000000000000000, 10.000000000000000,
2703 -6.0000000000000000, 0.0 },
2704 { 0.10841132531381448, 5.0000000000000000, 10.000000000000000,
2705 -5.0000000000000000, 0.0 },
2be75957 2706 { 0.16192115120742598, 5.0000000000000000, 10.000000000000000,
b4688136
ESR
2707 -4.0000000000000000, 0.0 },
2708 { 0.24696279814742444, 5.0000000000000000, 10.000000000000000,
2709 -3.0000000000000000, 0.0 },
2be75957 2710 { 0.38492640633381947, 5.0000000000000000, 10.000000000000000,
b4688136 2711 -2.0000000000000000, 0.0 },
2be75957 2712 { 0.61345628229723270, 5.0000000000000000, 10.000000000000000,
b4688136 2713 -1.0000000000000000, 0.0 },
2be75957 2714 { 1.0000000000000000, 5.0000000000000000, 10.000000000000000,
b4688136 2715 0.0000000000000000, 0.0 },
2be75957 2716 { 1.6675470647226096, 5.0000000000000000, 10.000000000000000,
b4688136 2717 1.0000000000000000, 0.0 },
2be75957 2718 { 2.8442428103603667, 5.0000000000000000, 10.000000000000000,
b4688136
ESR
2719 2.0000000000000000, 0.0 },
2720 { 4.9603804008438415, 5.0000000000000000, 10.000000000000000,
2721 3.0000000000000000, 0.0 },
2be75957 2722 { 8.8405953071624790, 5.0000000000000000, 10.000000000000000,
b4688136
ESR
2723 4.0000000000000000, 0.0 },
2724 { 16.089667272320337, 5.0000000000000000, 10.000000000000000,
2725 5.0000000000000000, 0.0 },
2be75957 2726 { 29.876575194426895, 5.0000000000000000, 10.000000000000000,
b4688136 2727 6.0000000000000000, 0.0 },
2be75957 2728 { 56.546719856432318, 5.0000000000000000, 10.000000000000000,
b4688136
ESR
2729 7.0000000000000000, 0.0 },
2730 { 108.97420168465273, 5.0000000000000000, 10.000000000000000,
2731 8.0000000000000000, 0.0 },
2732 { 213.60609045832919, 5.0000000000000000, 10.000000000000000,
2733 9.0000000000000000, 0.0 },
2be75957 2734 { 425.41323880637168, 5.0000000000000000, 10.000000000000000,
b4688136 2735 10.000000000000000, 0.0 },
2be75957
ESR
2736};
2737const double toler050 = 5.0000000000000039e-13;
2738
2739// Test data for a=10.000000000000000, c=1.0000000000000000.
b4688136
ESR
2740// max(|f - f_GSL|): 4.7683715820312500e-06 at index 20
2741// max(|f - f_GSL| / |f_GSL|): 3.8747416388037654e-14
2742// mean(f - f_GSL): 2.1263162844129998e-07
2743// variance(f - f_GSL): 1.0896252425486273e-12
2744// stddev(f - f_GSL): 1.0438511591930276e-06
2be75957
ESR
2745const testcase_conf_hyperg<double>
2746data051[21] =
2747{
b4688136
ESR
2748 { 0.00067155063653961272, 10.000000000000000, 1.0000000000000000,
2749 -10.000000000000000, 0.0 },
2be75957 2750 { -0.00071555648905258684, 10.000000000000000, 1.0000000000000000,
b4688136 2751 -9.0000000000000000, 0.0 },
2be75957 2752 { -0.0035372078786207375, 10.000000000000000, 1.0000000000000000,
b4688136 2753 -8.0000000000000000, 0.0 },
2be75957 2754 { -0.0047884005574714370, 10.000000000000000, 1.0000000000000000,
b4688136 2755 -7.0000000000000000, 0.0 },
2be75957 2756 { 0.0024787521766663585, 10.000000000000000, 1.0000000000000000,
b4688136 2757 -6.0000000000000000, 0.0 },
2be75957 2758 { 0.018136827242522881, 10.000000000000000, 1.0000000000000000,
b4688136 2759 -5.0000000000000000, 0.0 },
2be75957 2760 { 0.0099686175680129968, 10.000000000000000, 1.0000000000000000,
b4688136 2761 -4.0000000000000000, 0.0 },
2be75957 2762 { -0.052832081031434205, 10.000000000000000, 1.0000000000000000,
b4688136 2763 -3.0000000000000000, 0.0 },
2be75957 2764 { 0.0010979582061523968, 10.000000000000000, 1.0000000000000000,
b4688136
ESR
2765 -2.0000000000000000, 0.0 },
2766 { 0.11394854824644536, 10.000000000000000, 1.0000000000000000,
2767 -1.0000000000000000, 0.0 },
2be75957 2768 { 1.0000000000000000, 10.000000000000000, 1.0000000000000000,
b4688136
ESR
2769 0.0000000000000000, 0.0 },
2770 { 131.63017574352625, 10.000000000000000, 1.0000000000000000,
2771 1.0000000000000000, 0.0 },
2be75957 2772 { 2431.2913698755478, 10.000000000000000, 1.0000000000000000,
b4688136 2773 2.0000000000000000, 0.0 },
2be75957 2774 { 27127.328899791049, 10.000000000000000, 1.0000000000000000,
b4688136 2775 3.0000000000000000, 0.0 },
2be75957 2776 { 232066.49977835570, 10.000000000000000, 1.0000000000000000,
b4688136 2777 4.0000000000000000, 0.0 },
2be75957 2778 { 1674401.3794931530, 10.000000000000000, 1.0000000000000000,
b4688136 2779 5.0000000000000000, 0.0 },
2be75957 2780 { 10707495.820386341, 10.000000000000000, 1.0000000000000000,
b4688136 2781 6.0000000000000000, 0.0 },
2be75957 2782 { 62515499.242815509, 10.000000000000000, 1.0000000000000000,
b4688136 2783 7.0000000000000000, 0.0 },
2be75957 2784 { 339773485.00937450, 10.000000000000000, 1.0000000000000000,
b4688136 2785 8.0000000000000000, 0.0 },
2be75957 2786 { 1742442474.2135217, 10.000000000000000, 1.0000000000000000,
b4688136 2787 9.0000000000000000, 0.0 },
2be75957 2788 { 8514625476.5462780, 10.000000000000000, 1.0000000000000000,
b4688136 2789 10.000000000000000, 0.0 },
2be75957
ESR
2790};
2791const double toler051 = 2.5000000000000015e-12;
2792
2793// Test data for a=10.000000000000000, c=2.0000000000000000.
b4688136 2794// max(|f - f_GSL|): 1.7881393432617188e-07 at index 20
2be75957 2795// max(|f - f_GSL| / |f_GSL|): 3.0525079910466156e-12
b4688136
ESR
2796// mean(f - f_GSL): 8.5256729623701921e-09
2797// variance(f - f_GSL): 1.5223998278110878e-15
2798// stddev(f - f_GSL): 3.9017942383102262e-08
2be75957
ESR
2799const testcase_conf_hyperg<double>
2800data052[21] =
2801{
2802 { -0.00014116415550486912, 10.000000000000000, 2.0000000000000000,
b4688136 2803 -10.000000000000000, 0.0 },
2be75957 2804 { -0.00016988130843806985, 10.000000000000000, 2.0000000000000000,
b4688136 2805 -9.0000000000000000, 0.0 },
2be75957 2806 { 6.6619209703391378e-05, 10.000000000000000, 2.0000000000000000,
b4688136 2807 -8.0000000000000000, 0.0 },
2be75957 2808 { 0.00072582919646365740, 10.000000000000000, 2.0000000000000000,
b4688136 2809 -7.0000000000000000, 0.0 },
2be75957 2810 { 0.0012039653429522313, 10.000000000000000, 2.0000000000000000,
b4688136 2811 -6.0000000000000000, 0.0 },
2be75957 2812 { -0.00061450715370021329, 10.000000000000000, 2.0000000000000000,
b4688136 2813 -5.0000000000000000, 0.0 },
2be75957 2814 { -0.0053557899960354968, 10.000000000000000, 2.0000000000000000,
b4688136 2815 -4.0000000000000000, 0.0 },
2be75957 2816 { -0.00078903612815141473, 10.000000000000000, 2.0000000000000000,
b4688136 2817 -3.0000000000000000, 0.0 },
2be75957 2818 { 0.023725444715554326, 10.000000000000000, 2.0000000000000000,
b4688136
ESR
2819 -2.0000000000000000, 0.0 },
2820 { -0.057297669024384761, 10.000000000000000, 2.0000000000000000,
2821 -1.0000000000000000, 0.0 },
2be75957 2822 { 1.0000000000000000, 10.000000000000000, 2.0000000000000000,
b4688136
ESR
2823 0.0000000000000000, 0.0 },
2824 { 34.432116659636570, 10.000000000000000, 2.0000000000000000,
2825 1.0000000000000000, 0.0 },
2be75957 2826 { 432.53475371634494, 10.000000000000000, 2.0000000000000000,
b4688136 2827 2.0000000000000000, 0.0 },
2be75957 2828 { 3789.1768909683506, 10.000000000000000, 2.0000000000000000,
b4688136 2829 3.0000000000000000, 0.0 },
2be75957 2830 { 27089.676185774806, 10.000000000000000, 2.0000000000000000,
b4688136 2831 4.0000000000000000, 0.0 },
2be75957 2832 { 169243.72183073507, 10.000000000000000, 2.0000000000000000,
b4688136 2833 5.0000000000000000, 0.0 },
2be75957 2834 { 959019.40135397331, 10.000000000000000, 2.0000000000000000,
b4688136 2835 6.0000000000000000, 0.0 },
2be75957 2836 { 5043073.3458297960, 10.000000000000000, 2.0000000000000000,
b4688136 2837 7.0000000000000000, 0.0 },
2be75957 2838 { 24989309.819281481, 10.000000000000000, 2.0000000000000000,
b4688136 2839 8.0000000000000000, 0.0 },
2be75957 2840 { 117948708.50540228, 10.000000000000000, 2.0000000000000000,
b4688136 2841 9.0000000000000000, 0.0 },
2be75957 2842 { 534524325.69810420, 10.000000000000000, 2.0000000000000000,
b4688136 2843 10.000000000000000, 0.0 },
2be75957
ESR
2844};
2845const double toler052 = 2.5000000000000017e-10;
2846
2847// Test data for a=10.000000000000000, c=3.0000000000000000.
b4688136
ESR
2848// max(|f - f_GSL|): 4.4703483581542969e-08 at index 20
2849// max(|f - f_GSL| / |f_GSL|): 3.1351688299459524e-11
2850// mean(f - f_GSL): -2.1241869003958644e-09
2851// variance(f - f_GSL): 9.5182316557710101e-17
2852// stddev(f - f_GSL): 9.7561425039669288e-09
2be75957
ESR
2853const testcase_conf_hyperg<double>
2854data053[21] =
2855{
b4688136
ESR
2856 { 1.4973169075105230e-05, 10.000000000000000, 3.0000000000000000,
2857 -10.000000000000000, 0.0 },
2be75957 2858 { 5.7627971015476266e-05, 10.000000000000000, 3.0000000000000000,
b4688136 2859 -9.0000000000000000, 0.0 },
2be75957 2860 { 9.5964794084281178e-05, 10.000000000000000, 3.0000000000000000,
b4688136 2861 -8.0000000000000000, 0.0 },
2be75957 2862 { 1.5479477810339013e-05, 10.000000000000000, 3.0000000000000000,
b4688136 2863 -7.0000000000000000, 0.0 },
2be75957 2864 { -0.00035410745380947978, 10.000000000000000, 3.0000000000000000,
b4688136 2865 -6.0000000000000000, 0.0 },
2be75957 2866 { -0.00078393993138610137, 10.000000000000000, 3.0000000000000000,
b4688136 2867 -5.0000000000000000, 0.0 },
2be75957 2868 { 0.00038117202625584330, 10.000000000000000, 3.0000000000000000,
b4688136 2869 -4.0000000000000000, 0.0 },
2be75957 2870 { 0.0045341794406447526, 10.000000000000000, 3.0000000000000000,
b4688136 2871 -3.0000000000000000, 0.0 },
2be75957 2872 { -0.0031029253652133403, 10.000000000000000, 3.0000000000000000,
b4688136
ESR
2873 -2.0000000000000000, 0.0 },
2874 { -0.028487137061611340, 10.000000000000000, 3.0000000000000000,
2875 -1.0000000000000000, 0.0 },
2be75957 2876 { 1.0000000000000000, 10.000000000000000, 3.0000000000000000,
b4688136 2877 0.0000000000000000, 0.0 },
2be75957 2878 { 15.691485606063274, 10.000000000000000, 3.0000000000000000,
b4688136 2879 1.0000000000000000, 0.0 },
2be75957 2880 { 141.71088859081416, 10.000000000000000, 3.0000000000000000,
b4688136 2881 2.0000000000000000, 0.0 },
2be75957 2882 { 997.55177799313731, 10.000000000000000, 3.0000000000000000,
b4688136 2883 3.0000000000000000, 0.0 },
2be75957 2884 { 6038.6324280926056, 10.000000000000000, 3.0000000000000000,
b4688136 2885 4.0000000000000000, 0.0 },
2be75957 2886 { 32946.952425437150, 10.000000000000000, 3.0000000000000000,
b4688136 2887 5.0000000000000000, 0.0 },
2be75957 2888 { 166431.66712118863, 10.000000000000000, 3.0000000000000000,
b4688136 2889 6.0000000000000000, 0.0 },
2be75957 2890 { 791818.30272061308, 10.000000000000000, 3.0000000000000000,
b4688136 2891 7.0000000000000000, 0.0 },
2be75957 2892 { 3589678.0198700386, 10.000000000000000, 3.0000000000000000,
b4688136 2893 8.0000000000000000, 0.0 },
2be75957 2894 { 15637649.698874988, 10.000000000000000, 3.0000000000000000,
b4688136 2895 9.0000000000000000, 0.0 },
2be75957 2896 { 65871447.346678361, 10.000000000000000, 3.0000000000000000,
b4688136 2897 10.000000000000000, 0.0 },
2be75957
ESR
2898};
2899const double toler053 = 2.5000000000000013e-09;
2900
2901// Test data for a=10.000000000000000, c=4.0000000000000000.
b4688136 2902// max(|f - f_GSL|): 3.7252902984619141e-09 at index 20
2be75957 2903// max(|f - f_GSL| / |f_GSL|): 7.5580354912480585e-11
b4688136
ESR
2904// mean(f - f_GSL): -3.0836124902575546e-10
2905// variance(f - f_GSL): 6.1295871676623622e-19
2906// stddev(f - f_GSL): 7.8291680066673511e-10
2be75957
ESR
2907const testcase_conf_hyperg<double>
2908data054[21] =
2909{
b4688136
ESR
2910 { 6.9661267889527014e-06, 10.000000000000000, 4.0000000000000000,
2911 -10.000000000000000, 0.0 },
2be75957 2912 { -3.0301514396282942e-06, 10.000000000000000, 4.0000000000000000,
b4688136 2913 -9.0000000000000000, 0.0 },
2be75957 2914 { -3.7983599138168025e-05, 10.000000000000000, 4.0000000000000000,
b4688136 2915 -8.0000000000000000, 0.0 },
2be75957 2916 { -9.3615660121163871e-05, 10.000000000000000, 4.0000000000000000,
b4688136 2917 -7.0000000000000000, 0.0 },
2be75957 2918 { -7.0821490761895943e-05, 10.000000000000000, 4.0000000000000000,
b4688136 2919 -6.0000000000000000, 0.0 },
2be75957 2920 { 0.00030692863727646260, 10.000000000000000, 4.0000000000000000,
b4688136 2921 -5.0000000000000000, 0.0 },
2be75957 2922 { 0.0010659895649527829, 10.000000000000000, 4.0000000000000000,
b4688136 2923 -4.0000000000000000, 0.0 },
2be75957 2924 { -0.00042230102633456049, 10.000000000000000, 4.0000000000000000,
b4688136 2925 -3.0000000000000000, 0.0 },
2be75957 2926 { -0.010168047735237568, 10.000000000000000, 4.0000000000000000,
b4688136 2927 -2.0000000000000000, 0.0 },
2be75957 2928 { 0.036903514708782073, 10.000000000000000, 4.0000000000000000,
b4688136 2929 -1.0000000000000000, 0.0 },
2be75957 2930 { 1.0000000000000000, 10.000000000000000, 4.0000000000000000,
b4688136
ESR
2931 0.0000000000000000, 0.0 },
2932 { 9.3384756433213987, 10.000000000000000, 4.0000000000000000,
2933 1.0000000000000000, 0.0 },
2be75957 2934 { 63.905561372021388, 10.000000000000000, 4.0000000000000000,
b4688136 2935 2.0000000000000000, 0.0 },
2be75957 2936 { 370.08498456728779, 10.000000000000000, 4.0000000000000000,
b4688136 2937 3.0000000000000000, 0.0 },
2be75957 2938 { 1922.9526217493540, 10.000000000000000, 4.0000000000000000,
b4688136 2939 4.0000000000000000, 0.0 },
2be75957 2940 { 9245.0380014351485, 10.000000000000000, 4.0000000000000000,
b4688136 2941 5.0000000000000000, 0.0 },
2be75957 2942 { 41898.961838459785, 10.000000000000000, 4.0000000000000000,
b4688136 2943 6.0000000000000000, 0.0 },
2be75957 2944 { 181211.14084739226, 10.000000000000000, 4.0000000000000000,
b4688136 2945 7.0000000000000000, 0.0 },
2be75957 2946 { 754384.25570692308, 10.000000000000000, 4.0000000000000000,
b4688136 2947 8.0000000000000000, 0.0 },
2be75957 2948 { 3042060.4915799876, 10.000000000000000, 4.0000000000000000,
b4688136 2949 9.0000000000000000, 0.0 },
2be75957 2950 { 11939626.424402930, 10.000000000000000, 4.0000000000000000,
b4688136 2951 10.000000000000000, 0.0 },
2be75957
ESR
2952};
2953const double toler054 = 5.0000000000000026e-09;
2954
2955// Test data for a=10.000000000000000, c=5.0000000000000000.
b4688136
ESR
2956// max(|f - f_GSL|): 1.1641532182693481e-10 at index 19
2957// max(|f - f_GSL| / |f_GSL|): 4.6733947661248822e-11
2958// mean(f - f_GSL): -5.7681855797857804e-12
2959// variance(f - f_GSL): 1.7467781563495526e-24
2960// stddev(f - f_GSL): 1.3216573520960538e-12
2be75957
ESR
2961const testcase_conf_hyperg<double>
2962data055[21] =
2963{
b4688136
ESR
2964 { -6.2454929831989734e-06, 10.000000000000000, 5.0000000000000000,
2965 -10.000000000000000, 0.0 },
2be75957 2966 { -1.1459481808048817e-05, 10.000000000000000, 5.0000000000000000,
b4688136 2967 -9.0000000000000000, 0.0 },
2be75957 2968 { -8.1646988801669512e-06, 10.000000000000000, 5.0000000000000000,
b4688136 2969 -8.0000000000000000, 0.0 },
2be75957 2970 { 3.1240400671775088e-05, 10.000000000000000, 5.0000000000000000,
b4688136 2971 -7.0000000000000000, 0.0 },
2be75957 2972 { 0.00014164298152379191, 10.000000000000000, 5.0000000000000000,
b4688136 2973 -6.0000000000000000, 0.0 },
2be75957 2974 { 0.00023172833594738382, 10.000000000000000, 5.0000000000000000,
b4688136 2975 -5.0000000000000000, 0.0 },
2be75957 2976 { -0.00036825094062005215, 10.000000000000000, 5.0000000000000000,
b4688136 2977 -4.0000000000000000, 0.0 },
2be75957 2978 { -0.0030227862937631683, 10.000000000000000, 5.0000000000000000,
b4688136 2979 -3.0000000000000000, 0.0 },
2be75957 2980 { -0.00028642387986584918, 10.000000000000000, 5.0000000000000000,
b4688136
ESR
2981 -2.0000000000000000, 0.0 },
2982 { 0.10617896040159878, 10.000000000000000, 5.0000000000000000,
2983 -1.0000000000000000, 0.0 },
2be75957 2984 { 1.0000000000000000, 10.000000000000000, 5.0000000000000000,
b4688136
ESR
2985 0.0000000000000000, 0.0 },
2986 { 6.4803694966028269, 10.000000000000000, 5.0000000000000000,
2987 1.0000000000000000, 0.0 },
2be75957 2988 { 35.201619637445276, 10.000000000000000, 5.0000000000000000,
b4688136 2989 2.0000000000000000, 0.0 },
2be75957 2990 { 171.58787257237464, 10.000000000000000, 5.0000000000000000,
b4688136 2991 3.0000000000000000, 0.0 },
2be75957 2992 { 775.87148867205678, 10.000000000000000, 5.0000000000000000,
b4688136 2993 4.0000000000000000, 0.0 },
2be75957 2994 { 3317.4071019773678, 10.000000000000000, 5.0000000000000000,
b4688136 2995 5.0000000000000000, 0.0 },
2be75957 2996 { 13578.260535269774, 10.000000000000000, 5.0000000000000000,
b4688136 2997 6.0000000000000000, 0.0 },
2be75957 2998 { 53651.761875039716, 10.000000000000000, 5.0000000000000000,
b4688136 2999 7.0000000000000000, 0.0 },
2be75957 3000 { 205900.60390283042, 10.000000000000000, 5.0000000000000000,
b4688136 3001 8.0000000000000000, 0.0 },
2be75957 3002 { 770979.49612334219, 10.000000000000000, 5.0000000000000000,
b4688136 3003 9.0000000000000000, 0.0 },
2be75957 3004 { 2826613.2348531331, 10.000000000000000, 5.0000000000000000,
b4688136 3005 10.000000000000000, 0.0 },
2be75957
ESR
3006};
3007const double toler055 = 2.5000000000000013e-09;
3008
3009// Test data for a=10.000000000000000, c=6.0000000000000000.
b4688136 3010// max(|f - f_GSL|): 2.3283064365386963e-10 at index 20
2be75957 3011// max(|f - f_GSL| / |f_GSL|): 2.5542822249778647e-10
b4688136
ESR
3012// mean(f - f_GSL): -1.6360259531513281e-11
3013// variance(f - f_GSL): 2.4601199281092265e-21
3014// stddev(f - f_GSL): 4.9599596047843236e-11
2be75957
ESR
3015const testcase_conf_hyperg<double>
3016data056[21] =
3017{
3018 { 9.6084507433830306e-07, 10.000000000000000, 6.0000000000000000,
b4688136 3019 -10.000000000000000, 0.0 },
2be75957 3020 { 7.7131127554174726e-06, 10.000000000000000, 6.0000000000000000,
b4688136 3021 -9.0000000000000000, 0.0 },
2be75957 3022 { 2.3074149009167486e-05, 10.000000000000000, 6.0000000000000000,
b4688136 3023 -8.0000000000000000, 0.0 },
2be75957 3024 { 4.0105919781332888e-05, 10.000000000000000, 6.0000000000000000,
b4688136 3025 -7.0000000000000000, 0.0 },
2be75957 3026 { -1.0325734976052423e-20, 10.000000000000000, 6.0000000000000000,
b4688136 3027 -6.0000000000000000, 0.0 },
2be75957 3028 { -0.00029188857701064686, 10.000000000000000, 6.0000000000000000,
b4688136 3029 -5.0000000000000000, 0.0 },
2be75957 3030 { -0.0010659895649527829, 10.000000000000000, 6.0000000000000000,
b4688136 3031 -4.0000000000000000, 0.0 },
2be75957 3032 { -0.00044452739614164207, 10.000000000000000, 6.0000000000000000,
b4688136 3033 -3.0000000000000000, 0.0 },
2be75957 3034 { 0.020049671590609285, 10.000000000000000, 6.0000000000000000,
b4688136
ESR
3035 -2.0000000000000000, 0.0 },
3036 { 0.17092282236966808, 10.000000000000000, 6.0000000000000000,
3037 -1.0000000000000000, 0.0 },
2be75957 3038 { 1.0000000000000000, 10.000000000000000, 6.0000000000000000,
b4688136
ESR
3039 0.0000000000000000, 0.0 },
3040 { 4.9520550902714575, 10.000000000000000, 6.0000000000000000,
3041 1.0000000000000000, 0.0 },
2be75957 3042 { 22.206263831706924, 10.000000000000000, 6.0000000000000000,
b4688136 3043 2.0000000000000000, 0.0 },
2be75957 3044 { 93.074943420842843, 10.000000000000000, 6.0000000000000000,
b4688136 3045 3.0000000000000000, 0.0 },
2be75957 3046 { 371.20964440523989, 10.000000000000000, 6.0000000000000000,
b4688136 3047 4.0000000000000000, 0.0 },
2be75957 3048 { 1424.6976175888547, 10.000000000000000, 6.0000000000000000,
b4688136 3049 5.0000000000000000, 0.0 },
2be75957 3050 { 5302.2070001902330, 10.000000000000000, 6.0000000000000000,
b4688136 3051 6.0000000000000000, 0.0 },
2be75957 3052 { 19239.311823447424, 10.000000000000000, 6.0000000000000000,
b4688136 3053 7.0000000000000000, 0.0 },
2be75957 3054 { 68341.221999215923, 10.000000000000000, 6.0000000000000000,
b4688136 3055 8.0000000000000000, 0.0 },
2be75957 3056 { 238389.83519072225, 10.000000000000000, 6.0000000000000000,
b4688136 3057 9.0000000000000000, 0.0 },
2be75957 3058 { 818592.04096678528, 10.000000000000000, 6.0000000000000000,
b4688136 3059 10.000000000000000, 0.0 },
2be75957
ESR
3060};
3061const double toler056 = 2.5000000000000012e-08;
3062
3063// Test data for a=10.000000000000000, c=7.0000000000000000.
b4688136
ESR
3064// max(|f - f_GSL|): 2.3283064365386963e-10 at index 20
3065// max(|f - f_GSL| / |f_GSL|): 1.7003920331697668e-08
3066// mean(f - f_GSL): -1.3064360298085007e-11
3067// variance(f - f_GSL): 2.5356040132507882e-21
3068// stddev(f - f_GSL): 5.0354781433849840e-11
2be75957
ESR
3069const testcase_conf_hyperg<double>
3070data057[21] =
3071{
b4688136
ESR
3072 { 3.9634859316455028e-06, 10.000000000000000, 7.0000000000000000,
3073 -10.000000000000000, 0.0 },
2be75957 3074 { 4.4074930030956985e-06, 10.000000000000000, 7.0000000000000000,
b4688136 3075 -9.0000000000000000, 0.0 },
2be75957 3076 { -5.3248036175001926e-06, 10.000000000000000, 7.0000000000000000,
b4688136 3077 -8.0000000000000000, 0.0 },
2be75957 3078 { -5.0660109197473119e-05, 10.000000000000000, 7.0000000000000000,
b4688136 3079 -7.0000000000000000, 0.0 },
2be75957 3080 { -0.00017705372690473989, 10.000000000000000, 7.0000000000000000,
b4688136 3081 -6.0000000000000000, 0.0 },
2be75957 3082 { -0.00034759250392107574, 10.000000000000000, 7.0000000000000000,
b4688136 3083 -5.0000000000000000, 0.0 },
2be75957 3084 { 0.00029072442680530428, 10.000000000000000, 7.0000000000000000,
b4688136 3085 -4.0000000000000000, 0.0 },
2be75957 3086 { 0.0071124383382662791, 10.000000000000000, 7.0000000000000000,
b4688136 3087 -3.0000000000000000, 0.0 },
2be75957 3088 { 0.046185850628367824, 10.000000000000000, 7.0000000000000000,
b4688136
ESR
3089 -2.0000000000000000, 0.0 },
3090 { 0.22919473120601758, 10.000000000000000, 7.0000000000000000,
3091 -1.0000000000000000, 0.0 },
2be75957 3092 { 1.0000000000000000, 10.000000000000000, 7.0000000000000000,
b4688136 3093 0.0000000000000000, 0.0 },
2be75957 3094 { 4.0342754120781059, 10.000000000000000, 7.0000000000000000,
b4688136 3095 1.0000000000000000, 0.0 },
2be75957 3096 { 15.423188523958418, 10.000000000000000, 7.0000000000000000,
b4688136 3097 2.0000000000000000, 0.0 },
2be75957 3098 { 56.669907747565212, 10.000000000000000, 7.0000000000000000,
b4688136 3099 3.0000000000000000, 0.0 },
2be75957 3100 { 201.92649139242229, 10.000000000000000, 7.0000000000000000,
b4688136 3101 4.0000000000000000, 0.0 },
2be75957 3102 { 702.01780019948944, 10.000000000000000, 7.0000000000000000,
b4688136 3103 5.0000000000000000, 0.0 },
2be75957 3104 { 2391.7564185640726, 10.000000000000000, 7.0000000000000000,
b4688136 3105 6.0000000000000000, 0.0 },
2be75957 3106 { 8011.5144629634615, 10.000000000000000, 7.0000000000000000,
b4688136 3107 7.0000000000000000, 0.0 },
2be75957 3108 { 26450.087535814702, 10.000000000000000, 7.0000000000000000,
b4688136 3109 8.0000000000000000, 0.0 },
2be75957 3110 { 86239.964657766584, 10.000000000000000, 7.0000000000000000,
b4688136 3111 9.0000000000000000, 0.0 },
2be75957 3112 { 278127.83396458329, 10.000000000000000, 7.0000000000000000,
b4688136 3113 10.000000000000000, 0.0 },
2be75957
ESR
3114};
3115const double toler057 = 1.0000000000000004e-06;
3116
3117// Test data for a=10.000000000000000, c=8.0000000000000000.
b4688136
ESR
3118// max(|f - f_GSL|): 2.9103830456733704e-11 at index 20
3119// max(|f - f_GSL| / |f_GSL|): 3.9656147630620638e-11
3120// mean(f - f_GSL): -2.2995627648324885e-12
3121// variance(f - f_GSL): 3.7719610241202714e-23
3122// stddev(f - f_GSL): 6.1416292822998289e-12
2be75957
ESR
3123const testcase_conf_hyperg<double>
3124data058[21] =
3125{
b4688136
ESR
3126 { -5.0444366402760966e-06, 10.000000000000000, 8.0000000000000000,
3127 -10.000000000000000, 0.0 },
2be75957 3128 { -1.5426225510834945e-05, 10.000000000000000, 8.0000000000000000,
b4688136 3129 -9.0000000000000000, 0.0 },
2be75957 3130 { -3.7273625322501334e-05, 10.000000000000000, 8.0000000000000000,
b4688136 3131 -8.0000000000000000, 0.0 },
2be75957 3132 { -6.3325136496841588e-05, 10.000000000000000, 8.0000000000000000,
b4688136 3133 -7.0000000000000000, 0.0 },
2be75957 3134 { 0.0000000000000000, 10.000000000000000, 8.0000000000000000,
b4688136 3135 -6.0000000000000000, 0.0 },
2be75957 3136 { 0.00065507818046664252, 10.000000000000000, 8.0000000000000000,
b4688136
ESR
3137 -5.0000000000000000, 0.0 },
3138 { 0.0040701419752742626, 10.000000000000000, 8.0000000000000000,
3139 -4.0000000000000000, 0.0 },
2be75957 3140 { 0.018670150637948978, 10.000000000000000, 8.0000000000000000,
b4688136 3141 -3.0000000000000000, 0.0 },
2be75957 3142 { 0.075186268464784836, 10.000000000000000, 8.0000000000000000,
b4688136
ESR
3143 -2.0000000000000000, 0.0 },
3144 { 0.28101901756151837, 10.000000000000000, 8.0000000000000000,
3145 -1.0000000000000000, 0.0 },
2be75957 3146 { 1.0000000000000000, 10.000000000000000, 8.0000000000000000,
b4688136
ESR
3147 0.0000000000000000, 0.0 },
3148 { 3.4356061998579603, 10.000000000000000, 8.0000000000000000,
3149 1.0000000000000000, 0.0 },
2be75957 3150 { 11.494087265003234, 10.000000000000000, 8.0000000000000000,
b4688136 3151 2.0000000000000000, 0.0 },
2be75957 3152 { 37.660381730976880, 10.000000000000000, 8.0000000000000000,
b4688136 3153 3.0000000000000000, 0.0 },
2be75957 3154 { 121.32922229587608, 10.000000000000000, 8.0000000000000000,
b4688136 3155 4.0000000000000000, 0.0 },
2be75957 3156 { 385.46195489141422, 10.000000000000000, 8.0000000000000000,
b4688136 3157 5.0000000000000000, 0.0 },
2be75957 3158 { 1210.2863804782053, 10.000000000000000, 8.0000000000000000,
b4688136 3159 6.0000000000000000, 0.0 },
2be75957 3160 { 3762.0609740531836, 10.000000000000000, 8.0000000000000000,
b4688136 3161 7.0000000000000000, 0.0 },
2be75957 3162 { 11592.614394051165, 10.000000000000000, 8.0000000000000000,
b4688136 3163 8.0000000000000000, 0.0 },
2be75957 3164 { 35450.992183142305, 10.000000000000000, 8.0000000000000000,
b4688136 3165 9.0000000000000000, 0.0 },
2be75957 3166 { 107684.94388572175, 10.000000000000000, 8.0000000000000000,
b4688136 3167 10.000000000000000, 0.0 },
2be75957
ESR
3168};
3169const double toler058 = 2.5000000000000013e-09;
3170
3171// Test data for a=10.000000000000000, c=9.0000000000000000.
b4688136
ESR
3172// max(|f - f_GSL|): 9.0949470177292824e-12 at index 19
3173// max(|f - f_GSL| / |f_GSL|): 3.7408111247866129e-11
3174// mean(f - f_GSL): 4.8555562242291194e-13
3175// variance(f - f_GSL): 1.2377623779491325e-26
3176// stddev(f - f_GSL): 1.1125476969321956e-13
2be75957
ESR
3177const testcase_conf_hyperg<double>
3178data059[21] =
3179{
b4688136
ESR
3180 { -5.0444366402760966e-06, 10.000000000000000, 9.0000000000000000,
3181 -10.000000000000000, 0.0 },
2be75957 3182 { 0.0000000000000000, 10.000000000000000, 9.0000000000000000,
b4688136 3183 -9.0000000000000000, 0.0 },
2be75957 3184 { 3.7273625322501334e-05, 10.000000000000000, 9.0000000000000000,
b4688136 3185 -8.0000000000000000, 0.0 },
2be75957 3186 { 0.00020264043678989247, 10.000000000000000, 9.0000000000000000,
b4688136 3187 -7.0000000000000000, 0.0 },
2be75957 3188 { 0.00082625072555545290, 10.000000000000000, 9.0000000000000000,
b4688136 3189 -6.0000000000000000, 0.0 },
2be75957 3190 { 0.0029946431107046520, 10.000000000000000, 9.0000000000000000,
b4688136
ESR
3191 -5.0000000000000000, 0.0 },
3192 { 0.010175354938185657, 10.000000000000000, 9.0000000000000000,
3193 -4.0000000000000000, 0.0 },
2be75957 3194 { 0.033191378911909299, 10.000000000000000, 9.0000000000000000,
b4688136 3195 -3.0000000000000000, 0.0 },
2be75957 3196 { 0.10526077585069878, 10.000000000000000, 9.0000000000000000,
b4688136
ESR
3197 -2.0000000000000000, 0.0 },
3198 { 0.32700394770794866, 10.000000000000000, 9.0000000000000000,
3199 -1.0000000000000000, 0.0 },
2be75957 3200 { 1.0000000000000000, 10.000000000000000, 9.0000000000000000,
b4688136
ESR
3201 0.0000000000000000, 0.0 },
3202 { 3.0203131427322729, 10.000000000000000, 9.0000000000000000,
3203 1.0000000000000000, 0.0 },
2be75957 3204 { 9.0310685653596838, 10.000000000000000, 9.0000000000000000,
b4688136 3205 2.0000000000000000, 0.0 },
2be75957 3206 { 26.780715897583555, 10.000000000000000, 9.0000000000000000,
b4688136 3207 3.0000000000000000, 0.0 },
2be75957 3208 { 78.863994492319449, 10.000000000000000, 9.0000000000000000,
b4688136 3209 4.0000000000000000, 0.0 },
2be75957 3210 { 230.86491415956360, 10.000000000000000, 9.0000000000000000,
b4688136 3211 5.0000000000000000, 0.0 },
2be75957 3212 { 672.38132248789179, 10.000000000000000, 9.0000000000000000,
b4688136 3213 6.0000000000000000, 0.0 },
2be75957 3214 { 1949.5700594283705, 10.000000000000000, 9.0000000000000000,
b4688136 3215 7.0000000000000000, 0.0 },
2be75957 3216 { 5630.6984199677090, 10.000000000000000, 9.0000000000000000,
b4688136 3217 8.0000000000000000, 0.0 },
2be75957 3218 { 16206.167855150768, 10.000000000000000, 9.0000000000000000,
b4688136 3219 9.0000000000000000, 0.0 },
2be75957 3220 { 46500.316677925293, 10.000000000000000, 9.0000000000000000,
b4688136 3221 10.000000000000000, 0.0 },
2be75957
ESR
3222};
3223const double toler059 = 2.5000000000000013e-09;
3224
3225// Test data for a=10.000000000000000, c=10.000000000000000.
b4688136 3226// max(|f - f_GSL|): 0.0000000000000000 at index 0
2be75957 3227// max(|f - f_GSL| / |f_GSL|): 0.0000000000000000
b4688136
ESR
3228// mean(f - f_GSL): 0.0000000000000000
3229// variance(f - f_GSL): 0.0000000000000000
3230// stddev(f - f_GSL): 0.0000000000000000
2be75957
ESR
3231const testcase_conf_hyperg<double>
3232data060[21] =
3233{
b4688136
ESR
3234 { 4.5399929762484847e-05, 10.000000000000000, 10.000000000000000,
3235 -10.000000000000000, 0.0 },
2be75957 3236 { 0.00012340980408667956, 10.000000000000000, 10.000000000000000,
b4688136 3237 -9.0000000000000000, 0.0 },
2be75957 3238 { 0.00033546262790251185, 10.000000000000000, 10.000000000000000,
b4688136 3239 -8.0000000000000000, 0.0 },
2be75957 3240 { 0.00091188196555451624, 10.000000000000000, 10.000000000000000,
b4688136 3241 -7.0000000000000000, 0.0 },
2be75957 3242 { 0.0024787521766663585, 10.000000000000000, 10.000000000000000,
b4688136 3243 -6.0000000000000000, 0.0 },
2be75957 3244 { 0.0067379469990854670, 10.000000000000000, 10.000000000000000,
b4688136
ESR
3245 -5.0000000000000000, 0.0 },
3246 { 0.018315638888734182, 10.000000000000000, 10.000000000000000,
3247 -4.0000000000000000, 0.0 },
2be75957 3248 { 0.049787068367863944, 10.000000000000000, 10.000000000000000,
b4688136 3249 -3.0000000000000000, 0.0 },
2be75957 3250 { 0.13533528323661270, 10.000000000000000, 10.000000000000000,
b4688136
ESR
3251 -2.0000000000000000, 0.0 },
3252 { 0.36787944117144228, 10.000000000000000, 10.000000000000000,
3253 -1.0000000000000000, 0.0 },
2be75957 3254 { 1.0000000000000000, 10.000000000000000, 10.000000000000000,
b4688136
ESR
3255 0.0000000000000000, 0.0 },
3256 { 2.7182818284590455, 10.000000000000000, 10.000000000000000,
3257 1.0000000000000000, 0.0 },
2be75957 3258 { 7.3890560989306504, 10.000000000000000, 10.000000000000000,
b4688136 3259 2.0000000000000000, 0.0 },
2be75957 3260 { 20.085536923187668, 10.000000000000000, 10.000000000000000,
b4688136 3261 3.0000000000000000, 0.0 },
2be75957 3262 { 54.598150033144236, 10.000000000000000, 10.000000000000000,
b4688136 3263 4.0000000000000000, 0.0 },
2be75957 3264 { 148.41315910257660, 10.000000000000000, 10.000000000000000,
b4688136 3265 5.0000000000000000, 0.0 },
2be75957 3266 { 403.42879349273511, 10.000000000000000, 10.000000000000000,
b4688136 3267 6.0000000000000000, 0.0 },
2be75957 3268 { 1096.6331584284585, 10.000000000000000, 10.000000000000000,
b4688136 3269 7.0000000000000000, 0.0 },
2be75957 3270 { 2980.9579870417283, 10.000000000000000, 10.000000000000000,
b4688136 3271 8.0000000000000000, 0.0 },
2be75957 3272 { 8103.0839275753842, 10.000000000000000, 10.000000000000000,
b4688136 3273 9.0000000000000000, 0.0 },
2be75957 3274 { 22026.465794806718, 10.000000000000000, 10.000000000000000,
b4688136 3275 10.000000000000000, 0.0 },
2be75957
ESR
3276};
3277const double toler060 = 2.5000000000000020e-13;
3278
3279// Test data for a=20.000000000000000, c=1.0000000000000000.
b4688136 3280// max(|f - f_GSL|): 0.0039062500000000000 at index 20
2be75957 3281// max(|f - f_GSL| / |f_GSL|): 3.8043537688323639e-14
b4688136
ESR
3282// mean(f - f_GSL): -3.3615948355170052e-05
3283// variance(f - f_GSL): 7.8735813272906564e-07
3284// stddev(f - f_GSL): 0.00088733203071289252
2be75957
ESR
3285const testcase_conf_hyperg<double>
3286data061[21] =
3287{
b4688136
ESR
3288 { 0.00018021852293239455, 20.000000000000000, 1.0000000000000000,
3289 -10.000000000000000, 0.0 },
2be75957 3290 { 0.0017726368057851866, 20.000000000000000, 1.0000000000000000,
b4688136 3291 -9.0000000000000000, 0.0 },
2be75957 3292 { 0.00058280040382329280, 20.000000000000000, 1.0000000000000000,
b4688136 3293 -8.0000000000000000, 0.0 },
2be75957 3294 { -0.0049657717020590141, 20.000000000000000, 1.0000000000000000,
b4688136 3295 -7.0000000000000000, 0.0 },
2be75957 3296 { -0.0012360336087128597, 20.000000000000000, 1.0000000000000000,
b4688136 3297 -6.0000000000000000, 0.0 },
2be75957 3298 { 0.014898894139255305, 20.000000000000000, 1.0000000000000000,
b4688136 3299 -5.0000000000000000, 0.0 },
2be75957 3300 { -0.013800784612552078, 20.000000000000000, 1.0000000000000000,
b4688136 3301 -4.0000000000000000, 0.0 },
2be75957 3302 { -0.012192213426039619, 20.000000000000000, 1.0000000000000000,
b4688136 3303 -3.0000000000000000, 0.0 },
2be75957 3304 { 0.050311246773136212, 20.000000000000000, 1.0000000000000000,
b4688136 3305 -2.0000000000000000, 0.0 },
2be75957 3306 { -0.025985814502838493, 20.000000000000000, 1.0000000000000000,
b4688136 3307 -1.0000000000000000, 0.0 },
2be75957 3308 { 1.0000000000000000, 20.000000000000000, 1.0000000000000000,
b4688136 3309 0.0000000000000000, 0.0 },
2be75957 3310 { 1563.6577385252017, 20.000000000000000, 1.0000000000000000,
b4688136 3311 1.0000000000000000, 0.0 },
2be75957 3312 { 86377.091910766088, 20.000000000000000, 1.0000000000000000,
b4688136 3313 2.0000000000000000, 0.0 },
2be75957 3314 { 2216718.8789979252, 20.000000000000000, 1.0000000000000000,
b4688136 3315 3.0000000000000000, 0.0 },
2be75957 3316 { 38045018.520647161, 20.000000000000000, 1.0000000000000000,
b4688136 3317 4.0000000000000000, 0.0 },
2be75957 3318 { 504376263.68346804, 20.000000000000000, 1.0000000000000000,
b4688136 3319 5.0000000000000000, 0.0 },
2be75957 3320 { 5565635666.7972050, 20.000000000000000, 1.0000000000000000,
b4688136 3321 6.0000000000000000, 0.0 },
2be75957 3322 { 53451562646.544518, 20.000000000000000, 1.0000000000000000,
b4688136 3323 7.0000000000000000, 0.0 },
2be75957 3324 { 460009135340.33832, 20.000000000000000, 1.0000000000000000,
b4688136 3325 8.0000000000000000, 0.0 },
2be75957 3326 { 3620401937301.4907, 20.000000000000000, 1.0000000000000000,
b4688136 3327 9.0000000000000000, 0.0 },
2be75957 3328 { 26446266822604.152, 20.000000000000000, 1.0000000000000000,
b4688136 3329 10.000000000000000, 0.0 },
2be75957
ESR
3330};
3331const double toler061 = 2.5000000000000015e-12;
3332
3333// Test data for a=20.000000000000000, c=2.0000000000000000.
b4688136 3334// max(|f - f_GSL|): 0.00097656250000000000 at index 20
2be75957 3335// max(|f - f_GSL| / |f_GSL|): 3.3638062074418344e-12
b4688136
ESR
3336// mean(f - f_GSL): 4.3034663341234841e-05
3337// variance(f - f_GSL): 4.5752396645413330e-08
3338// stddev(f - f_GSL): 0.00021389809874193210
2be75957
ESR
3339const testcase_conf_hyperg<double>
3340data062[21] =
3341{
b4688136
ESR
3342 { 6.6647681992684074e-05, 20.000000000000000, 2.0000000000000000,
3343 -10.000000000000000, 0.0 },
2be75957 3344 { -3.7248253270227151e-05, 20.000000000000000, 2.0000000000000000,
b4688136 3345 -9.0000000000000000, 0.0 },
2be75957 3346 { -0.00024392611307344034, 20.000000000000000, 2.0000000000000000,
b4688136 3347 -8.0000000000000000, 0.0 },
2be75957 3348 { 2.4034559592246202e-05, 20.000000000000000, 2.0000000000000000,
b4688136 3349 -7.0000000000000000, 0.0 },
2be75957 3350 { 0.00081645960584843073, 20.000000000000000, 2.0000000000000000,
b4688136 3351 -6.0000000000000000, 0.0 },
2be75957 3352 { -0.00051326387116462039, 20.000000000000000, 2.0000000000000000,
b4688136 3353 -5.0000000000000000, 0.0 },
2be75957 3354 { -0.0021786279856333920, 20.000000000000000, 2.0000000000000000,
b4688136 3355 -4.0000000000000000, 0.0 },
2be75957 3356 { 0.0061029380625179973, 20.000000000000000, 2.0000000000000000,
b4688136 3357 -3.0000000000000000, 0.0 },
2be75957 3358 { -0.011834301617155166, 20.000000000000000, 2.0000000000000000,
b4688136 3359 -2.0000000000000000, 0.0 },
2be75957 3360 { 0.037622016973681061, 20.000000000000000, 2.0000000000000000,
b4688136 3361 -1.0000000000000000, 0.0 },
2be75957 3362 { 1.0000000000000000, 20.000000000000000, 2.0000000000000000,
b4688136
ESR
3363 0.0000000000000000, 0.0 },
3364 { 303.10954080179823, 20.000000000000000, 2.0000000000000000,
3365 1.0000000000000000, 0.0 },
2be75957 3366 { 11508.923130556599, 20.000000000000000, 2.0000000000000000,
b4688136 3367 2.0000000000000000, 0.0 },
2be75957 3368 { 234541.86023461280, 20.000000000000000, 2.0000000000000000,
b4688136 3369 3.0000000000000000, 0.0 },
2be75957 3370 { 3398931.2897027107, 20.000000000000000, 2.0000000000000000,
b4688136 3371 4.0000000000000000, 0.0 },
2be75957 3372 { 39382712.287920594, 20.000000000000000, 2.0000000000000000,
b4688136 3373 5.0000000000000000, 0.0 },
2be75957 3374 { 388350500.37087941, 20.000000000000000, 2.0000000000000000,
b4688136 3375 6.0000000000000000, 0.0 },
2be75957 3376 { 3385284070.5527182, 20.000000000000000, 2.0000000000000000,
b4688136 3377 7.0000000000000000, 0.0 },
2be75957 3378 { 26751585258.405773, 20.000000000000000, 2.0000000000000000,
b4688136 3379 8.0000000000000000, 0.0 },
2be75957 3380 { 195061928138.27676, 20.000000000000000, 2.0000000000000000,
b4688136 3381 9.0000000000000000, 0.0 },
2be75957 3382 { 1329571695324.3132, 20.000000000000000, 2.0000000000000000,
b4688136 3383 10.000000000000000, 0.0 },
2be75957
ESR
3384};
3385const double toler062 = 2.5000000000000017e-10;
3386
3387// Test data for a=20.000000000000000, c=3.0000000000000000.
b4688136 3388// max(|f - f_GSL|): 1.5258789062500000e-05 at index 20
2be75957 3389// max(|f - f_GSL| / |f_GSL|): 1.0636412229856690e-11
b4688136
ESR
3390// mean(f - f_GSL): 4.4497851428053653e-07
3391// variance(f - f_GSL): 1.1521071605323705e-11
3392// stddev(f - f_GSL): 3.3942704083976139e-06
2be75957
ESR
3393const testcase_conf_hyperg<double>
3394data063[21] =
3395{
b4688136
ESR
3396 { -8.6671962318505695e-06, 20.000000000000000, 3.0000000000000000,
3397 -10.000000000000000, 0.0 },
2be75957 3398 { -1.8205565180535425e-05, 20.000000000000000, 3.0000000000000000,
b4688136 3399 -9.0000000000000000, 0.0 },
2be75957 3400 { 1.5620588717927631e-05, 20.000000000000000, 3.0000000000000000,
b4688136 3401 -8.0000000000000000, 0.0 },
2be75957 3402 { 7.6532767373103759e-05, 20.000000000000000, 3.0000000000000000,
b4688136 3403 -7.0000000000000000, 0.0 },
2be75957 3404 { -5.2708600380172109e-05, 20.000000000000000, 3.0000000000000000,
b4688136 3405 -6.0000000000000000, 0.0 },
2be75957 3406 { -0.00028546308121326275, 20.000000000000000, 3.0000000000000000,
b4688136 3407 -5.0000000000000000, 0.0 },
2be75957 3408 { 0.00056490746026256267, 20.000000000000000, 3.0000000000000000,
b4688136 3409 -4.0000000000000000, 0.0 },
2be75957 3410 { -5.0602588875468348e-07, 20.000000000000000, 3.0000000000000000,
b4688136 3411 -3.0000000000000000, 0.0 },
2be75957 3412 { -0.0021376080642211692, 20.000000000000000, 3.0000000000000000,
b4688136 3413 -2.0000000000000000, 0.0 },
2be75957 3414 { 0.0028873127225376104, 20.000000000000000, 3.0000000000000000,
b4688136 3415 -1.0000000000000000, 0.0 },
2be75957 3416 { 1.0000000000000000, 20.000000000000000, 3.0000000000000000,
b4688136 3417 0.0000000000000000, 0.0 },
2be75957 3418 { 106.38207299128948, 20.000000000000000, 3.0000000000000000,
b4688136 3419 1.0000000000000000, 0.0 },
2be75957 3420 { 2880.5734732831320, 20.000000000000000, 3.0000000000000000,
b4688136 3421 2.0000000000000000, 0.0 },
2be75957 3422 { 47353.756965165718, 20.000000000000000, 3.0000000000000000,
b4688136 3423 3.0000000000000000, 0.0 },
2be75957 3424 { 584732.27978148905, 20.000000000000000, 3.0000000000000000,
b4688136 3425 4.0000000000000000, 0.0 },
2be75957 3426 { 5957333.1101320982, 20.000000000000000, 3.0000000000000000,
b4688136 3427 5.0000000000000000, 0.0 },
2be75957 3428 { 52725595.633352734, 20.000000000000000, 3.0000000000000000,
b4688136 3429 6.0000000000000000, 0.0 },
2be75957 3430 { 418560160.03369552, 20.000000000000000, 3.0000000000000000,
b4688136 3431 7.0000000000000000, 0.0 },
2be75957 3432 { 3045067611.3150902, 20.000000000000000, 3.0000000000000000,
b4688136 3433 8.0000000000000000, 0.0 },
2be75957 3434 { 20614600690.354652, 20.000000000000000, 3.0000000000000000,
b4688136 3435 9.0000000000000000, 0.0 },
2be75957 3436 { 131344201933.74118, 20.000000000000000, 3.0000000000000000,
b4688136 3437 10.000000000000000, 0.0 },
2be75957
ESR
3438};
3439const double toler063 = 1.0000000000000007e-09;
3440
3441// Test data for a=20.000000000000000, c=4.0000000000000000.
b4688136 3442// max(|f - f_GSL|): 1.5258789062500000e-05 at index 20
2be75957 3443// max(|f - f_GSL| / |f_GSL|): 1.8743522900030841e-11
b4688136
ESR
3444// mean(f - f_GSL): -8.3223886940195093e-07
3445// variance(f - f_GSL): 1.0926580899883890e-11
3446// stddev(f - f_GSL): 3.3055379138475917e-06
2be75957
ESR
3447const testcase_conf_hyperg<double>
3448data064[21] =
3449{
b4688136
ESR
3450 { -1.1286669552452397e-06, 20.000000000000000, 4.0000000000000000,
3451 -10.000000000000000, 0.0 },
2be75957 3452 { 3.9595188785137704e-06, 20.000000000000000, 4.0000000000000000,
b4688136 3453 -9.0000000000000000, 0.0 },
2be75957 3454 { 8.6940153052790051e-06, 20.000000000000000, 4.0000000000000000,
b4688136 3455 -8.0000000000000000, 0.0 },
2be75957 3456 { -1.0858814018067509e-05, 20.000000000000000, 4.0000000000000000,
b4688136 3457 -7.0000000000000000, 0.0 },
2be75957 3458 { -4.1826023828710966e-05, 20.000000000000000, 4.0000000000000000,
b4688136 3459 -6.0000000000000000, 0.0 },
2be75957 3460 { 6.6455893622436316e-05, 20.000000000000000, 4.0000000000000000,
b4688136 3461 -5.0000000000000000, 0.0 },
2be75957 3462 { 0.00014238710517977906, 20.000000000000000, 4.0000000000000000,
b4688136 3463 -4.0000000000000000, 0.0 },
2be75957 3464 { -0.00071796294700866132, 20.000000000000000, 4.0000000000000000,
b4688136 3465 -3.0000000000000000, 0.0 },
2be75957 3466 { 0.0020884061677332645, 20.000000000000000, 4.0000000000000000,
b4688136 3467 -2.0000000000000000, 0.0 },
2be75957 3468 { -0.012768833157321973, 20.000000000000000, 4.0000000000000000,
b4688136 3469 -1.0000000000000000, 0.0 },
2be75957 3470 { 1.0000000000000000, 20.000000000000000, 4.0000000000000000,
b4688136
ESR
3471 0.0000000000000000, 0.0 },
3472 { 50.659916934657737, 20.000000000000000, 4.0000000000000000,
3473 1.0000000000000000, 0.0 },
2be75957 3474 { 1014.3134442335910, 20.000000000000000, 4.0000000000000000,
b4688136 3475 2.0000000000000000, 0.0 },
2be75957 3476 { 13665.584449611577, 20.000000000000000, 4.0000000000000000,
b4688136 3477 3.0000000000000000, 0.0 },
2be75957 3478 { 145123.62797278623, 20.000000000000000, 4.0000000000000000,
b4688136 3479 4.0000000000000000, 0.0 },
2be75957 3480 { 1308144.4519382305, 20.000000000000000, 4.0000000000000000,
b4688136 3481 5.0000000000000000, 0.0 },
2be75957 3482 { 10438124.578674613, 20.000000000000000, 4.0000000000000000,
b4688136 3483 6.0000000000000000, 0.0 },
2be75957 3484 { 75719160.524424627, 20.000000000000000, 4.0000000000000000,
b4688136 3485 7.0000000000000000, 0.0 },
2be75957 3486 { 508510905.96310252, 20.000000000000000, 4.0000000000000000,
b4688136 3487 8.0000000000000000, 0.0 },
2be75957 3488 { 3203200954.5618095, 20.000000000000000, 4.0000000000000000,
b4688136 3489 9.0000000000000000, 0.0 },
2be75957 3490 { 19111993543.124691, 20.000000000000000, 4.0000000000000000,
b4688136 3491 10.000000000000000, 0.0 },
2be75957
ESR
3492};
3493const double toler064 = 1.0000000000000007e-09;
3494
3495// Test data for a=20.000000000000000, c=5.0000000000000000.
b4688136 3496// max(|f - f_GSL|): 3.3378601074218750e-06 at index 20
2be75957 3497// max(|f - f_GSL| / |f_GSL|): 1.7481076775232650e-09
b4688136
ESR
3498// mean(f - f_GSL): -1.3214810701104223e-07
3499// variance(f - f_GSL): 5.3952094505284637e-13
3500// stddev(f - f_GSL): 7.3452089490554747e-07
2be75957
ESR
3501const testcase_conf_hyperg<double>
3502data065[21] =
3503{
b4688136
ESR
3504 { 8.4755643455670974e-07, 20.000000000000000, 5.0000000000000000,
3505 -10.000000000000000, 0.0 },
2be75957 3506 { 8.5721061862565697e-07, 20.000000000000000, 5.0000000000000000,
b4688136 3507 -9.0000000000000000, 0.0 },
2be75957 3508 { -2.8228700837555599e-06, 20.000000000000000, 5.0000000000000000,
b4688136 3509 -8.0000000000000000, 0.0 },
2be75957 3510 { -6.6486802159657585e-06, 20.000000000000000, 5.0000000000000000,
b4688136 3511 -7.0000000000000000, 0.0 },
2be75957 3512 { 1.1816828026110384e-05, 20.000000000000000, 5.0000000000000000,
b4688136 3513 -6.0000000000000000, 0.0 },
2be75957 3514 { 3.6173872819745774e-05, 20.000000000000000, 5.0000000000000000,
b4688136 3515 -5.0000000000000000, 0.0 },
2be75957 3516 { -0.00011481934287296670, 20.000000000000000, 5.0000000000000000,
b4688136 3517 -4.0000000000000000, 0.0 },
2be75957 3518 { 1.2650647218867087e-07, 20.000000000000000, 5.0000000000000000,
b4688136 3519 -3.0000000000000000, 0.0 },
2be75957 3520 { 0.0010626537950495965, 20.000000000000000, 5.0000000000000000,
b4688136 3521 -2.0000000000000000, 0.0 },
2be75957 3522 { -0.0085499011205641944, 20.000000000000000, 5.0000000000000000,
b4688136 3523 -1.0000000000000000, 0.0 },
2be75957 3524 { 1.0000000000000000, 20.000000000000000, 5.0000000000000000,
b4688136
ESR
3525 0.0000000000000000, 0.0 },
3526 { 29.126637808809381, 20.000000000000000, 5.0000000000000000,
3527 1.0000000000000000, 0.0 },
2be75957 3528 { 446.26914983518060, 20.000000000000000, 5.0000000000000000,
b4688136 3529 2.0000000000000000, 0.0 },
2be75957 3530 { 5005.6470164856382, 20.000000000000000, 5.0000000000000000,
b4688136 3531 3.0000000000000000, 0.0 },
2be75957 3532 { 46145.715220935184, 20.000000000000000, 5.0000000000000000,
b4688136 3533 4.0000000000000000, 0.0 },
2be75957 3534 { 370342.18574452243, 20.000000000000000, 5.0000000000000000,
b4688136 3535 5.0000000000000000, 0.0 },
2be75957 3536 { 2676402.7371661114, 20.000000000000000, 5.0000000000000000,
b4688136 3537 6.0000000000000000, 0.0 },
2be75957 3538 { 17803174.102030005, 20.000000000000000, 5.0000000000000000,
b4688136 3539 7.0000000000000000, 0.0 },
2be75957 3540 { 110674464.63597310, 20.000000000000000, 5.0000000000000000,
b4688136 3541 8.0000000000000000, 0.0 },
2be75957 3542 { 650149739.34228492, 20.000000000000000, 5.0000000000000000,
b4688136 3543 9.0000000000000000, 0.0 },
2be75957 3544 { 3639417243.5150661, 20.000000000000000, 5.0000000000000000,
b4688136 3545 10.000000000000000, 0.0 },
2be75957
ESR
3546};
3547const double toler065 = 1.0000000000000005e-07;
3548
3549// Test data for a=20.000000000000000, c=6.0000000000000000.
b4688136
ESR
3550// max(|f - f_GSL|): 3.5762786865234375e-07 at index 20
3551// max(|f - f_GSL| / |f_GSL|): 7.4494596183568454e-09
3552// mean(f - f_GSL): -1.3194579482834487e-08
3553// variance(f - f_GSL): 6.2283002611266565e-15
3554// stddev(f - f_GSL): 7.8919580974094487e-08
2be75957
ESR
3555const testcase_conf_hyperg<double>
3556data066[21] =
3557{
b4688136
ESR
3558 { -1.9022359545310003e-08, 20.000000000000000, 6.0000000000000000,
3559 -10.000000000000000, 0.0 },
2be75957 3560 { -7.4533809656234698e-07, 20.000000000000000, 6.0000000000000000,
b4688136 3561 -9.0000000000000000, 0.0 },
2be75957 3562 { -9.7852420358724080e-07, 20.000000000000000, 6.0000000000000000,
b4688136 3563 -8.0000000000000000, 0.0 },
2be75957 3564 { 3.0181569866746340e-06, 20.000000000000000, 6.0000000000000000,
b4688136 3565 -7.0000000000000000, 0.0 },
2be75957 3566 { 7.9816910701457280e-06, 20.000000000000000, 6.0000000000000000,
b4688136 3567 -6.0000000000000000, 0.0 },
2be75957 3568 { -2.0133163153966071e-05, 20.000000000000000, 6.0000000000000000,
b4688136 3569 -5.0000000000000000, 0.0 },
2be75957 3570 { -4.7462368393259685e-05, 20.000000000000000, 6.0000000000000000,
b4688136 3571 -4.0000000000000000, 0.0 },
2be75957 3572 { 0.00031910869938964821, 20.000000000000000, 6.0000000000000000,
b4688136 3573 -3.0000000000000000, 0.0 },
2be75957 3574 { -0.0010380528468056441, 20.000000000000000, 6.0000000000000000,
b4688136 3575 -2.0000000000000000, 0.0 },
2be75957 3576 { 0.0084752097558651058, 20.000000000000000, 6.0000000000000000,
b4688136 3577 -1.0000000000000000, 0.0 },
2be75957 3578 { 1.0000000000000000, 20.000000000000000, 6.0000000000000000,
b4688136
ESR
3579 0.0000000000000000, 0.0 },
3580 { 19.002159564861383, 20.000000000000000, 6.0000000000000000,
3581 1.0000000000000000, 0.0 },
2be75957 3582 { 229.93981298721295, 20.000000000000000, 6.0000000000000000,
b4688136 3583 2.0000000000000000, 0.0 },
2be75957 3584 { 2180.3120758940972, 20.000000000000000, 6.0000000000000000,
b4688136 3585 3.0000000000000000, 0.0 },
2be75957 3586 { 17610.732510305290, 20.000000000000000, 6.0000000000000000,
b4688136 3587 4.0000000000000000, 0.0 },
2be75957 3588 { 126633.20907014767, 20.000000000000000, 6.0000000000000000,
b4688136 3589 5.0000000000000000, 0.0 },
2be75957 3590 { 832692.83016874129, 20.000000000000000, 6.0000000000000000,
b4688136 3591 6.0000000000000000, 0.0 },
2be75957 3592 { 5097225.0940651651, 20.000000000000000, 6.0000000000000000,
b4688136 3593 7.0000000000000000, 0.0 },
2be75957 3594 { 29414585.342530526, 20.000000000000000, 6.0000000000000000,
b4688136 3595 8.0000000000000000, 0.0 },
2be75957 3596 { 161513229.88138971, 20.000000000000000, 6.0000000000000000,
b4688136 3597 9.0000000000000000, 0.0 },
2be75957 3598 { 849871092.10959554, 20.000000000000000, 6.0000000000000000,
b4688136 3599 10.000000000000000, 0.0 },
2be75957
ESR
3600};
3601const double toler066 = 5.0000000000000019e-07;
3602
3603// Test data for a=20.000000000000000, c=7.0000000000000000.
b4688136 3604// max(|f - f_GSL|): 1.7881393432617188e-07 at index 20
2be75957 3605// max(|f - f_GSL| / |f_GSL|): 2.3690711970375556e-09
b4688136
ESR
3606// mean(f - f_GSL): -7.4560448694733496e-09
3607// variance(f - f_GSL): 1.5415851296503409e-15
3608// stddev(f - f_GSL): 3.9263024968159810e-08
2be75957
ESR
3609const testcase_conf_hyperg<double>
3610data067[21] =
3611{
b4688136
ESR
3612 { -1.7754301607387138e-07, 20.000000000000000, 7.0000000000000000,
3613 -10.000000000000000, 0.0 },
2be75957 3614 { -6.2128605089471266e-08, 20.000000000000000, 7.0000000000000000,
b4688136 3615 -9.0000000000000000, 0.0 },
2be75957 3616 { 9.1338873372533148e-07, 20.000000000000000, 7.0000000000000000,
b4688136 3617 -8.0000000000000000, 0.0 },
2be75957 3618 { 1.6657400269273180e-06, 20.000000000000000, 7.0000000000000000,
b4688136 3619 -7.0000000000000000, 0.0 },
2be75957 3620 { -4.7904165143355465e-06, 20.000000000000000, 7.0000000000000000,
b4688136 3621 -6.0000000000000000, 0.0 },
2be75957 3622 { -1.5503088351319618e-05, 20.000000000000000, 7.0000000000000000,
b4688136 3623 -5.0000000000000000, 0.0 },
2be75957 3624 { 5.6425108496954337e-05, 20.000000000000000, 7.0000000000000000,
b4688136 3625 -4.0000000000000000, 0.0 },
2be75957 3626 { 9.1083552345479015e-05, 20.000000000000000, 7.0000000000000000,
b4688136 3627 -3.0000000000000000, 0.0 },
2be75957 3628 { -0.0018058773247853388, 20.000000000000000, 7.0000000000000000,
b4688136 3629 -2.0000000000000000, 0.0 },
2be75957 3630 { 0.032850147696977743, 20.000000000000000, 7.0000000000000000,
b4688136 3631 -1.0000000000000000, 0.0 },
2be75957 3632 { 1.0000000000000000, 20.000000000000000, 7.0000000000000000,
b4688136 3633 0.0000000000000000, 0.0 },
2be75957 3634 { 13.551527852090807, 20.000000000000000, 7.0000000000000000,
b4688136 3635 1.0000000000000000, 0.0 },
2be75957 3636 { 133.23579819973105, 20.000000000000000, 7.0000000000000000,
b4688136 3637 2.0000000000000000, 0.0 },
2be75957 3638 { 1083.6769250393436, 20.000000000000000, 7.0000000000000000,
b4688136 3639 3.0000000000000000, 0.0 },
2be75957 3640 { 7739.1410905637622, 20.000000000000000, 7.0000000000000000,
b4688136 3641 4.0000000000000000, 0.0 },
2be75957 3642 { 50175.328973240226, 20.000000000000000, 7.0000000000000000,
b4688136 3643 5.0000000000000000, 0.0 },
2be75957 3644 { 301599.46814102860, 20.000000000000000, 7.0000000000000000,
b4688136 3645 6.0000000000000000, 0.0 },
2be75957 3646 { 1705051.1866143662, 20.000000000000000, 7.0000000000000000,
b4688136 3647 7.0000000000000000, 0.0 },
2be75957 3648 { 9159788.2353733145, 20.000000000000000, 7.0000000000000000,
b4688136 3649 8.0000000000000000, 0.0 },
2be75957 3650 { 47122070.398665302, 20.000000000000000, 7.0000000000000000,
b4688136 3651 9.0000000000000000, 0.0 },
2be75957 3652 { 233529421.53991735, 20.000000000000000, 7.0000000000000000,
b4688136 3653 10.000000000000000, 0.0 },
2be75957
ESR
3654};
3655const double toler067 = 2.5000000000000009e-07;
3656
3657// Test data for a=20.000000000000000, c=8.0000000000000000.
b4688136
ESR
3658// max(|f - f_GSL|): 5.9604644775390625e-08 at index 20
3659// max(|f - f_GSL| / |f_GSL|): 1.2249582729983602e-09
3660// mean(f - f_GSL): -2.6616969148797329e-09
3661// variance(f - f_GSL): 1.7023121382985524e-16
3662// stddev(f - f_GSL): 1.3047268443235743e-08
2be75957
ESR
3663const testcase_conf_hyperg<double>
3664data068[21] =
3665{
b4688136
ESR
3666 { 4.4385719622857066e-08, 20.000000000000000, 8.0000000000000000,
3667 -10.000000000000000, 0.0 },
2be75957 3668 { 2.7870855352561944e-07, 20.000000000000000, 8.0000000000000000,
b4688136 3669 -9.0000000000000000, 0.0 },
2be75957 3670 { 2.7221706037028333e-07, 20.000000000000000, 8.0000000000000000,
b4688136 3671 -8.0000000000000000, 0.0 },
2be75957 3672 { -1.5211293805365477e-06, 20.000000000000000, 8.0000000000000000,
b4688136 3673 -7.0000000000000000, 0.0 },
2be75957 3674 { -4.2978336531553913e-06, 20.000000000000000, 8.0000000000000000,
b4688136 3675 -6.0000000000000000, 0.0 },
2be75957 3676 { 1.1339557446266733e-05, 20.000000000000000, 8.0000000000000000,
b4688136 3677 -5.0000000000000000, 0.0 },
2be75957 3678 { 5.3526365220658988e-05, 20.000000000000000, 8.0000000000000000,
b4688136 3679 -4.0000000000000000, 0.0 },
2be75957 3680 { -0.00029461053269513242, 20.000000000000000, 8.0000000000000000,
b4688136 3681 -3.0000000000000000, 0.0 },
2be75957 3682 { -0.00026793636646740143, 20.000000000000000, 8.0000000000000000,
b4688136 3683 -2.0000000000000000, 0.0 },
2be75957 3684 { 0.061061258434452807, 20.000000000000000, 8.0000000000000000,
b4688136 3685 -1.0000000000000000, 0.0 },
2be75957 3686 { 1.0000000000000000, 20.000000000000000, 8.0000000000000000,
b4688136
ESR
3687 0.0000000000000000, 0.0 },
3688 { 10.312756690132913, 20.000000000000000, 8.0000000000000000,
3689 1.0000000000000000, 0.0 },
2be75957 3690 { 84.471824856846425, 20.000000000000000, 8.0000000000000000,
b4688136 3691 2.0000000000000000, 0.0 },
2be75957 3692 { 597.47335666854985, 20.000000000000000, 8.0000000000000000,
b4688136 3693 3.0000000000000000, 0.0 },
2be75957 3694 { 3805.9786364107408, 20.000000000000000, 8.0000000000000000,
b4688136 3695 4.0000000000000000, 0.0 },
2be75957 3696 { 22386.068461641658, 20.000000000000000, 8.0000000000000000,
b4688136 3697 5.0000000000000000, 0.0 },
2be75957 3698 { 123573.63516975302, 20.000000000000000, 8.0000000000000000,
b4688136 3699 6.0000000000000000, 0.0 },
2be75957 3700 { 647514.24141570868, 20.000000000000000, 8.0000000000000000,
b4688136 3701 7.0000000000000000, 0.0 },
2be75957 3702 { 3247628.2434586394, 20.000000000000000, 8.0000000000000000,
b4688136 3703 8.0000000000000000, 0.0 },
2be75957 3704 { 15690070.625286419, 20.000000000000000, 8.0000000000000000,
b4688136 3705 9.0000000000000000, 0.0 },
2be75957 3706 { 73379158.893325046, 20.000000000000000, 8.0000000000000000,
b4688136 3707 10.000000000000000, 0.0 },
2be75957
ESR
3708};
3709const double toler068 = 1.0000000000000005e-07;
3710
3711// Test data for a=20.000000000000000, c=9.0000000000000000.
b4688136 3712// max(|f - f_GSL|): 7.4505805969238281e-09 at index 20
2be75957 3713// max(|f - f_GSL| / |f_GSL|): 1.7712852063552690e-08
b4688136
ESR
3714// mean(f - f_GSL): 2.9817087070221364e-10
3715// variance(f - f_GSL): 2.6857406568168514e-18
3716// stddev(f - f_GSL): 1.6388229485874463e-09
2be75957
ESR
3717const testcase_conf_hyperg<double>
3718data069[21] =
3719{
b4688136
ESR
3720 { 7.3976263576568565e-08, 20.000000000000000, 9.0000000000000000,
3721 -10.000000000000000, 0.0 },
2be75957 3722 { -9.0753238092548168e-09, 20.000000000000000, 9.0000000000000000,
b4688136 3723 -9.0000000000000000, 0.0 },
2be75957 3724 { -5.5549484970396693e-07, 20.000000000000000, 9.0000000000000000,
b4688136 3725 -8.0000000000000000, 0.0 },
2be75957 3726 { -1.1104933512848787e-06, 20.000000000000000, 9.0000000000000000,
b4688136 3727 -7.0000000000000000, 0.0 },
2be75957 3728 { 3.2483424385770483e-06, 20.000000000000000, 9.0000000000000000,
b4688136 3729 -6.0000000000000000, 0.0 },
2be75957 3730 { 1.7493431113569438e-05, 20.000000000000000, 9.0000000000000000,
b4688136 3731 -5.0000000000000000, 0.0 },
2be75957 3732 { -3.9066110636117233e-05, 20.000000000000000, 9.0000000000000000,
b4688136 3733 -4.0000000000000000, 0.0 },
2be75957 3734 { -0.00040356155493308509, 20.000000000000000, 9.0000000000000000,
b4688136 3735 -3.0000000000000000, 0.0 },
2be75957 3736 { 0.0037671531470534550, 20.000000000000000, 9.0000000000000000,
b4688136 3737 -2.0000000000000000, 0.0 },
2be75957 3738 { 0.090944344485248435, 20.000000000000000, 9.0000000000000000,
b4688136 3739 -1.0000000000000000, 0.0 },
2be75957 3740 { 1.0000000000000000, 20.000000000000000, 9.0000000000000000,
b4688136 3741 0.0000000000000000, 0.0 },
2be75957 3742 { 8.2390942957149722, 20.000000000000000, 9.0000000000000000,
b4688136 3743 1.0000000000000000, 0.0 },
2be75957 3744 { 57.468054562166706, 20.000000000000000, 9.0000000000000000,
b4688136 3745 2.0000000000000000, 0.0 },
2be75957 3746 { 358.00109079775746, 20.000000000000000, 9.0000000000000000,
b4688136 3747 3.0000000000000000, 0.0 },
2be75957 3748 { 2051.3704389047002, 20.000000000000000, 9.0000000000000000,
b4688136 3749 4.0000000000000000, 0.0 },
2be75957 3750 { 11012.597503064209, 20.000000000000000, 9.0000000000000000,
b4688136 3751 5.0000000000000000, 0.0 },
2be75957 3752 { 56082.113308934473, 20.000000000000000, 9.0000000000000000,
b4688136 3753 6.0000000000000000, 0.0 },
2be75957 3754 { 273348.46918863337, 20.000000000000000, 9.0000000000000000,
b4688136 3755 7.0000000000000000, 0.0 },
2be75957 3756 { 1283674.4996444662, 20.000000000000000, 9.0000000000000000,
b4688136 3757 8.0000000000000000, 0.0 },
2be75957 3758 { 5838026.8730425332, 20.000000000000000, 9.0000000000000000,
b4688136 3759 9.0000000000000000, 0.0 },
2be75957 3760 { 25817349.972859699, 20.000000000000000, 9.0000000000000000,
b4688136 3761 10.000000000000000, 0.0 },
2be75957
ESR
3762};
3763const double toler069 = 1.0000000000000004e-06;
3764
3765// Test data for a=20.000000000000000, c=10.000000000000000.
b4688136
ESR
3766// max(|f - f_GSL|): 1.8626451492309570e-09 at index 20
3767// max(|f - f_GSL| / |f_GSL|): 3.6960738533111097e-09
3768// mean(f - f_GSL): 1.6480220132168215e-10
3769// variance(f - f_GSL): 1.5134021047767599e-19
3770// stddev(f - f_GSL): 3.8902469134706086e-10
2be75957
ESR
3771const testcase_conf_hyperg<double>
3772data070[21] =
3773{
b4688136
ESR
3774 { -4.1157677792944940e-08, 20.000000000000000, 10.000000000000000,
3775 -10.000000000000000, 0.0 },
2be75957 3776 { -2.0187210039960914e-07, 20.000000000000000, 10.000000000000000,
b4688136 3777 -9.0000000000000000, 0.0 },
2be75957 3778 { -2.2272304939386817e-07, 20.000000000000000, 10.000000000000000,
b4688136 3779 -8.0000000000000000, 0.0 },
2be75957 3780 { 1.2925568212606171e-06, 20.000000000000000, 10.000000000000000,
b4688136 3781 -7.0000000000000000, 0.0 },
2be75957 3782 { 5.5744573775996210e-06, 20.000000000000000, 10.000000000000000,
b4688136 3783 -6.0000000000000000, 0.0 },
2be75957 3784 { -6.2568272011787289e-06, 20.000000000000000, 10.000000000000000,
b4688136 3785 -5.0000000000000000, 0.0 },
2be75957 3786 { -0.00011955177906335608, 20.000000000000000, 10.000000000000000,
b4688136 3787 -4.0000000000000000, 0.0 },
2be75957 3788 { 9.2475405516991146e-05, 20.000000000000000, 10.000000000000000,
b4688136 3789 -3.0000000000000000, 0.0 },
2be75957 3790 { 0.010123531287569976, 20.000000000000000, 10.000000000000000,
b4688136 3791 -2.0000000000000000, 0.0 },
2be75957 3792 { 0.12118937229909534, 20.000000000000000, 10.000000000000000,
b4688136 3793 -1.0000000000000000, 0.0 },
2be75957 3794 { 1.0000000000000000, 20.000000000000000, 10.000000000000000,
b4688136 3795 0.0000000000000000, 0.0 },
2be75957 3796 { 6.8319857942415538, 20.000000000000000, 10.000000000000000,
b4688136 3797 1.0000000000000000, 0.0 },
2be75957 3798 { 41.356658140815220, 20.000000000000000, 10.000000000000000,
b4688136 3799 2.0000000000000000, 0.0 },
2be75957 3800 { 229.57496033810904, 20.000000000000000, 10.000000000000000,
b4688136 3801 3.0000000000000000, 0.0 },
2be75957 3802 { 1192.7830549969501, 20.000000000000000, 10.000000000000000,
b4688136 3803 4.0000000000000000, 0.0 },
2be75957 3804 { 5878.6003887215920, 20.000000000000000, 10.000000000000000,
b4688136 3805 5.0000000000000000, 0.0 },
2be75957 3806 { 27741.749322673899, 20.000000000000000, 10.000000000000000,
b4688136 3807 6.0000000000000000, 0.0 },
2be75957 3808 { 126220.54599305880, 20.000000000000000, 10.000000000000000,
b4688136 3809 7.0000000000000000, 0.0 },
2be75957 3810 { 556592.10886612453, 20.000000000000000, 10.000000000000000,
b4688136 3811 8.0000000000000000, 0.0 },
2be75957 3812 { 2388555.2873243927, 20.000000000000000, 10.000000000000000,
b4688136 3813 9.0000000000000000, 0.0 },
2be75957 3814 { 10008079.497419352, 20.000000000000000, 10.000000000000000,
b4688136 3815 10.000000000000000, 0.0 },
2be75957
ESR
3816};
3817const double toler070 = 2.5000000000000009e-07;
3818
b4688136 3819template<typename Ret, unsigned int Num>
2be75957 3820 void
b4688136 3821 test(const testcase_conf_hyperg<Ret> (&data)[Num], Ret toler)
2be75957 3822 {
b4688136
ESR
3823 bool test __attribute__((unused)) = true;
3824 const Ret eps = std::numeric_limits<Ret>::epsilon();
3825 Ret max_abs_diff = -Ret(1);
3826 Ret max_abs_frac = -Ret(1);
2be75957
ESR
3827 unsigned int num_datum = Num;
3828 for (unsigned int i = 0; i < num_datum; ++i)
3829 {
b4688136 3830 const Ret f = __gnu_cxx::conf_hyperg(data[i].a, data[i].c,
2be75957 3831 data[i].x);
b4688136
ESR
3832 const Ret f0 = data[i].f0;
3833 const Ret diff = f - f0;
2be75957
ESR
3834 if (std::abs(diff) > max_abs_diff)
3835 max_abs_diff = std::abs(diff);
b4688136
ESR
3836 if (std::abs(f0) > Ret(10) * eps
3837 && std::abs(f) > Ret(10) * eps)
2be75957 3838 {
b4688136 3839 const Ret frac = diff / f0;
2be75957
ESR
3840 if (std::abs(frac) > max_abs_frac)
3841 max_abs_frac = std::abs(frac);
3842 }
3843 }
3844 VERIFY(max_abs_frac < toler);
3845 }
3846
3847int
3848main()
3849{
3850 test(data001, toler001);
3851 test(data002, toler002);
3852 test(data003, toler003);
3853 test(data004, toler004);
3854 test(data005, toler005);
3855 test(data006, toler006);
3856 test(data007, toler007);
3857 test(data008, toler008);
3858 test(data009, toler009);
3859 test(data010, toler010);
3860 test(data011, toler011);
3861 test(data012, toler012);
3862 test(data013, toler013);
3863 test(data014, toler014);
3864 test(data015, toler015);
3865 test(data016, toler016);
3866 test(data017, toler017);
3867 test(data018, toler018);
3868 test(data019, toler019);
3869 test(data020, toler020);
3870 test(data021, toler021);
3871 test(data022, toler022);
3872 test(data023, toler023);
3873 test(data024, toler024);
3874 test(data025, toler025);
3875 test(data026, toler026);
3876 test(data027, toler027);
3877 test(data028, toler028);
3878 test(data029, toler029);
3879 test(data030, toler030);
3880 test(data031, toler031);
3881 test(data032, toler032);
3882 test(data033, toler033);
3883 test(data034, toler034);
3884 test(data035, toler035);
3885 test(data036, toler036);
3886 test(data037, toler037);
3887 test(data038, toler038);
3888 test(data039, toler039);
3889 test(data040, toler040);
3890 test(data041, toler041);
3891 test(data042, toler042);
3892 test(data043, toler043);
3893 test(data044, toler044);
3894 test(data045, toler045);
3895 test(data046, toler046);
3896 test(data047, toler047);
3897 test(data048, toler048);
3898 test(data049, toler049);
3899 test(data050, toler050);
3900 test(data051, toler051);
3901 test(data052, toler052);
3902 test(data053, toler053);
3903 test(data054, toler054);
3904 test(data055, toler055);
3905 test(data056, toler056);
3906 test(data057, toler057);
3907 test(data058, toler058);
3908 test(data059, toler059);
3909 test(data060, toler060);
3910 test(data061, toler061);
3911 test(data062, toler062);
3912 test(data063, toler063);
3913 test(data064, toler064);
3914 test(data065, toler065);
3915 test(data066, toler066);
3916 test(data067, toler067);
3917 test(data068, toler068);
3918 test(data069, toler069);
3919 test(data070, toler070);
3920 return 0;
3921}