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

5 lines
95 B
Plaintext

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