class filechooser_dialog :?kind:filekind -> ?title:string -> ?select:string -> ?parent:GWindow.window -> unit ->object..end
`FILE.method filter : descr:string -> patterns:string list -> unit
method select : ?dir:string -> ?file:string -> unit -> unit