RosettaCodeData/Task/Four-bit-adder/OCaml/four-bit-adder-4.ml

5 lines
95 B
OCaml

# gen_plus 7 100 100;;
- : int * int = (72, 1)
# gen_plus 8 100 100;;
- : int * int = (200, 0)