From: Ian Jackson <ian@liberator.relativity.greenend.org.uk>
Date: Sat, 5 Sep 2009 19:14:36 +0000 (+0100)
Subject: Remove some debugging
X-Git-Tag: 3.4~6
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~yarrgweb/git?p=ypp-sc-tools.db-live.git;a=commitdiff_plain;h=2c26fbc23aac8445026d15b1a151bb9da0d4064d;hp=59464c798776cdd7f4fffbca4540238ddc5d7cbe;ds=sidebyside

Remove some debugging
---

diff --git a/yarrg/web/routetrade b/yarrg/web/routetrade
index e5e59aa..397e385 100644
--- a/yarrg/web/routetrade
+++ b/yarrg/web/routetrade
@@ -435,15 +435,15 @@ foreach my $ci (0..($#islandids-1)) {
 		next unless grep { $f->{'dst_id'} == $_ }
 			@islandids[$ci+1..@islandids-1];
 		push @rel_flows, $f;
-print " RELEVANT $ci $f->{Ix}  ";
+#print " RELEVANT $ci $f->{Ix}  ";
 	}
-print " RELEVANT $ci COUNT ".scalar(@rel_flows)."  ";
+#print " RELEVANT $ci COUNT ".scalar(@rel_flows)."  ";
 	next unless @rel_flows;
 	foreach my $mv (qw(mass volume)) {
 		my $max_vn= "max_$mv";
 		my $max= $mv eq 'mass' ? $max_mass : $max_volume;
 		next unless defined $max;
-print " DEFINED MAX $mv $max ";
+#print " DEFINED MAX $mv $max ";
 		$cplex .= "
    ". sprintf("%-10s","${mv}_$ci:")." ".
 	join(" + ", map { ($_->{"unit$mv"}*1e-3).' f'.$_->{Ix} } @rel_flows).