let input_raw ?filter ?(archs=[]) ?(extras=[]) = let module M = Format822.RawInput(Set) in let extras = default_extras @ extras in M.input_raw (parse_packages_in ?filter ~archs ~extras)