moving problem solutions into their own files

git-svn-id: file:///Volumes/JJT 4GB/Apps/svn_repo/Algorithm-TravelingSalesman-BitonicTour/trunk@102 5bda1b4c-df04-11dc-9541-bd5b2d3e4f05

t/03-solve-0.t

@@ -0,0 +1,16 @@
+use strict;
+use warnings;
+use Algorithm::TravelingSalesman::BitonicTour;
+use Data::Dumper;
+use Test::More 'no_plan';
+use Test::Exception;
+
+use_ok('Algorithm::TravelingSalesman::BitonicTour');
+
+# make sure an attempt to solve a problem with no points dies
+{
+    my $b = Algorithm::TravelingSalesman::BitonicTour->new;
+    throws_ok { $b->solve } qr/need to add some points/,
+        'bad problem throws exception';
+}
+

t/04-solve-1.t

@@ -0,0 +1,19 @@
+use strict;
+use warnings;
+use Algorithm::TravelingSalesman::BitonicTour;
+use Data::Dumper;
+use Test::More 'no_plan';
+use Test::Exception;
+
+use_ok('Algorithm::TravelingSalesman::BitonicTour');
+
+# make sure a problem with exactly one point "works"
+for (1 .. 10) {
+    my $b = Algorithm::TravelingSalesman::BitonicTour->new;
+    my ($x, $y) = map { 10 - rand(20) } 1, 2;
+    $b->add_point($x,$y);
+    my @solution;
+    lives_ok { @solution = $b->solve };
+    is_deeply(\@solution, [0,0]) or diag(Dumper($b));
+}
+

t/03-solve.t → t/05-solve-N.t

@@ -7,25 +7,7 @@ use Test::Exception;
 
 use_ok('Algorithm::TravelingSalesman::BitonicTour');
 
-# make sure an attempt to solve a problem with no points dies
-{
-    my $b = Algorithm::TravelingSalesman::BitonicTour->new;
-    throws_ok { $b->solve } qr/need to add some points/,
-        'bad problem throws exception';
-}
-
-# make sure a problem with exactly one point "works"
-for (1 .. 10) {
-    my $b = Algorithm::TravelingSalesman::BitonicTour->new;
-    my ($x, $y) = map { 10 - rand(20) } 1, 2;
-    $b->add_point($x,$y);
-    my @solution;
-    lives_ok { @solution = $b->solve };
-    is_deeply(\@solution, [0,0]) or diag(Dumper($b));
-}
-
-
-# now solve a real problem (simple trapezoid)
+# solve a real problem (simple trapezoid)
 {
     my $b = Algorithm::TravelingSalesman::BitonicTour->new;
     $b->add_point(0,0);