Skip to content

Instantly share code, notes, and snippets.

View DylanLukes's full-sized avatar

Dylan Lukes DylanLukes

  • University of California San Diego
  • San Diego, CA
View GitHub Profile
// this is the "generated" code (loading from fs is still 'generating'...)
module.exports = function() { console.log('hello world'); }
-- | Garden variety prime sieve
isPrime x = not $ any divisible $ takeWhile bounded [2..] where
divisible y = x `mod` y == 0
bounded y = y * y <= x
-- | Germain prime sieve
isGermainPrime x = (isPrime x) && (isPrime (2*x + 1))
-- | All of the Germain primes
var noflo = require('noflo');
var fbp = require('fbp');
var fs = require('fs');
var path = require('path');
var util = require('util');
var browserify = require('browserify');
var coffeeify = require('coffeeify');
var through = require('through2');
var stream = require('stream');
var wait = require('wait.for');
noflo = require 'noflo'
browserify = require 'browserify'
evil = require 'notevil'
class Bundler extends noflo.Component
icon: 'gift'
description: 'Bundles input files using Browserify'
constructor: ->
@inPorts = new noflo.InPorts
bundle:
from django import template
register = template.Library()
@register.assignment_tag(takes_context=True)
def get_page_extension(context):
return context['current_page'].epicpageextension
@register.assignment_tag(takes_context=True)
def get_title_extension(context):
data TicketId' a = TicketId a deriving (Functor)
type TicketId = TicketId' Int
type TicketIdColumn = TicketId' (Column PGInt4)
$(makeAdaptorAndInstance "pTicketId" ''TicketId')
data Ticket' a b c d e = Ticket { _tId :: a
, _tTicket :: b
, _tUserId :: c
, _tExpires :: d
, _tConsumed :: e }
{-# LANGUAGE Arrows #-}
{-# LANGUAGE DeriveFunctor #-}
{-# LANGUAGE FlexibleContexts #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE FunctionalDependencies #-}
{-# LANGUAGE MultiParamTypeClasses #-}
{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE TypeSynonymInstances #-}
module Haven.Types where
{-# LANGUAGE Arrows #-}
{-# LANGUAGE ConstraintKinds #-}
{-# LANGUAGE DeriveFunctor #-}
{-# LANGUAGE FlexibleContexts #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE FunctionalDependencies #-}
{-# LANGUAGE MultiParamTypeClasses #-}
{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE TypeSynonymInstances #-}
{-# LANGUAGE StandaloneDeriving #-}
@DylanLukes
DylanLukes / Types.hs
Last active August 29, 2015 14:22
Types.hs
{-# LANGUAGE Arrows #-}
{-# LANGUAGE ConstraintKinds #-}
{-# LANGUAGE DeriveFunctor #-}
{-# LANGUAGE FlexibleContexts #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE FunctionalDependencies #-}
{-# LANGUAGE MultiParamTypeClasses #-}
{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE TypeSynonymInstances #-}
{-# LANGUAGE StandaloneDeriving #-}
#!/bin/bash
function atoi {
IP=$1; IPNUM=0
for (( i=0 ; i<4 ; ++i )); do
((IPNUM+=${IP%%.*}*$((256**$((3-${i}))))))
IP=${IP#*.}
done
echo $IPNUM
}