let
of_bigstring x = of_base (
Base
.of_bigstring x)