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