1signature Flash = 2sig 3 4 val initialise : (string * int) -> ((unit -> unit) * (unit -> unit)) 5 6end; 7