(defn factorial [x]
  (apply * (range 2 (inc x))))