RosettaCodeData/Task/Detect-division-by-zero/Prolog/detect-division-by-zero.pro

3 lines
63 B
Prolog
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
div(A, B, C, Ex) :-
catch((C is A/B), Ex, (C = infinity)).