6 lines
98 B
Text
6 lines
98 B
Text
|
|
> divide n m = catch (\_ -> "divide by 0") (n div m);
|
||
|
|
> divide 0 1;
|
||
|
|
0
|
||
|
|
> divide 1 0;
|
||
|
|
"divide by 0"
|