;;;; A program's function named as a prelude function takes the name over for
;;;; the calls in its own file, and the prelude's own calls keep the prelude's:
;;;; ceil-f32 is written over the prelude's floor-f32, and still answers 3.
(defn abs-f32 [v f32] f32 (if (< v 0.0) (- v) (+ v (f32 100.0))))
(defn floor-f32 [x f32] f32 (f32 999.0))
(defn abs [x i32] i32 (* x 10))
(defn main [] i32
  (println (abs-f32 (f32 -2.5)))
  (println (abs-f32 (f32 2.5)))
  (println (floor-f32 (f32 2.3)))
  (println (ceil-f32 (f32 2.3)))
  (println (abs -3))
  0)