external set_density : t -> float -> unit = "fog_set_density"