Skip to content

Instantly share code, notes, and snippets.

View shamansir's full-sized avatar
💭
Noodling

Ulric Wilfred shamansir

💭
Noodling
View GitHub Profile
module ExceptT2 where
import Control.Monad.Trans.Maybe
import Data.Char (isNumber, isPunctuation)
import Control.Monad (guard)
import Control.Monad.Trans.Except
import Control.Monad.IO.Class (liftIO)
import Data.Foldable (msum)
import Data.Char (isNumber, isPunctuation)
@shamansir
shamansir / Main.purs
Created March 31, 2018 14:43 — forked from Gabriella439/Main.purs
Purescript Flare - Simon example
module Main where
import Data.Array ((..), reverse)
import Data.Int (toNumber)
import Flare (UI, radioGroup)
import Flare.Drawing (runFlareDrawing)
import Graphics.Drawing
import Graphics.Drawing.Font (font, sansSerif, bold)
import Math (cos, sin, pi)
import Prelude
@shamansir
shamansir / .gitgnore
Created February 26, 2018 07:14
Elm Webpack Project Template
node_modules
elm-stuff
@shamansir
shamansir / Main.purs
Created January 25, 2018 17:42 — forked from soupi/Main.purs
simple purescript-signal + purescript-canvas example
module Main where
import Prelude
import Data.Maybe
import Control.Monad.Eff
import Graphics.Canvas as C
import Signal as S
import Signal.DOM as S
@shamansir
shamansir / Aliases.ielm
Last active December 9, 2017 11:12
IElm examples
import List
type alias Foo = List Int
bar : Foo
bar = [ 2, 3, 4 ]
bar
type alias Test = {
@shamansir
shamansir / StarWarp.md
Last active August 31, 2017 17:09
A Star Warp with Canvas
@shamansir
shamansir / Extensions.md
Last active October 25, 2018 00:02
VS Code User Settings
  • Code Outline by Patryk Zawadzki
  • Dark++ Theme by DryWolf
  • Docker by Microsoft
  • DrRacket Syntax by Dmytro Bogatov
  • Easy icon theme by James Maguire
  • Elm by Elm
  • elm-format bt abadi199 (no more?)
  • Haskell Syntax Highlighting by Justus Adam
  • Haskell Language Server by Alan Zimmerman
  • Haskell GHCi Debug Adapter by phoityne
@shamansir
shamansir / TestUtils.elm
Last active May 16, 2017 21:40 — forked from anonymous/Main.elm
iterateMap, iterateOr, iterateAnd, iterateMapAnd, iterateWhileAnd in Elm
module UtilsTest exposing (suite)
import Test exposing (..)
import Expect
import Utils exposing (..)
suite : Test
suite =
describe "utils"
@shamansir
shamansir / keybase.md
Created February 11, 2017 21:24
keybase.md

Keybase proof

I hereby claim:

  • I am shamansir on github.
  • I am shamansir (https://keybase.io/shamansir) on keybase.
  • I have a public key ASDUvR7HXGuPndquA2braPJg0drzlxd0OQ4voBA8A8Q-bAo

To claim this, I am signing this object:

autoload -U colors && colors
autoload -Uz vcs_info
zstyle ':vcs_info:*' stagedstr '%F{green}•'
zstyle ':vcs_info:*' unstagedstr '%F{yellow}•'
zstyle ':vcs_info:*' check-for-changes true
zstyle ':vcs_info:*' enable git svn
theme_precmd () {
if [[ -z $(git ls-files --other --exclude-standard 2> /dev/null) ]] {