[gnumeric] Amath tests: filter invalid tests; calculate worst performer.

[Morten Welinder <mortenw src gnome org>]

commit 4b1763d17fc5fa0a1dd361d81d92f848e5fbf0af
Author: Morten Welinder <terra gnome org>
Date:   Sat Dec 14 13:41:11 2013 -0500

    Amath tests: filter invalid tests; calculate worst performer.

 samples/amath.gnumeric |  Bin 44307 -> 44226 bytes
 tools/process-amath.pl |   11 ++++++++++-
 2 files changed, 10 insertions(+), 1 deletions(-)
---
diff --git a/samples/amath.gnumeric b/samples/amath.gnumeric
index c48fe93..940e18e 100644
Binary files a/samples/amath.gnumeric and b/samples/amath.gnumeric differ
diff --git a/tools/process-amath.pl b/tools/process-amath.pl
index b7ccd63..a65fe91 100755
--- a/tools/process-amath.pl
+++ b/tools/process-amath.pl
@@ -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";