7 lines
92 B
OCaml
7 lines
92 B
OCaml
|
let div_check x y =
|
||
|
|
try
|
||
|
|
ignore (x / y);
|
||
|
|
false
|
||
|
|
with Division_by_zero ->
|
||
|
|
true
|