let
istring_set = to_format (
BatSet
.
IStringSet
.print
BatString
.print)