let
of_string_conv str f =
gen_of_string_conv of_string
Annotated
.of_string str f