let
my_big_int_of_int64 i =
Big_int
.big_int_of_string (
Int64
.to_string i)