(defconst cell-size 5)                 ; a compile-time constant
(defconst gravity f32 0.05)            ; with its type named
(defvar current-color i32)             ; zeroed storage
(defconst rows 3)
(defconst cols 4)
(defvar grid [rows [cols u32]])        ; BSS, rows*cols*4 bytes

(defn main []
  (print-i64 (i64 cell-size)) (newline)
  (print-f64 (f64 gravity)) (newline)
  (print-i64 (i64 current-color)) (newline)
  (print-i64 (i64 (at grid 2 3))) (newline))