let
of_file ?(chr_map=ident) file =
Parser
.bpmap ~chr_map file