aboutsummaryrefslogtreecommitdiffstats
path: root/XMonad/Layout
diff options
context:
space:
mode:
authorgwern0 <gwern0@gmail.com>2010-03-14 22:00:01 +0100
committergwern0 <gwern0@gmail.com>2010-03-14 22:00:01 +0100
commita901c04eb3ca07446397a6435c31d3c3774c82ac (patch)
tree8a6e1b0325c02160fe5a426d554a458803e57f4e /XMonad/Layout
parent07fb5190405bbffc6b2462dd17ae305581870eab (diff)
downloadXMonadContrib-a901c04eb3ca07446397a6435c31d3c3774c82ac.tar.gz
XMonadContrib-a901c04eb3ca07446397a6435c31d3c3774c82ac.tar.xz
XMonadContrib-a901c04eb3ca07446397a6435c31d3c3774c82ac.zip
Column.hs: rm whitespace
Ignore-this: 6cfd701babde42d5dc61bfbe95305b20 darcs-hash:20100314210001-f7719-c1cd8c3928c6fd9e07e1558572e73d6d27e1d2c0.gz
Diffstat (limited to 'XMonad/Layout')
-rw-r--r--XMonad/Layout/Column.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/XMonad/Layout/Column.hs b/XMonad/Layout/Column.hs
index a77b3d8..ba87122 100644
--- a/XMonad/Layout/Column.hs
+++ b/XMonad/Layout/Column.hs
@@ -61,9 +61,9 @@ columnLayout (Column q) rect stack = zip ws rects
mkRect :: Rectangle -> (Dimension,Position) -> Rectangle
mkRect (Rectangle xs ys ws _) (h,y) = Rectangle xs (ys+fromIntegral y) ws h
-
+
xn :: Int -> Rectangle -> Float -> Int -> Dimension
-xn n (Rectangle _ _ _ h) q k = if q==1 then
+xn n (Rectangle _ _ _ h) q k = if q==1 then
h `div` (fromIntegral n)
else
round ((fromIntegral h)*q^(n-k)*(1-q)/(1-q^n))