Maxima branch_5_48_base_196_gad2082820 https://maxima.sourceforge.io using Lisp International Allegro CL Free Express Edition 11.0 [64-bit Linux (x86-64)] Distributed under the GNU Public License. See the file COPYING. Dedicated to the memory of William Schelter. The function bug_report() provides bug reporting information. (%i1) run_testsuite(share_tests = only) Testsuite run for International Allegro CL Free Express Edition 11.0 [64-bit Linux (x86-64)]: Running tests in rtest_facexp: 37/37 tests passed Running tests in rtest_orthopoly: 52453984 bytes have been tenured, next gc will be global. See the documentation for variable EXCL:*GLOBAL-GC-BEHAVIOR* for more information. 205/205 tests passed Running tests in rtest_pslq: 48/48 tests passed Running tests in rtestflatten: 43/43 tests passed Running tests in rtest_z_transform: 36/36 tests passed Running tests in rtest_zeilberger_extreme: 52445552 bytes have been tenured, next gc will be global. See the documentation for variable EXCL:*GLOBAL-GC-BEHAVIOR* for more information. 9/9 tests passed Running tests in rtest_zeilberger: 52444944 bytes have been tenured, next gc will be global. See the documentation for variable EXCL:*GLOBAL-GC-BEHAVIOR* for more information. 53/53 tests passed Running tests in rtest_boolsimp: Warning: PARSE-CONDITION, :OPERATOR was defined in /home/maxima/maxima-test/src/nparse.lisp and is now being defined in /home/maxima/maxima-test/installroot/share/maxima/branch_5_48_base_196_gad2082820/share/contrib/boolsimp/boolsimp.lisp 48/48 tests passed Running tests in rtest_eigen: 23/23 tests passed Running tests in rtest_lsquares: 52455248 bytes have been tenured, next gc will be global. See the documentation for variable EXCL:*GLOBAL-GC-BEHAVIOR* for more information. 67/67 tests passed Running tests in rtest_pytranslate: 74/74 tests passed Running tests in rtest_odelin: 52558240 bytes have been tenured, next gc will be global. See the documentation for variable EXCL:*GLOBAL-GC-BEHAVIOR* for more information. Warning: VARIABLEP is defined more than once as `operator' in file /home/maxima/maxima-test/installroot/share/maxima/branch_5_48_base_196_gad2082820/share/contrib/diffequations/lazysolver.lisp. Warning: $CHECKSOLUTION is defined more than once as `operator' in file /home/maxima/maxima-test/installroot/share/maxima/branch_5_48_base_196_gad2082820/share/contrib/diffequations/lazysolver.lisp. Warning: SIMP-UNK, :OPERATOR was defined in /home/maxima/maxima-test/installroot/share/maxima/branch_5_48_base_196_gad2082820/share/orthopoly/orthopoly.lisp and is now being defined in /home/maxima/maxima-test/installroot/share/maxima/branch_5_48_base_196_gad2082820/share/contrib/diffequations/odelin.lisp 52429808 bytes have been tenured, next gc will be global. See the documentation for variable EXCL:*GLOBAL-GC-BEHAVIOR* for more information. 109/109 tests passed Running tests in rtestezunits: 316/316 tests passed Running tests in rtest_numericalio: 52429792 bytes have been tenured, next gc will be global. See the documentation for variable EXCL:*GLOBAL-GC-BEHAVIOR* for more information. 52456352 bytes have been tenured, next gc will be global. See the documentation for variable EXCL:*GLOBAL-GC-BEHAVIOR* for more information. 93/93 tests passed Running tests in rtest_simplify_sum: 52443952 bytes have been tenured, next gc will be global. See the documentation for variable EXCL:*GLOBAL-GC-BEHAVIOR* for more information. Warning: SIMP-UNK, :OPERATOR was defined in /home/maxima/maxima-test/installroot/share/maxima/branch_5_48_base_196_gad2082820/share/contrib/diffequations/odelin.lisp and is now being defined in /home/maxima/maxima-test/installroot/share/maxima/branch_5_48_base_196_gad2082820/share/orthopoly/orthopoly.lisp 86/86 tests passed Running tests in rtest_solve_rec: 33/33 tests passed Running tests in rtest_stringproc: 87/87 tests passed Running tests in rtest_md5sum: 52468224 bytes have been tenured, next gc will be global. See the documentation for variable EXCL:*GLOBAL-GC-BEHAVIOR* for more information. 2/2 tests passed Running tests in rtest_opproperties: 117/117 tests passed Running tests in rtest_stats: 53334320 bytes have been tenured, next gc will be global. See the documentation for variable EXCL:*GLOBAL-GC-BEHAVIOR* for more information. 14/14 tests passed Running tests in rtest_distrib: ******************* rtest_distrib.mac: Problem 27 (line 103) ****************** Input: quantile_noncentral_chi2(0.9, 52, 1.9) Result: Illegal function object: #. error-catch This differed from the expected result: 67.80391983267481 ******************* rtest_distrib.mac: Problem 28 (line 106) ****************** Input: random_noncentral_chi2(12, 6.5, 3) Result: Only symbols can be bound; found: 2.6931908579803398e-5 error-catch This differed from the expected result: [15.00674323768026, 24.34835852498128, 17.89531280985209] ******************* rtest_distrib.mac: Problem 29 (line 114) ****************** Input: 8 float(pdf_f(2, 3, ─)) 3 Result: MACRO F2CL-LIB:INT-ADD expects at least 1 argument. It was given 0 arguments. error-catch This differed from the expected result: 0.1303747102124378 ******************* rtest_distrib.mac: Problem 30 (line 117) ****************** Input: cdf_f(2, 30, 5) Result: Attempt to take the cdr of EXCL::INVALID which is not listp. error-catch This differed from the expected result: 542856937402935361 1 - ─────────────────────────── 665416609183179841 sqrt(13) ******************* rtest_distrib.mac: Problem 31 (line 120) ****************** Input: 2 quantile_f(─, 2, 20.1) 3 Result: apply: found 1 where a function was expected. error-catch This differed from the expected result: 1.160908609712148 ******************* rtest_distrib.mac: Problem 32 (line 123) ****************** Input: random_f(10, 31, 3) Result: lambda: formal argument must be a symbol or quoted symbol; found: (g22678983, (int-sub, (int-add, n, 1), i))(num) error-catch This differed from the expected result: [1.292249504147881, 0.7833929757718893, 1.312838168471361] ******************* rtest_distrib.mac: Problem 33 (line 131) ****************** Input: random_exp(53.21, 3) Result: lambda: formal argument must be a symbol or quoted symbol; found: g22678983()(num) error-catch This differed from the expected result: [0.02160755103125626, 0.03258741884383696, 0.02294997277868339] ******************* rtest_distrib.mac: Problem 34 (line 134) ****************** Input: random_exp(3.21, 3) Result: lambda: formal argument must be a symbol or quoted symbol; found: g22678983()(num) error-catch This differed from the expected result: [0.4463703709164452, 0.04871274913659535, 0.09773054426322608] ******************* rtest_distrib.mac: Problem 35 (line 137) ****************** Input: random_exp(302.5, 3) Result: lambda: formal argument must be a symbol or quoted symbol; found: g22678983()(num) error-catch This differed from the expected result: [0.006696757079634556, 0.001445392494195325, 0.002343015491586471] ******************* rtest_distrib.mac: Problem 36 (line 145) ****************** Input: pdf_lognormal(55, - 56, 3) Result: Too many arguments supplied to pdf_lognormal(); found: [55, - 56, 3] error-catch This differed from the expected result: 2 (log(55) + 56) - ─────────────── 18 %e ───────────────────── 165 sqrt(2) sqrt(%pi) ******************* rtest_distrib.mac: Problem 37 (line 148) ****************** Input: cdf_lognormal(3.5, 2, 1.2) Result: apply: found 52.0 where a function was expected. error-catch This differed from the expected result: 0.62269752625386 erf(────────────────) 1 sqrt(2) ─ - ───────────────────── 2 2 ******************* rtest_distrib.mac: Problem 38 (line 151) ****************** Input: 2 quantile_lognormal(─, 2.2, 0.2) 5 Result: Attempt to take the cdr of T which is not listp. error-catch This differed from the expected result: - 1 0.2 sqrt(2) inverse_erf(───) + 2.2 5 %e ******************* rtest_distrib.mac: Problem 39 (line 154) ****************** Input: random_lognormal(10, 15.23, 3) Result: lambda: formal argument must be a symbol or quoted symbol; found: (int-add, n, 1)(num) error-catch This differed from the expected result: [2.353791985229249e-11, 0.187574637106219, 2.9149310594062036e-9] ******************* rtest_distrib.mac: Problem 40 (line 157) ****************** Input: cdf_lognormal(- 2, m, s) Result: apply: found 52.0 where a function was expected. error-catch This differed from the expected result: 0 ******************* rtest_distrib.mac: Problem 41 (line 160) ****************** Input: quantile_lognormal(0, m, s) Result: Attempt to take the cdr of T which is not listp. error-catch This differed from the expected result: 0 ******************* rtest_distrib.mac: Problem 42 (line 163) ****************** Input: quantile_lognormal(1, m, s) Result: Attempt to take the cdr of T which is not listp. error-catch This differed from the expected result: inf ******************* rtest_distrib.mac: Problem 43 (line 166) ****************** Input: 22 2 foo : quantile_lognormal(q, ──, ──) 10 10 Result: Attempt to take the cdr of T which is not listp. error-catch This differed from the expected result: if equal(q, 0) then 0 elseif equal(q, 1) then inf 22 2 else exp(── + (──) sqrt(2) inverse_erf(2 q - 1)) 10 10 ******************* rtest_distrib.mac: Problem 44 (line 169) ****************** Input: ev(foo, q = 0) Result: minf This differed from the expected result: 0 ******************* rtest_distrib.mac: Problem 46 (line 175) ****************** Input: 2 ev(foo, q = ─) 5 Result: apply: found true where a function was expected. error-catch This differed from the expected result: - 1 (2/10) sqrt(2) inverse_erf(───) + 22/10 5 %e ******************* rtest_distrib.mac: Problem 47 (line 178) ****************** Input: mle_lognormal([exp(17), exp(13), exp(11), exp(7), exp(5)]) Result: Too few arguments supplied to mle_lognormal(x, (-, (int-add, n, 1), i)(w)) 17 13 11 7 5 ; found: [[%e , %e , %e , %e , %e ]] error-catch This differed from the expected result: 53 2 sqrt(114) [log_location = ──, log_scale = ───────────] 5 5 ******************* rtest_distrib.mac: Problem 48 (line 181) ****************** Input: mle_lognormal([exp(17), exp(17), exp(17), exp(13), exp(11), exp(11), exp(7), exp(7), exp(7), exp(7), exp(5)]) Result: Too few arguments supplied to mle_lognormal(x, (-, (int-add, n, 1), i)(w)) 17 17 17 13 11 11 7 7 7 7 5 ; found: [[%e , %e , %e , %e , %e , %e , %e , %e , %e , %e , %e ]] error-catch This differed from the expected result: 119 2 sqrt(582) [log_location = ───, log_scale = ───────────] 11 11 ******************* rtest_distrib.mac: Problem 49 (line 184) ****************** Input: [3, 1, 2, 4, 1] mle_lognormal([exp(17), exp(13), exp(11), exp(7), exp(5)], ───────────────) 11 Result: lambda: formal argument must be a symbol or quoted symbol; found: (-, (int-add, n, 1), i)(w) error-catch This differed from the expected result: 119 2 sqrt(582) [log_location = ───, log_scale = ───────────] 11 11 ******************* rtest_distrib.mac: Problem 50 (line 190) ****************** Input: pdf_gamma(5, 2.1, 3.5) Result: Attempt to apply or funcall SETQ which is a special form. error-catch This differed from the expected result: 0.09686570955466306 ******************* rtest_distrib.mac: Problem 51 (line 193) ****************** Input: cdf_gamma(5, 2, 3) Result: Attempt to take the car of 0.16666594255254683 which is not listp. error-catch This differed from the expected result: 5 1 - gamma_incomplete_regularized(2, ─) 3 ******************* rtest_distrib.mac: Problem 52 (line 196) ****************** Input: cdf_gamma(5, 2.1, 30.5) Result: Attempt to take the car of 0.16666594255254683 which is not listp. error-catch This differed from the expected result: 0.009139841119737905 ******************* rtest_distrib.mac: Problem 53 (line 199) ****************** Input: cdf_gamma(5, 21, 30.5) Result: Attempt to take the car of 0.16666594255254683 which is not listp. error-catch This differed from the expected result: 0.0 ******************* rtest_distrib.mac: Problem 54 (line 202) ****************** Input: 1 quantile_gamma(─, 15, 0.2) 6 Result: Attempt to apply or funcall THE which is a special form. error-catch This differed from the expected result: 2.254909620526077 ******************* rtest_distrib.mac: Problem 55 (line 205) ****************** Input: 1 random_gamma(─, 12, 3) 2 Result: 1 Too many arguments supplied to random_gamma(); found: [─, 12, 3] 2 error-catch This differed from the expected result: [26.21845843519933, 1.74922521393547, 12.67589121569082] ******************* rtest_distrib.mac: Problem 56 (line 208) ****************** Input: quantile_gamma(0, a, b) Result: Attempt to apply or funcall THE which is a special form. error-catch This differed from the expected result: 0 ******************* rtest_distrib.mac: Problem 57 (line 211) ****************** Input: quantile_gamma(1, a, b) Result: Attempt to apply or funcall THE which is a special form. error-catch This differed from the expected result: inf ******************* rtest_distrib.mac: Problem 58 (line 217) ****************** Input: 1 5 666 pdf_beta(─, ─, ───) 8 8 57 Result: apply: found 3 where a function was expected. error-catch This differed from the expected result: 13/19 282475249 7 ─────────────────────────────── 47/152 5 222 1073741824 8 beta(─, ───) 8 19 ******************* rtest_distrib.mac: Problem 59 (line 220) ****************** Input: 1 cdf_beta(─, 3, 8) 2 Result: Only symbols can be bound; found: 1 error-catch This differed from the expected result: 121 ─── 128 ******************* rtest_distrib.mac: Problem 60 (line 223) ****************** Input: 1 quantile_beta(─, 2, 3.2) 8 Result: apply: found 0.0 where a function was expected. error-catch This differed from the expected result: 0.1534071622832576 ******************* rtest_distrib.mac: Problem 61 (line 226) ****************** Input: random_beta(1, 18, 3) Result: lambda: formal argument must be a symbol or quoted symbol; found: 1(num) error-catch This differed from the expected result: [0.01590083925830285, 0.07944026842342344, 0.01991813424220185] ******************* rtest_distrib.mac: Problem 62 (line 229) ****************** Input: random_beta(10, 1, 3) Result: lambda: formal argument must be a symbol or quoted symbol; found: 1(num) error-catch This differed from the expected result: [0.9768714741444106, 0.8703877784295725, 0.985410331444349] ******************* rtest_distrib.mac: Problem 63 (line 232) ****************** Input: quantile_beta(0, a, b) Result: apply: found 0.0 where a function was expected. error-catch This differed from the expected result: 0 ******************* rtest_distrib.mac: Problem 64 (line 235) ****************** Input: quantile_beta(1, a, b) Result: apply: found 0.0 where a function was expected. error-catch This differed from the expected result: 1 ******************* rtest_distrib.mac: Problem 65 (line 240) ****************** Input: quantile_continuous_uniform(0, a, b) Result: Too many arguments supplied to quantile_continuous_uniform(); found: [0, a, b] error-catch This differed from the expected result: a ******************* rtest_distrib.mac: Problem 66 (line 243) ****************** Input: quantile_continuous_uniform(1, a, b) Result: Too many arguments supplied to quantile_continuous_uniform(); found: [1, a, b] error-catch This differed from the expected result: b ******************* rtest_distrib.mac: Problem 67 (line 246) ****************** Input: foo : quantile_continuous_uniform(q, - 10, 10) Result: Too many arguments supplied to quantile_continuous_uniform(); found: [q, - 10, 10] error-catch This differed from the expected result: if equal(q, 0) then - 10 elseif equal(q, 1) then 10 else 20 q - 10 ******************* rtest_distrib.mac: Problem 68 (line 249) ****************** Input: 3 ev(foo, q = ─) 4 Result: apply: found true where a function was expected. error-catch This differed from the expected result: 5 ******************* rtest_distrib.mac: Problem 69 (line 255) ****************** Input: random_logistic(- 5, 6, 3) Result: lambda: formal argument must be a symbol or quoted symbol; found: 6(num) error-catch This differed from the expected result: [- 0.5460542049418455, - 0.1005197360489252, - 13.85839539776822] ******************* rtest_distrib.mac: Problem 70 (line 258) ****************** Input: random_logistic(56, 60, 3) Result: lambda: formal argument must be a symbol or quoted symbol; found: 6(num) error-catch This differed from the expected result: [16.18610806632373, - 24.27721421793832, 210.1491259203347] ******************* rtest_distrib.mac: Problem 71 (line 261) ****************** Input: quantile_logistic(0, a, b) Result: Too many arguments supplied to quantile_logistic(); found: [0, a, b] error-catch This differed from the expected result: minf ******************* rtest_distrib.mac: Problem 72 (line 264) ****************** Input: quantile_logistic(1, a, b) Result: Too many arguments supplied to quantile_logistic(); found: [1, a, b] error-catch This differed from the expected result: inf ******************* rtest_distrib.mac: Problem 73 (line 267) ****************** Input: 1 foo : quantile_logistic(q, 2, ─) 3 Result: 1 Too many arguments supplied to quantile_logistic(); found: [q, 2, ─] 3 error-catch This differed from the expected result: 1 log(─ - 1) q if equal(q, 0) then minf elseif equal(q, 1) then inf else 2 - ────────── 3 ******************* rtest_distrib.mac: Problem 74 (line 270) ****************** Input: 1 ev(foo, q = ─) 7 Result: apply: found true where a function was expected. error-catch This differed from the expected result: log(6) 2 - ────── 3 ******************* rtest_distrib.mac: Problem 75 (line 276) ****************** Input: random_pareto(56, 60, 3) Result: lambda: formal argument must be a symbol or quoted symbol; found: integer4(num) error-catch This differed from the expected result: [60.3980718433857, 60.02319863764327, 61.15889083104624] ******************* rtest_distrib.mac: Problem 76 (line 279) ****************** Input: random_pareto(6, 60.2, 3) Result: lambda: formal argument must be a symbol or quoted symbol; found: integer4(num) error-catch This differed from the expected result: [82.00840337695395, 68.26980986249082, 62.88591356337489] ******************* rtest_distrib.mac: Problem 77 (line 282) ****************** Input: quantile_pareto(0, a, b) Result: Attempt to apply or funcall SETQ which is a special form. error-catch This differed from the expected result: b ******************* rtest_distrib.mac: Problem 78 (line 285) ****************** Input: quantile_pareto(1, a, b) Result: Attempt to apply or funcall SETQ which is a special form. error-catch This differed from the expected result: inf ******************* rtest_distrib.mac: Problem 79 (line 288) ****************** Input: foo : quantile_pareto(q, %pi, sqrt(2)) Result: Attempt to apply or funcall SETQ which is a special form. error-catch This differed from the expected result: sqrt(2) if equal(q, 0) then sqrt(2) elseif equal(q, 1) then inf else ──────────── 1/%pi (1 - q) ******************* rtest_distrib.mac: Problem 80 (line 291) ****************** Input: 3 ev(foo, q = ─) 5 Result: apply: found true where a function was expected. error-catch This differed from the expected result: sqrt(2) 1/%pi (───────) 5 1/%pi 2 ******************* rtest_distrib.mac: Problem 81 (line 297) ****************** Input: kurtosis_weibull(4, 5) Result: Attempt to take the car of T which is not listp. error-catch This differed from the expected result: 1 3 4 1 2 1 - 3 gamma(─) gamma(─) 3 gamma (─) 3 sqrt(%pi) gamma (─) 4 4 4 4 ───────────────────── - ─────────── + ───────────────────── + 1 4 256 16 ─────────────────────────────────────────────────────────────── - 3 2 1 gamma (─) sqrt(%pi) 4 2 (───────── - ─────────) 2 16 ******************* rtest_distrib.mac: Problem 82 (line 301) ****************** Input: random_weibull(0.5, 5, 3) Result: Too many arguments supplied to random_weibull(); found: [0.5, 5, 3] error-catch This differed from the expected result: [2.683098300894825, 0.3090168279401363, 0.1236639157364477] ******************* rtest_distrib.mac: Problem 83 (line 304) ****************** Input: random_weibull(15, 0.05, 3) Result: Too many arguments supplied to random_weibull(); found: [15, 0.05, 3] error-catch This differed from the expected result: [0.04977109163672318, 0.04870054424691551, 0.04386166879841022] ******************* rtest_distrib.mac: Problem 84 (line 307) ****************** Input: quantile_weibull(0, a, b) Result: Too many arguments supplied to quantile_weibull(); found: [0, a, b] error-catch This differed from the expected result: 0 ******************* rtest_distrib.mac: Problem 85 (line 310) ****************** Input: quantile_weibull(1, a, b) Result: Too many arguments supplied to quantile_weibull(); found: [1, a, b] error-catch This differed from the expected result: inf ******************* rtest_distrib.mac: Problem 86 (line 313) ****************** Input: 1 foo : quantile_weibull(q, 11, ─) 7 Result: 1 Too many arguments supplied to quantile_weibull(); found: [q, 11, ─] 7 error-catch This differed from the expected result: 1/11 (- log(1 - q)) if equal(q, 0) then 0 elseif equal(q, 1) then inf else ────────────────── 7 ******************* rtest_distrib.mac: Problem 87 (line 316) ****************** Input: 3 ev(foo, q = ──) 17 Result: apply: found true where a function was expected. error-catch This differed from the expected result: 14 1/11 (- log(──)) 17 ─────────────── 7 ******************* rtest_distrib.mac: Problem 88 (line 320) ****************** Input: mle_weibull([1, 19, 17, 23, 11, 43]) Result: ** error while printing error message ** ~A arguments supplied to ~M; found: ~M error-catch This differed from the expected result: [shape = 1.305349878443785, scale = 20.35298540894298] ******************* rtest_distrib.mac: Problem 89 (line 324) ****************** Input: [1, 19, 17, 23, 11, 43] mle_weibull(───────────────────────) 10 Result: ** error while printing error message ** ~A arguments supplied to ~M; found: ~M error-catch This differed from the expected result: [shape = 1.305349878443785, scale = 2.035298540894298] ******************* rtest_distrib.mac: Problem 90 (line 328) ****************** Input: mle_weibull([1, 1, 1, 19, 19, 17, 23, 23, 23, 23, 11, 43]) Result: ** error while printing error message ** ~A arguments supplied to ~M; found: ~M error-catch This differed from the expected result: [shape = 1.147500774671715, scale = 17.68225583330855] ******************* rtest_distrib.mac: Problem 91 (line 331) ****************** Input: [3, 2, 1, 4, 1, 1] mle_weibull([1, 19, 17, 23, 11, 43], ──────────────────) 12 Result: ** error while printing error message ** lambda: formal argument must be a symbol or quoted symbol; found: ~M error-catch This differed from the expected result: [shape = 1.147500774671715, scale = 17.68225583330855] ******************* rtest_distrib.mac: Problem 92 (line 334) ****************** Input: [3, 2, 1, 4, 1, 1] mle_weibull(10 [1, 19, 17, 23, 11, 43], ──────────────────) 12 Result: ** error while printing error message ** lambda: formal argument must be a symbol or quoted symbol; found: ~M error-catch This differed from the expected result: [shape = 1.147500774671715, scale = 176.8225583330855] ******************* rtest_distrib.mac: Problem 93 (line 340) ****************** Input: pdf_rayleigh(2.5, 6) Result: Attempt to take the car of TYPE which is not listp. error-catch This differed from the expected result: 3.459505910082928e-96 ******************* rtest_distrib.mac: Problem 94 (line 343) ****************** Input: 5 pdf_rayleigh(─, 6) 2 Result: Attempt to take the car of TYPE which is not listp. error-catch This differed from the expected result: - 225 180 %e ******************* rtest_distrib.mac: Problem 95 (line 346) ****************** Input: cdf_rayleigh(2.5, 6) Result: Too many arguments supplied to cdf_rayleigh(); found: [2.5, 6] error-catch This differed from the expected result: 1.0 ******************* rtest_distrib.mac: Problem 96 (line 349) ****************** Input: 5 cdf_rayleigh(─, 6) 2 Result: 5 Too many arguments supplied to cdf_rayleigh(); found: [─, 6] 2 error-catch This differed from the expected result: - 225 1 - %e ******************* rtest_distrib.mac: Problem 97 (line 357) ****************** Input: pdf_laplace(2.5, - 5, 3) Result: Attempt to take the car of THE which is not listp. error-catch This differed from the expected result: 0.01368083310398313 ******************* rtest_distrib.mac: Problem 98 (line 360) ****************** Input: 2 cdf_laplace(─, - 5, 30) 5 Result: 2 Too many arguments supplied to cdf_laplace(); found: [─, - 5, 30] 5 error-catch This differed from the expected result: - 9/50 2 - %e ──────────── 2 ******************* rtest_distrib.mac: Problem 99 (line 363) ****************** Input: random_laplace(- 12, 17, 3) Result: lambda: formal argument must be a symbol or quoted symbol; found: setq(num) error-catch This differed from the expected result: [12.6464246671848, - 28.88305575541671, - 25.390527331018] ****************** rtest_distrib.mac: Problem 100 (line 366) ****************** Input: random_laplace(- 0.02, 170, 3) Result: lambda: formal argument must be a symbol or quoted symbol; found: setq(num) error-catch This differed from the expected result: [0.1421750180506419, - 142.1776353512574, 329.313331828124] ****************** rtest_distrib.mac: Problem 101 (line 369) ****************** Input: quantile_laplace(0, a, b) Result: apply: found true where a function was expected. error-catch This differed from the expected result: minf ****************** rtest_distrib.mac: Problem 102 (line 372) ****************** Input: quantile_laplace(1, a, b) Result: apply: found true where a function was expected. error-catch This differed from the expected result: inf ****************** rtest_distrib.mac: Problem 103 (line 375) ****************** Input: - 11 4 foo : quantile_laplace(q, ────, ─) 7 7 Result: apply: found true where a function was expected. error-catch This differed from the expected result: if equal(q, 0) then minf elseif equal(q, 1) then inf - 11 4 else ──── - (─) signum(2 q - 1) log(1 - signum(2 q - 1) (2 q - 1)) 7 7 ****************** rtest_distrib.mac: Problem 104 (line 378) ****************** Input: 9 ev(foo, q = ──) 19 Result: apply: found true where a function was expected. error-catch This differed from the expected result: - 11 4 18 ──── + (─) log(──) 7 7 19 ****************** rtest_distrib.mac: Problem 105 (line 384) ****************** Input: 5 quantile_cauchy(─, 15, 21) 8 Result: Attempt to take the car of :LEXICAL which is not listp. error-catch This differed from the expected result: %pi 21 tan(───) + 15 8 ****************** rtest_distrib.mac: Problem 106 (line 387) ****************** Input: random_cauchy(1, 3, 3) Result: lambda: formal argument must be a symbol or quoted symbol; found: g22678984(num) error-catch This differed from the expected result: [1.44255833281213, - 0.4527321151148478, 2.236170110804809] ****************** rtest_distrib.mac: Problem 107 (line 390) ****************** Input: random_cauchy(- 65, 38, 3) Result: lambda: formal argument must be a symbol or quoted symbol; found: g22678984(num) error-catch This differed from the expected result: [- 66.15930541384257, - 53.93341688372076, 4099.33722348125] ****************** rtest_distrib.mac: Problem 108 (line 393) ****************** Input: quantile_cauchy(0, a, b) Result: Attempt to take the car of :LEXICAL which is not listp. error-catch This differed from the expected result: minf ****************** rtest_distrib.mac: Problem 109 (line 396) ****************** Input: quantile_cauchy(1, a, b) Result: Attempt to take the car of :LEXICAL which is not listp. error-catch This differed from the expected result: inf ****************** rtest_distrib.mac: Problem 110 (line 399) ****************** Input: foo : quantile_cauchy(q, %pi, %phi) Result: Attempt to take the car of :LEXICAL which is not listp. error-catch This differed from the expected result: if equal(q, 0) then minf elseif equal(q, 1) then inf 1 else %pi + %phi tan(%pi (q - ─)) 2 ****************** rtest_distrib.mac: Problem 111 (line 402) ****************** Input: 1 ev(foo, q = ─) 2 Result: apply: found true where a function was expected. error-catch This differed from the expected result: %pi ****************** rtest_distrib.mac: Problem 112 (line 408) ****************** Input: pdf_gumbel(5, - 5, 3) Result: Attempt to take the car of 62 which is not listp. error-catch This differed from the expected result: - 10/3 - %e - 10/3 %e ─────────────────── 3 ****************** rtest_distrib.mac: Problem 113 (line 411) ****************** Input: random_gumbel(- 8, 6, 3) Result: lambda: formal argument must be a symbol or quoted symbol; found: (setq, b0, g22678984)(num) error-catch This differed from the expected result: [- 8.522847585460354, 6.74085360167784, 7.34394651604513] ****************** rtest_distrib.mac: Problem 114 (line 414) ****************** Input: 1 random_gumbel(80, ─, 3) 6 Result: lambda: formal argument must be a symbol or quoted symbol; found: (setq, b0, g22678984)(num) error-catch This differed from the expected result: [80.07101974101381, 80.43036203957068, 79.73692916250752] ****************** rtest_distrib.mac: Problem 115 (line 417) ****************** Input: quantile_gumbel(0, a, b) Result: apply: found 1 where a function was expected. error-catch This differed from the expected result: minf ****************** rtest_distrib.mac: Problem 116 (line 420) ****************** Input: quantile_gumbel(1, a, b) Result: apply: found 1 where a function was expected. error-catch This differed from the expected result: inf ****************** rtest_distrib.mac: Problem 117 (line 423) ****************** Input: 1 foo : quantile_gumbel(q, - 17, ──) 19 Result: apply: found 1 where a function was expected. error-catch This differed from the expected result: log(- log(q)) if equal(q, 0) then minf elseif equal(q, 1) then inf else - 17 - ───────────── 19 ****************** rtest_distrib.mac: Problem 118 (line 429) ****************** Input: pdf_binomial(x, n, 1) Result: Attempt to apply or funcall SETQ which is a special form. error-catch This differed from the expected result: kron_delta(n, x) ****************** rtest_distrib.mac: Problem 119 (line 432) ****************** Input: pdf_binomial(x, n, 0) Result: Attempt to apply or funcall SETQ which is a special form. error-catch This differed from the expected result: kron_delta(0, x) ****************** rtest_distrib.mac: Problem 120 (line 435) ****************** Input: pdf_binomial(0, 0, 0) Result: Attempt to apply or funcall SETQ which is a special form. error-catch This differed from the expected result: 1 ****************** rtest_distrib.mac: Problem 121 (line 438) ****************** Input: pdf_binomial(0, 0, 1) Result: Attempt to apply or funcall SETQ which is a special form. error-catch This differed from the expected result: 1 ****************** rtest_distrib.mac: Problem 122 (line 441) ****************** Input: 3 foo : pdf_binomial(x, n, ──) 11 Result: Attempt to apply or funcall SETQ which is a special form. error-catch This differed from the expected result: if (x < 0) or (x > n) or (x - floor(x) > 0) then 0 x n - x binomial(n, x) 3 8 else ──────────────────────── n 11 ****************** rtest_distrib.mac: Problem 123 (line 444) ****************** Input: baz : (declare(n, integer), ev(foo)) Result: Attempt to take the car of T which is not listp. error-catch This differed from the expected result: if (x < 0) or (x > n) or (x - floor(x) > 0) then 0 x n - x binomial(n, x) 3 8 else ──────────────────────── n 11 ****************** rtest_distrib.mac: Problem 124 (line 447) ****************** Input: quux : ev(baz, x = 6) Result: baz This differed from the expected result: n - 6 binomial(n, 6) 729 8 if 6 > n then 0 else ───────────────────────── n 11 ****************** rtest_distrib.mac: Problem 125 (line 450) ****************** Input: ev(quux, n = 8) Result: baz This differed from the expected result: 1306368 ───────── 214358881 ****************** rtest_distrib.mac: Problem 126 (line 453) ****************** Input: 1 cdf_binomial(3.2, 6, ─) 8 Result: Attempt to take the car of #(8796093374505 8796093374504 0) which is not listp. error-catch This differed from the expected result: 130683 ────── 131072 ****************** rtest_distrib.mac: Problem 127 (line 456) ****************** Input: 1 cdf_binomial(4, 6, ─) 8 Result: Attempt to take the car of #(8796093374505 8796093374504 0) which is not listp. error-catch This differed from the expected result: 262101 ────── 262144 ****************** rtest_distrib.mac: Problem 128 (line 459) ****************** Input: 1 foo : cdf_binomial(x, 13, ─) 3 Result: Attempt to take the car of #(8796093374505 8796093374504 0) which is not listp. error-catch This differed from the expected result: if x < 0 then 0 elseif x >= 13 then 1 else beta_incomplete_regularized(13 2 - floor(x), floor(x) + 1, ─) 3 ****************** rtest_distrib.mac: Problem 129 (line 462) ****************** Input: 1 ev(foo, x = 11 + ─) 4 Result: Attempt to take the car of T which is not listp. error-catch This differed from the expected result: 59048 ───── 59049 ****************** rtest_distrib.mac: Problem 130 (line 465) ****************** Input: 1 quantile_binomial(0.74, 23, ─) 5 Result: Attempt to take the cdr of EXCL::INVALID which is not listp. error-catch This differed from the expected result: 6 ****************** rtest_distrib.mac: Problem 131 (line 468) ****************** Input: quantile_binomial(0, n, p) Result: Attempt to take the cdr of EXCL::INVALID which is not listp. error-catch This differed from the expected result: 0 ****************** rtest_distrib.mac: Problem 132 (line 471) ****************** Input: quantile_binomial(1, n, p) Result: Attempt to take the cdr of EXCL::INVALID which is not listp. error-catch This differed from the expected result: n ****************** rtest_distrib.mac: Problem 133 (line 474) ****************** Input: 1 random_binomial(50, ─, 3) 8 Result: 1 Too many arguments supplied to random_binomial(); found: [50, ─, 3] 8 error-catch This differed from the expected result: [7, 4, 6] ****************** rtest_distrib.mac: Problem 134 (line 480) ****************** Input: foo : pdf_poisson(x, m) Result: Too many arguments supplied to pdf_poisson(); found: [x, m] error-catch This differed from the expected result: if equal(m, 0) then kron_delta(0, x) elseif (x < 0) or (x - floor(x) > 0) x exp(- m) m then 0 else ─────────── x! ****************** rtest_distrib.mac: Problem 135 (line 483) ****************** Input: ev(foo, m = 0) Result: Attempt to take the car of T which is not listp. error-catch This differed from the expected result: kron_delta(0, x) ****************** rtest_distrib.mac: Problem 136 (line 486) ****************** Input: ev(foo, m = 2, x = 5) Result: Attempt to take the car of T which is not listp. error-catch This differed from the expected result: exp(- 2) 4 ────────── 15 ****************** rtest_distrib.mac: Problem 137 (line 489) ****************** Input: 19 cdf_poisson(13, ──) 2 Result: 19 Too many arguments supplied to cdf_poisson(); found: [13, ──] 2 error-catch This differed from the expected result: 19 gamma_incomplete_regularized(14, ──) 2 ****************** rtest_distrib.mac: Problem 138 (line 492) ****************** Input: cdf_poisson(0.1, 0.5) Result: Too many arguments supplied to cdf_poisson(); found: [0.1, 0.5] error-catch This differed from the expected result: 0.6065306597126336 ****************** rtest_distrib.mac: Problem 139 (line 495) ****************** Input: foo : cdf_poisson(x, 0.5) Result: Too many arguments supplied to cdf_poisson(); found: [x, 0.5] error-catch This differed from the expected result: if x < 0 then 0 else gamma_incomplete_regularized(floor(x) + 1, 0.5) ****************** rtest_distrib.mac: Problem 140 (line 498) ****************** Input: ev(foo, x = 0.1) Result: Attempt to take the car of T which is not listp. error-catch This differed from the expected result: 0.6065306597126336 ****************** rtest_distrib.mac: Problem 141 (line 501) ****************** Input: 1 quantile_poisson(─, 10) 9 Result: apply: found true where a function was expected. error-catch This differed from the expected result: 6 ****************** rtest_distrib.mac: Problem 142 (line 506) ****************** Input: random_poisson(110, 3) Result: lambda: formal argument must be a symbol or quoted symbol; found: - 1.9471528603514334(num) error-catch This differed from the expected result: [105, 132, 104] ****************** rtest_distrib.mac: Problem 143 (line 509) ****************** Input: random_poisson(0) Result: Too few arguments supplied to random_poisson(m, - 1.9471528603514334(num)) ; found: [0] error-catch This differed from the expected result: 0 ****************** rtest_distrib.mac: Problem 144 (line 515) ****************** Input: 1 cdf_geometric(5, ─) 8 Result: apply: found 1 where a function was expected. error-catch This differed from the expected result: 144495 ────── 262144 ****************** rtest_distrib.mac: Problem 145 (line 518) ****************** Input: 1 random_geometric(──, 3) 89 Result: 1 Too many arguments supplied to random_geometric(); found: [──, 3] 89 error-catch This differed from the expected result: [30, 38, 58] ****************** rtest_distrib.mac: Problem 146 (line 526) ****************** Input: pdf_hypergeometric(4, 8, 7, 5) Result: Too many arguments supplied to pdf_hypergeometric(); found: [4, 8, 7, 5] error-catch This differed from the expected result: 70 ─── 429 ****************** rtest_distrib.mac: Problem 147 (line 529) ****************** Input: cdf_hypergeometric(10, 18, 70, 25) Result: apply: found 1 where a function was expected. error-catch This differed from the expected result: 19928255517766 ────────────── 19951839306549 ****************** rtest_distrib.mac: Problem 148 (line 532) ****************** Input: 1 quantile_hypergeometric(──, 15, 20, 30) 21 Result: Too many arguments supplied to quantile_hypergeometric(); found: 1 [──, 15, 20, 30] 21 error-catch This differed from the expected result: 11 ****************** rtest_distrib.mac: Problem 149 (line 535) ****************** Input: random_hypergeometric(19, 22, 31, 3) Result: lambda: formal argument must be a symbol or quoted symbol; found: ni(num) error-catch This differed from the expected result: [14, 14, 13] ****************** rtest_distrib.mac: Problem 150 (line 543) ****************** Input: 1 pdf_negative_binomial(4, 7, ─) 8 Result: Attempt to take the car of T which is not listp. error-catch This differed from the expected result: 252105 ────────── 4294967296 ****************** rtest_distrib.mac: Problem 151 (line 546) ****************** Input: 1 cdf_negative_binomial(4, 7, ─) 8 Result: 1 Too many arguments supplied to cdf_negative_binomial(); found: [4, 7, ─] 8 error-catch This differed from the expected result: 425849 ────────── 4294967296 ****************** rtest_distrib.mac: Problem 152 (line 549) ****************** Input: 7 1 quantile_negative_binomial(──, 10, ─) 10 7 Result: Attempt to access the plist field of 1 which is not a symbol. error-catch This differed from the expected result: 69 ****************** rtest_distrib.mac: Problem 153 (line 552) ****************** Input: 1 6 quantile_negative_binomial(─, 9, ──) 8 17 Result: Attempt to access the plist field of 1 which is not a symbol. error-catch This differed from the expected result: 9 ****************** rtest_distrib.mac: Problem 154 (line 555) ****************** Input: 7 1 quantile_negative_binomial(────, 2, ──) 1000 17 Result: Attempt to access the plist field of 1 which is not a symbol. error-catch This differed from the expected result: 1.0 ****************** rtest_distrib.mac: Problem 155 (line 558) ****************** Input: 3 random_negative_binomial(6, ─, 3) 5 Result: 3 Too many arguments supplied to random_negative_binomial(); found: [6, ─, 3] 5 error-catch This differed from the expected result: [5, 8, 9] ****************** rtest_distrib.mac: Problem 157 (line 567) ****************** Input: pdf_inverse_gamma(0, x, y) Result: apply: found 1 where a function was expected. error-catch This differed from the expected result: 0 ****************** rtest_distrib.mac: Problem 158 (line 570) ****************** Input: pdf_inverse_gamma(u, x, y) Result: apply: found 1 where a function was expected. error-catch This differed from the expected result: - y/u - x - 1 x %e u y if u > 0 then ─────────────────── else 0 gamma(x) ****************** rtest_distrib.mac: Problem 159 (line 574) ****************** Input: (assume(u > 0), pdf_inverse_gamma(u, x, y)) Result: apply: found 1 where a function was expected. error-catch This differed from the expected result: - y/u - x - 1 x %e u y ─────────────────── gamma(x) ****************** rtest_distrib.mac: Problem 160 (line 578) ****************** Input: (assume(x > 0), limit(pdf_inverse_gamma(u, x, y), u, inf)) Result: apply: found 1 where a function was expected. error-catch This differed from the expected result: 0 ****************** rtest_distrib.mac: Problem 161 (line 581) ****************** Input: 7 pdf_inverse_gamma(h, ─, 20) 2 Result: apply: found 1 where a function was expected. error-catch This differed from the expected result: 5/2 - 20/h 1024 5 %e if h > 0 then ────────────────── else 0 9/2 3 sqrt(%pi) h ****************** rtest_distrib.mac: Problem 162 (line 584) ****************** Input: 12 7 pdf_inverse_gamma(──, ─, 20) 7 2 Result: apply: found 1 where a function was expected. error-catch This differed from the expected result: 5/2 9/2 - 35/3 2 5 7 %e ──────────────────── 11/2 3 sqrt(%pi) ****************** rtest_distrib.mac: Problem 163 (line 587) ****************** Input: cdf_inverse_gamma(0, f, g) Result: apply: found 2 where a function was expected. error-catch This differed from the expected result: 0 ****************** rtest_distrib.mac: Problem 164 (line 590) ****************** Input: cdf_inverse_gamma(w, f, g) Result: apply: found 2 where a function was expected. error-catch This differed from the expected result: g gamma_incomplete(f, ─) w if w > 0 then ────────────────────── else 0 gamma(f) ****************** rtest_distrib.mac: Problem 165 (line 594) ****************** Input: (assume(w > 0), cdf_inverse_gamma(w, f, g)) Result: apply: found 2 where a function was expected. error-catch This differed from the expected result: g gamma_incomplete(f, ─) w ────────────────────── gamma(f) ****************** rtest_distrib.mac: Problem 166 (line 597) ****************** Input: 3 cdf_inverse_gamma(5, ─, d) 4 Result: apply: found 2 where a function was expected. error-catch This differed from the expected result: 3 d gamma_incomplete(─, ─) 4 5 ────────────────────── 3 gamma(─) 4 ****************** rtest_distrib.mac: Problem 167 (line 600) ****************** Input: 3 11 cdf_inverse_gamma(5, ─, ──) 4 3 Result: apply: found 2 where a function was expected. error-catch This differed from the expected result: 3 11 gamma_incomplete(─, ──) 4 15 ─────────────────────── 3 gamma(─) 4 ****************** rtest_distrib.mac: Problem 168 (line 604) ****************** Input: (assume(f > 0), limit(cdf_inverse_gamma(w, f, g), w, inf)) Result: apply: found 2 where a function was expected. error-catch This differed from the expected result: 1 ****************** rtest_distrib.mac: Problem 170 (line 610) ****************** Input: quantile_inverse_gamma(v, s, t) Result: apply: found 3 where a function was expected. error-catch This differed from the expected result: if equal(v, 0) then 0 elseif equal(v, 1) then inf 1 else ─────────────────────────── 1 quantile_gamma(1 - v, s, ─) t ****************** rtest_distrib.mac: Problem 171 (line 615) ****************** Input: quantile_inverse_gamma(u, 1 + z, 2 - y) Result: apply: found 3 where a function was expected. error-catch This differed from the expected result: if equal(u, 0) then 0 elseif equal(u, 1) then inf 1 else ─────────────────────────────────── 1 quantile_gamma(1 - u, z + 1, ─────) 2 - y ****************** rtest_distrib.mac: Problem 172 (line 618) ****************** Input: 2 y quantile_inverse_gamma(1 - u , 1 + a z, 2 - ─) x Result: apply: found 3 where a function was expected. error-catch This differed from the expected result: 2 2 if equal(1 - u , 0) then 0 elseif equal(1 - u , 1) then inf 1 else ────────────────────────────────── 2 1 quantile_gamma(u , a z + 1, ─────) y 2 - ─ x ****************** rtest_distrib.mac: Problem 173 (line 621) ****************** Input: quantile_inverse_gamma(0, s, t) Result: apply: found 3 where a function was expected. error-catch This differed from the expected result: 0 ****************** rtest_distrib.mac: Problem 174 (line 624) ****************** Input: quantile_inverse_gamma(1, s, t) Result: apply: found 3 where a function was expected. error-catch This differed from the expected result: inf apply: found 2 where a function was expected. #0: cdf_inverse_gamma(x=p,a=4.4,b=2) #1: foo(q=0.1) (rtest_distrib.mac line 627) -- an error. To debug this try: debugmode(true);