2 lines
60 B
Standard ML
2 lines
60 B
Standard ML
let div_check x y =
|
|
classify_float (x /. y) = FP_infinite
|
let div_check x y =
|
|
classify_float (x /. y) = FP_infinite
|