aboutsummaryrefslogtreecommitdiffstats
path: root/FlexibleManipulate.hs
diff options
context:
space:
mode:
Diffstat (limited to 'FlexibleManipulate.hs')
-rw-r--r--FlexibleManipulate.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/FlexibleManipulate.hs b/FlexibleManipulate.hs
index 13682c0..48f9cc7 100644
--- a/FlexibleManipulate.hs
+++ b/FlexibleManipulate.hs
@@ -24,7 +24,6 @@ import XMonad
import Operations
import Graphics.X11.Xlib
import Graphics.X11.Xlib.Extras
-import Foreign.C.Types
-- $usage
-- Add this import to your Config.hs file:
@@ -47,6 +46,8 @@ import Foreign.C.Types
-- a value between 0 and 1 indicating position, and return a value indicating
-- the corresponding position if plain Flex.linear was used.
+discrete, linear, resize, position :: Double -> Double
+
discrete x | x < 0.33 = 0
| x > 0.66 = 1
| otherwise = 0.5