Ethiopian multiplication: Difference between revisions
Content added Content deleted
(→{{header|Haskell}}: 'odd' although included in the Prelude, it is defined here to meet the task specification as: (UNTESTED MOD)) |
(→{{header|OCaml}}: incorrect. Program needs to define three functions to halve double and test odd/even as stated in the task description.) |
||
| Line 1,006: | Line 1,006: | ||
=={{header|OCaml}}== |
=={{header|OCaml}}== |
||
{{incorrect|OCaml|program needs to define three functions to halve double and test odd/even as stated in the task description.}} |
|||
<lang ocaml>let ethiopicmult x y = |
<lang ocaml>let ethiopicmult x y = |
||
let rec aux plier pliand acc = |
let rec aux plier pliand acc = |
||