Skip to content

Instantly share code, notes, and snippets.

View kasbah's full-sized avatar

Kaspar Emanuel kasbah

264 followers · 888 following
View GitHub Profile
@kasbah
kasbah / tree.hs
Last active August 29, 2015 14:05
A binary fractal tree ported from Elm to Helm.
--license: CC-0
--see: https://creativecommons.org/publicdomain/zero/1.0/
--Elm version: http://share-elm.com/sprout/53ee4e81e4b07afa6f9844c9
import FRP.Helm
import qualified FRP.Helm.Window as Window
import qualified FRP.Helm.Mouse as Mouse
data Branch = Branch { branch_x1 :: Double
@kasbah
kasbah / tree.hs
Created August 22, 2014 16:00
A binary fractal tree -- with only constant inputs
--license: CC-0
--see: https://creativecommons.org/publicdomain/zero/1.0/
--Elm version: http://share-elm.com/sprout/53ee4e81e4b07afa6f9844c9
import FRP.Helm
import qualified FRP.Helm.Window as Window
import qualified FRP.Helm.Mouse as Mouse
data Branch = Branch { branch_x1 :: Double
@kasbah
kasbah / log
Created September 2, 2014 12:00
Building dash-haskell-1.0.0.0...
Preprocessing executable 'dash-haskell' for dash-haskell-1.0.0.0...
[15 of 16] Compiling Options ( src/Options.hs, dist/build/dash-haskell/dash-haskell-tmp/Options.o )
src/Options.hs:38:5:
Couldn't match expected type ‘Parser DbProvider’
with actual type ‘Mod OptionFields DbProvider -> Parser DbProvider’
Probable cause: ‘nullOption’ is applied to too few arguments
In the second argument of ‘(<$>)’, namely
‘nullOption
@kasbah
kasbah / elm.js
Created December 23, 2014 01:36
var Elm = Elm || { Native: {} };
Elm.Basics = Elm.Basics || {};
Elm.Basics.make = function (_elm) {
"use strict";
_elm.Basics = _elm.Basics || {};
if (_elm.Basics.values)
return _elm.Basics.values;
var _op = {},
_N = Elm.Native,
_U = _N.Utils.make(_elm),
@kasbah
kasbah / possible_fixes
Last active August 29, 2015 14:14
git log --no-merges 1.1.0..master | grep -B 5 -i fix
commit b0847df6e143b29d725c22f427673b193b17b450
Author: Jonathan Hefner <jonathan.hefner@gmail.com>
Date: Thu Jan 22 18:45:10 2015 -0600
Fix typo and missing imports
--
commit f2dda3b4552af69731925d78eaf37fe68f0d22f3
Author: Evan Czaplicki <info@elm-lang.org>
@kasbah
kasbah / gist:68989908f10698812cb4
Last active August 29, 2015 14:14
app: [0, 82]
device: [1, 82, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]
app: [62, 83, 87, 0, 176, 0, 190, 0, 204, 0, 223, 0, 234, 0, 1, 1, 24, 1, 32, 1, 45, 1, 58, 1, 69, 1, 88, 1, 102, 1, 115, 1, 136, 1, 141, 1, 154, 1, 168, 1, 189, 1, 216, 1, 229, 1, 245, 1, 15, 2, 31, 2, 49, 2, 61, 2, 79, 2, 96, 2, 125, 2, 139, 2]
device: [1, 83, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]
app: [62, 83, 142, 2, 163, 2, 185, 2, 209, 2, 233, 2, 5, 3, 23, 3, 48, 3, 71, 3, 96, 3, 118, 3, 138, 3, 161, 3, 177, 3, 199, 3, 209, 3, 221, 3, 236, 3, 250, 3, 8, 4, 22, 4, 36, 4, 67, 4, 72, 4, 78, 4, 85, 4, 94, 4, 108, 4, 121, 4, 134, 4, 150, 4]
device: [1, 83, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
@kasbah
kasbah / gist:8a8d288bf4d753201938
Created February 7, 2015 15:13
app: [0, 82]
device: [1, 82, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]
app: [62, 83, 87, 0, 176, 0, 190, 0, 204, 0, 223, 0, 234, 0, 1, 1, 24, 1, 32, 1, 45, 1, 58, 1, 69, 1, 88, 1, 102, 1, 115, 1, 136, 1, 141, 1, 154, 1, 168, 1, 189, 1, 216, 1, 229, 1, 245, 1, 15, 2, 31, 2, 49, 2, 61, 2, 79, 2, 96, 2, 125, 2, 139, 2]
device: [1, 83, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]
app: [62, 83, 142, 2, 163, 2, 185, 2, 209, 2, 233, 2, 5, 3, 23, 3, 48, 3, 71, 3, 96, 3, 118, 3, 138, 3, 161, 3, 177, 3, 199, 3, 209, 3, 221, 3, 236, 3, 250, 3, 8, 4, 22, 4, 36, 4, 67, 4, 72, 4, 78, 4, 85, 4, 94, 4, 108, 4, 121, 4, 134, 4, 150, 4]
device: [1, 83, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
@kasbah
kasbah / gist:7fe834c22af12fed842d
Created February 27, 2015 02:55
app [0, 80]
device [1, 80, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]
app [0, 102]
device [2, 102, 16, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]
app [2, 85, 16, 4]
device [62, 85, 0, 1, 0, 0, 8, 4, 17, 4, 97, 109, 97, 122, 111, 110, 46, 99, 111, 109, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]
app [2, 85, 16, 4]
device [62, 85, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]
app [2, 85, 16, 4]
device [8, 85, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
@kasbah
kasbah / 1. Suggestions.md
Last active August 29, 2015 14:16 — forked from sgraf812/Suggestions.md

Which canonical name for the applicative apply operator?

Criteria

@kasbah
kasbah / total
Last active August 29, 2015 14:16
#!/usr/bin/env python
# total up time_sheet in tab seperated values of the format:
# START\tTue Dec 30 12:20:34 GMT 2014
# STOP\tTue Dec 30 14:59:46 GMT 2014
# ...
from __future__ import print_function
from datetime import datetime, timedelta, date
import sys
DATE_FORMAT_STRING = "%a %b %d %H:%M:%S %Z %Y"