remove debug info

kraison · Jun 1, 2012 · 49820c7 · 49820c7
1 parent 6340d63
commit 49820c7
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/bipartite.lisp b/bipartite.lisp
@@ -65,8 +65,8 @@ v2."
         (add-edge flow-net source node :weight 1))
       (dolist (node v2)
         (add-edge flow-net node sink :weight 1))
-      (visualize flow-net :render? t
-                 :file (format nil "data/matching-~A.dot" algorithm))
+      ;;(visualize flow-net :render? t
+      ;;:file (format nil "data/matching-~A.dot" algorithm))
       (setq *bp* flow-net)
       (multiple-value-bind (flow edges)
           (compute-maximum-flow flow-net source sink :algorithm algorithm)