drop some debug output

diff --git a/parse-input-graph b/parse-input-graph
index 01c1202a57159fd021dd76a7d800eece5920a5b1..25740c7b1f79a0ad021f9abd1ff58cf48e8edc9c 100755 (executable)
--- a/parse-input-graph
+++ b/parse-input-graph
@@ -82,7 +82,7 @@ sub unique_aref ($$) {
       ." | ".$pr->(@found)." | ?"
       unless @found==1;
   my $r = $found[0][0];
-  print STDERR "resolve $ra -> $adja->{Pattern} = $r\n";
+  #print STDERR "resolve $ra -> $adja->{Pattern} = $r\n";
   return $r;
 }