aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--Roledex.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/Roledex.hs b/Roledex.hs
index 02eecf8..89c0f24 100644
--- a/Roledex.hs
+++ b/Roledex.hs
@@ -62,5 +62,6 @@ roledexLayout sc ws = return ([(W.focus ws, mainPane)] ++
then (n - 1) : (cd (n-1) m)
else []
+div' :: Integral a => a -> a -> a
div' _ 0 = 0
div' n o = div n o