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