Commit 4b1763d1 authored by Morten Welinder's avatar Morten Welinder

Amath tests: filter invalid tests; calculate worst performer.

parent 8bc9cefa
No preview for this file type
......@@ -127,6 +127,12 @@ my %invalid_tests =
'cot(1e26)' => 1, # 1e26 not representable
'sin(1e26)' => 1, # 1e26 not representable
'tan(1e26)' => 1, # 1e26 not representable
# Just plain wrong (and would depend on representation anyway)
'besselj(11.791534439014281614,0)' => 1,
'besselj(13.323691936314223032,1)' => 1,
'bessely(13.36109747387276348,0)' => 1,
'bessely(14.89744212833672538,1)' => 1,
);
sub def_expr_handler {
......@@ -219,7 +225,7 @@ my %constants =
# -----------------------------------------------------------------------------
my $last_func = '';
my $test_row = 1;
my $test_row = 3;
sub output_test {
my ($gfunc,$expr,$res) = @_;
......@@ -318,6 +324,9 @@ sub simplify_val {
# -----------------------------------------------------------------------------
print "WORST,\"\",\"\",=MIN(D3:D65525)\n";
print "\n";
foreach my $f (@test_files) {
my $fn = "$dir/tests/$f";
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment