import qualified XMonad.StackSet as S
moveToIM = doF $ S.shift "im"
...
9 KB (1,195 words) - 15:17, 6 February 2021
#redirect [[Xmonad/Config archive/Thomas ten Cate's xmonad.hs]]
...
98 bytes (14 words) - 13:00, 8 June 2023
echo ${cpu} | gdbar -s v -h 15 -sw 1 >> /tmp/.dzen2cpugraph
echo ${cpu cpu1} | gdbar -s p -w 7 -nonl
...
924 bytes (169 words) - 15:18, 6 February 2021
...recompile' in a terminal. You'll see errors if it's bad, and nothing if it's good.
...than remap every common key, I just change Mod to be the Windows key that's between Ctrl and Alt. So I add this line after layoutHook:
...
20 KB (3,066 words) - 13:01, 24 May 2020
#REDIRECT [[Xmonad/Config archive/leedo's xmonad.hs]]
...
88 bytes (12 words) - 13:01, 8 June 2023
-
148 bytes (19 words) - 15:17, 6 February 2021
-
336 bytes (51 words) - 15:17, 6 February 2021
-
4 KB (452 words) - 14:23, 2 May 2018
-
6 KB (566 words) - 20:23, 21 June 2015
#redirect [[Xmonad/Config archive/David Roundy's Config.hs]]
...
95 bytes (13 words) - 13:00, 8 June 2023
#redirect [[Xmonad/Config archive/twifkak's Config.hs]]
...
90 bytes (12 words) - 12:56, 8 June 2023
-
12 KB (1,574 words) - 15:16, 6 February 2021
, Run Com "uname" ["-s","-r"] "" 36000
, Run Date "%a %b %_d %Y %H:%M:%S" "date" 10
...
2 KB (189 words) - 01:17, 9 April 2021
...xK_Print), unsafeSpawn "import -quality 90 -descend png:$HOME/xwd-$(date +%s)$$.png")
...[[:blank:]]\\+/ /g' > $TMP && screen -S 'irssi' -X readbuf $TMP && screen -S 'irssi' -X paste .;rm $TMP")
...
6 KB (615 words) - 23:47, 28 November 2018
#redirect [[Xmonad/Config archive/Gwern's xmonad.hs]]
...
88 bytes (12 words) - 13:01, 8 June 2023
#redirect [[Poor man's here document]]
...
73 bytes (10 words) - 11:48, 8 June 2023
, Run Com "uname" ["-s","-r"] "" 36000
, Run Date "%a %b %_d %Y %H:%M:%S" "date" 10
...
1,023 bytes (104 words) - 15:18, 6 February 2021
-
11 KB (1,532 words) - 15:18, 6 February 2021
-
96 bytes (12 words) - 13:00, 8 June 2023
...rGray ++ "):^fg()%M^fg(" ++ colorGray ++ "):^fg()^fg(" ++ colorGreen ++ ")%S^fg()") ++!
...f "Switcher" xs = layoutText $ removeWord xs ++ " ^fg(" ++ colorRed ++ ")S^fg(" ++ colorGray ++ ")|^fg(" ++ colorWhiteAlt ++ ")"
...
45 KB (4,625 words) - 00:21, 27 October 2013
parent s = father s `mplus` mother s
grandparent s = paternalGrandfather s `mplus`
...
561 bytes (71 words) - 08:43, 9 April 2021
parent s = (maybeToList (mother s)) ++ (maybeToList (father s))
grandparent s = (maybeToList (paternalGrandfather s)) ++
...
631 bytes (63 words) - 08:44, 9 April 2021
newtype SuperState s t a = SuperState { runSuperState :: (s -> t -> (t,[(a,s)])) }
instance Monad (SuperState s t) where
...
1 KB (169 words) - 05:31, 9 March 2021
newtype State s a = State { runState :: s -> (a, s) }
* <hask>s -></hask>
...
380 bytes (24 words) - 12:26, 6 December 2023
parent s = (toMonad (father s)) `mplus` (toMonad (mother s))
grandparent s = (toMonad (parentalGrandfather s)) `mplus`
...
1 KB (151 words) - 08:45, 9 April 2021
maternalGrandfather s =
return s >>= \ms ->
...
1 KB (147 words) - 08:41, 9 April 2021
newtype SupplyT s m a = SupplyT (StateT [s] m a)
newtype Supply s a = Supply (SupplyT s Identity a)
...
1 KB (202 words) - 05:09, 4 April 2014
maternalGrandfather s =
return s >>= \ms ->
...
4 KB (454 words) - 02:33, 7 January 2022
xor s t = if null s then t else s
loop n s = cycle $ replicate (n-1) [] ++ [s]
...
980 bytes (157 words) - 15:19, 6 February 2021
[s] <- getArgs
putStrLn $ formatCalendarTime defaultTimeLocale s time
...
543 bytes (78 words) - 15:19, 6 February 2021
...e writings on the relevance of algorithmic information theory, and Chaitin's thoughts of its relatedness to epistemology, biology.
[[Chaitin's construction]].
...
440 bytes (57 words) - 06:23, 4 February 2016
It's very simple to use, and provides a highly efficient, pure interface
* JeremyShaw's update of HalDaume's NewBinary package (Cabalized): http://www.n-heptane.com/nhlab/repos/NewBina
...
2 KB (254 words) - 19:03, 23 October 2013
s/^> //
s/\(\n\)> /\1/g
...
600 bytes (99 words) - 10:10, 7 November 2013
...e the prelude function for computing gcd's along with a test of the result's equality to one.
...
329 bytes (49 words) - 19:43, 18 January 2014
.../github.com/bergey/diagrams-stow/blob/master/release/UpperBounds.hs Daniel's]) This page has ideas & requirements for building a less ad-hoc tool, whic
Either Brent's tool or Daniel's (or both) performs each of the tasks listed above. In some cases the code
...
2 KB (241 words) - 16:19, 22 June 2015
...n if it is (mostly) backward-compatible, and otherwise in the "alternative(s)" column.
!Module(s)
...
5 KB (633 words) - 15:16, 6 February 2021
Page about the implementation of Oleg's Iteratee maintained by John Lato.
* [http://okmij.org/ftp/Haskell/Iteratee Oleg's Original Implementation]
...
2 KB (228 words) - 15:18, 6 February 2021
...e hackathon on Friday and Saturday, and possibly Sunday afternoon if there's interest.
To get sound you'll need VSTs, a VST host, and jack if it's linux. It's
...
886 bytes (153 words) - 22:47, 5 April 2017
! Author(s)
! Maintainer(s)
...
4 KB (491 words) - 10:14, 3 August 2015
gray n = foldr (\s acc -> ("0" ++ s):("1" ++ s):acc) [] $ gray (n-1)
gray' n = (gl . gr) [] where gl y = foldr (\s acc -> ('0':s):acc) y gp
...
2 KB (298 words) - 03:02, 7 June 2021