who desiged this terrible interface

dpzmick · Mar 22, 2016 · 92841fa · 92841fa
1 parent 6073416
commit 92841fa
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/src/benchmark/id3.clj b/src/benchmark/id3.clj
@@ -43,7 +43,7 @@
           (cons split-attr [(id3 left  (rest sattrs) target)
                             (id3 right (rest sattrs) target)]))))))
 
-(defparfun id3-defparfun [dataset attrs target] (> (count attrs) 50)
+(defparfun id3-defparfun [dataset attrs target] (< (count attrs) 25)
   (if (or (empty? dataset) (empty? attrs))
     []
     (let
@@ -81,7 +81,6 @@
   (let [{data :data attrs :attrs} (read-input-file filename)]
     (cr/bench (id3 data (rest attrs) (first attrs)))))
 
-
 (defn id3-parfun [filename]
   (let [{data :data attrs :attrs} (read-input-file filename)]
     (cr/bench (id3-defparfun data (rest attrs) (first attrs)))))