struct let ( + ) = Int64.add let ( - ) = Int64.sub let ( * ) = Int64.mul let ( / ) = Int64.div let ( ~- ) = Int64.neg end