This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
// ==UserScript== | |
// @name Custom Heavy Load | |
// @namespace PapaNachos | |
// @include http://www.reddit.com/* | |
// @include *.mtu.edu/* | |
// @version 1.2.1 | |
// ==/UserScript== | |
//****************************************************************************************************************** | |
//vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
diff --git a/drivers/video/logo/Kconfig b/drivers/video/logo/Kconfig | |
index 39ac49e..3878ccf 100644 | |
--- a/drivers/video/logo/Kconfig | |
+++ b/drivers/video/logo/Kconfig | |
@@ -27,6 +27,10 @@ config LOGO_LINUX_CLUT224 | |
bool "Standard 224-color Linux logo" | |
default n | |
+config LOGO_MLP_CLUT224 | |
+ bool "MLP:FiM 224-color Linux logo" |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
{-# LANGUAGE BangPatterns #-} | |
{-# LANGUAGE DeriveGeneric #-} | |
{-# LANGUAGE FlexibleContexts #-} | |
{-# LANGUAGE FlexibleInstances #-} | |
{-# LANGUAGE GADTs #-} | |
{-# LANGUAGE GeneralizedNewtypeDeriving #-} | |
{-# LANGUAGE OverloadedStrings #-} | |
{-# LANGUAGE OverlappingInstances #-} | |
{-# LANGUAGE KindSignatures #-} | |
{-# LANGUAGE ScopedTypeVariables #-} |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
{-# LANGUAGE GADTs #-} | |
{-# LANGUAGE RankNTypes #-} | |
{-# LANGUAGE StandaloneDeriving #-} | |
module RedBlackTree where | |
data Zero | |
data Succ n | |
type One = Succ Zero | |
data Black |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
import Data.Complex | |
import Control.Arrow | |
import Control.Monad | |
fft :: [Complex Double] -> [Complex Double] | |
fft = fft' . pad | |
-- perform a fast fourier transform | |
fft' :: [Complex Double] -> [Complex Double] | |
fft' [x] = [x] |