let
rope_enum = to_format (enum_print
BatRope
.print)