let bed file =     Bed (get_raw_file (AF.get_file file))     |> AF.with_provenance "bed" ["file"AF.get_provenance file]