let options = [
"-l", Arg.Unit (p Cam_installation.lib_dir), opt_l ;
"-b", Arg.Unit (p Cam_installation.bin_dir), opt_b ;
"-m", Arg.Unit (p Cam_installation.man_dir), opt_m ;
"-t", Arg.Unit (p Cam_installation.templates_dir), opt_t ;
"-p", Arg.Unit (p Cam_installation.plugins_dir), opt_p ;
"-q", Arg.Unit (p Cam_installation.pixmaps_dir), opt_q ;
"-g", Arg.Unit (p Cam_installation.glade_dir), opt_g ;
"-v", Arg.Unit (p Cam_installation.software_version), opt_v ;
"--greater", Arg.String greater, opt_greater ;
]