module AlListener: sig .. end
sig
end
val fv : [< `orientation | `position | `velocity ] -> float array -> unit
[< `orientation | `position | `velocity ] -> float array -> unit
val getfv : [< `orientation | `position | `velocity ] -> float array
[< `orientation | `position | `velocity ] -> float array
val f : [< `gain ] -> float -> unit
[< `gain ] -> float -> unit
val getf : [< `gain ] -> float
[< `gain ] -> float