diff --git a/clj/hoge.clj b/clj/hoge.clj
index de9df8c..fc4b5ad 100644
--- a/clj/hoge.clj
+++ b/clj/hoge.clj
@@ -1,16 +1,8 @@
-(let
-  [ lines
-    (seq
-      (clojure.string/split-lines
-        (slurp "../data.csv" ))) ]
-  (dotimes [ n 10 ]
+(let [lines (clojure.string/split-lines
+             (slurp "../data.csv" ))]
+  (dotimes [n 10]
     (time
-      (print
-        (apply
-          max
-          (map
-            #(read-string
-              (nth
-                (clojure.string/split % #",")
-                0))
-            lines))))))
+     (print
+      (->> lines
+           (map #(Long/parseLong (nth (.split ^String % ",") 0)))
+           (reduce max))))))