(* main.mli - Don Yang (uguu.org) 10/27/07 *) (* Run main program loop *) val main : unit -> unit