external i : t -> [< `source_relative | `cone_inner_angle | `cone_outer_angle | `looping | `buffer | `source_state ] -> int -> unit = "al_source_i"