let
my_int64_of_big_int i =
Int64
.of_string (
Big_int
.string_of_big_int i)