(module bool_to_str_smoke_false
  (fn main
    (doc "Iter 24.1: stdout-smoke for the false branch of bool_to_str. Stdout must be `false\\n` (puts adds the newline). Companion of bool_to_str_drop_rc.ail.json (which covers the true branch and the RC-stats invariant).")
    (type (fn-type (params) (ret (own (con Unit))) (effects IO)))
    (params)
    (body (let s (app bool_to_str false) (seq (do io/print_str s) (do io/print_str "\n"))))))