RosettaCodeData/Task/Detect-division-by-zero/OCaml/detect-division-by-zero-2.ml

3 lines
60 B
OCaml
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
let div_check x y =
classify_float (x /. y) = FP_infinite