(defn main []
  (let-do [xs $[1 2 3 4 5]]
    (StaticArray.map! xs &(fn [x] (* @x 2)))
    (println* (StaticArray.reduce &(fn [total x] (+ total @x)) 0 xs))))