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