let int_str_pmap = BatIO.to_f_printer (BatMap.print BatInt.print BatString.print)