diff --git a/src/a1_positional_style_converter/core.clj b/src/a1_positional_style_converter/core.clj
index 9fabeb9..491c314 100644
--- a/src/a1_positional_style_converter/core.clj
+++ b/src/a1_positional_style_converter/core.clj
@@ -17,17 +17,11 @@
       (clojure.string/join (map char (map #(+ % 65) (cons x l))))
       (recur (dec (int (/ x 26))) (cons (rem x 26) l)))))
 
-
-(defn -main
-  "I don't do a whole lot ... yet."
-  [& args]
-
-  (if (= 0 (count args))
+(defn -main [& args]
+  (if (empty? args)
     (println "params: [pos|a1] [pos value|a1 value]")
-    (do
-      (let [x (nth args 0)]
-        (case x
-          "pos" (println (convert-positional-to-a1 (Integer/parseInt (nth args 1))))
-          "a1" (println (convert-a1-to-positional (nth args 1))))))))
-
-
+    (let [type (nth args 0)
+          param (nth args 1)]
+      (case type
+        "pos" (println (convert-positional-to-a1 (Integer/parseInt param)))
+        "a1" (println (convert-a1-to-positional param))))))