sig val flush : unit -> unit val beep : unit -> unit end