diff options
| author | Don Stewart <dons@galois.com> | 2007-11-08 00:06:01 +0100 |
|---|---|---|
| committer | Don Stewart <dons@galois.com> | 2007-11-08 00:06:01 +0100 |
| commit | 04c3480fd2c80837a2beeae5b3e2459479f09242 (patch) | |
| tree | 5f97bd35a779653c852bc85afc65a71f570a7cc5 | |
| parent | e7353edf54ada68836a736b0addef66ae8897f89 (diff) | |
| download | XMonadContrib-04c3480fd2c80837a2beeae5b3e2459479f09242.tar.gz XMonadContrib-04c3480fd2c80837a2beeae5b3e2459479f09242.tar.xz XMonadContrib-04c3480fd2c80837a2beeae5b3e2459479f09242.zip | |
over pararenthesised arty fibonacci
darcs-hash:20071107230601-cba2c-ebfff275275980cc4260f714c452e371d76a8cae.gz
| -rw-r--r-- | XMonad/Layout/Spiral.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/XMonad/Layout/Spiral.hs b/XMonad/Layout/Spiral.hs index ae82ad9..b865f4d 100644 --- a/XMonad/Layout/Spiral.hs +++ b/XMonad/Layout/Spiral.hs @@ -40,7 +40,7 @@ import XMonad.StackSet ( integrate ) -- %layout , Layout $ spiral (1 % 1) fibs :: [Integer] -fibs = 1 : 1 : (zipWith (+) fibs (tail fibs)) +fibs = 1 : 1 : zipWith (+) fibs (tail fibs) mkRatios :: [Integer] -> [Rational] mkRatios (x1:x2:xs) = (x1 % x2) : mkRatios (x2:xs) |