Module Tape

type t
val create : ?seconds:float -> ?tracks:int -> unit -> t
val tracks : t -> int
val length : t -> int
val track : t -> int -> Signal.t
val head : t -> float
val set_head : t -> float -> unit
val speed : t -> float
val set_speed : t -> float -> unit
val play : t -> unit
val record : t -> int -> unit
val stop : t -> unit
val moving : t -> bool
val recording : t -> int option
val set_level : t -> int -> float -> unit
val set_loop : t -> (int * int) option -> unit
val process : t -> input:Signal.t -> Signal.t -> unit
val lift : t -> int -> from:int -> until:int -> unit
val drop : t -> int -> unit