let list l =
  fun ~var_count ->
    SP.nest (OCaml.list (fun a -> a ~var_count) l)