Skip to content

Instantly share code, notes, and snippets.

View novodinia's full-sized avatar

Daniel Charbonneau novodinia

2 followers · 4 following
View GitHub Profile
@novodinia
novodinia / gist:11200232
Created April 23, 2014 01:41
cluster.name: catalog_search
node.name: "Catalog Master"
node.tag: query
bootstrap.mlockall: true
network.publish_host: 127.0.0.1
@novodinia
novodinia / sortListsByLength.hs
Created January 30, 2014 02:22
let sortListsByLength l = sortBy (comparing length) l
sortListsByLength [[1,2],[1,2,3],[1,2,3,4]]
-- => [[1,2],[1,2,3],[1,2,3,4]]
@novodinia
novodinia / Main.hs
Created January 28, 2014 23:48
{-# OPTIONS -fno-warn-incomplete-patterns -optc-DNON_POSIX_SOURCE #-}
-----------------------------------------------------------------------------
--
-- GHC Driver program
--
-- (c) The University of Glasgow 2005
--
-----------------------------------------------------------------------------
@novodinia
novodinia / foo.hs
Created January 27, 2014 22:33
x = 1
main = do
putStrLn (show x)
{-
~ runghc foo.hs
1
@novodinia
novodinia / data.json
Last active January 3, 2016 12:59
[
{
"key": "foo",
"values": [
[ { "0" : 1 },
{ "1" : 21 }
],
[ { "0" : 2 },
{ "1" : 22 }
@novodinia
novodinia / stackedChart.jade
Last active January 3, 2016 12:48
.container
.charting-area
nvd3-stacked-area-chart(data="chartData"
id="report3"
height="600"
xaxistickformat="xAxisTickFormat()"
yaxistickformat="yAxisTickFormat()"
showxaxis="true"
showyaxis="true")
@novodinia
novodinia / stackedAreaChartv2.html
Created January 16, 2014 21:52
<!DOCTYPE html>
<meta charset="utf-8">
<html>
<head>
<title>Angular.js nvd3.js Line Chart Directive</title>
<meta http-equiv="content-type" content="text/html; charset=UTF8">
<script src="js/angular.js"></script>
<script src="js/d3.js"></script>
<script src="js/nv.d3.js"></script>
<script src="../dist/angularjs-nvd3-directives.js"></script>
@novodinia
novodinia / stackedAreaChartv2.html
Created January 16, 2014 21:43
<!DOCTYPE html>
<meta charset="utf-8">
<html>
<head>
<title>Angular.js nvd3.js Line Chart Directive</title>
<meta http-equiv="content-type" content="text/html; charset=UTF8">
<script src="js/angular.js"></script>
<script src="js/d3.js"></script>
<script src="js/nv.d3.js"></script>
<script src="../dist/angularjs-nvd3-directives.js"></script>
@novodinia
novodinia / mydrop.hs
Created January 13, 2014 22:02
-- mydrop.hs
drop' n x = do
let v = x
let vs = drop' (n-1) x
return (v:vs)
{-
Prelude> :load mydrop.hs
[1 of 1] Compiling Main ( mydrop.hs, interpreted )
mydrop.hs:8:13:
@novodinia
novodinia / control-struct-defs.hs
Last active January 3, 2016 04:19
Cale explaining IO within #haskell
-- twice :: IO a -> IO (a,a)
twice x = do
u <- x
v <- x
return (u,v)
main = do
p <- twice getLine
print p