let rope_pset = BatIO.to_f_printer (BatSet.print BatText.print)