              512 nil ::ExpResult)))
       (count +dm-sizes+) +dm-reps+]]))
 
+#_ (do (use 'angelic.scripts.thesis 'angelic.util.experiments 'angelic.util.cluster)
+       (cluster-smart-runner (make-dm-exps) false (str *default-run-dir* "/thesis-dm/")))
+
 
 (comment
  ;; DASH-A* blows the stack on the cluster for no good reason, so I'm running

            [#_ ["dijkstra "#(textbook/uniform-cost-search e true)]
             ["dash-a*" #(da/implicit-dash-a* h8i)]
             ["dash-a*" #(da/implicit-dash-a* h8i :choice-fn flast-choice)]
             ["dash-a*" #(da/implicit-dash-a* h8i :collect? :hierarchical)]
             ["dash-a*" #(da/implicit-dash-a* h8i :choice-fn flast-choice :collect? :hierarchical)]                          
             #_ ["1.0-a*" #(textbook/a*-search e (partial dd/simple-dash-heuristic e 1) true)]
             ["0.9-a*" #(textbook/a*-search e (partial dd/simple-dash-heuristic e 0.9) true)]
             #_ ["0.8-a*" #(textbook/a*-search e (partial dd/simple-dash-heuristic e 0.8) true)]
             
             #_ ["1.0-opt-ah-a*"


             ["inv-dsh-ucs" #(hes/dsh-ucs-inverted h8i)]
             
             #_ ["dash-a*" #(da/implicit-dash-a* h8i)]
             #_ ["explicit-ah-a*" #(hes/explicit-simple-ah-a* h1)]
             ]]
      (println (pad-right n 20)
