external set_alpha : t -> face -> float -> unit = "material_set_alpha"