shayelkin

// ==UserScript==
// @name        Event Merge for Google Calendar™ (by @imightbeAmy. Thanks!)
// @namespace   gcal-multical-event-merge
// @include     https://www.google.com/calendar/*
// @include     http://www.google.com/calendar/*
// @require     https://ajax.googleapis.com/ajax/libs/jquery/2.1.0/jquery.min.js
// @version     1
// @grant       none
// ==/UserScript==

shayelkin

import operator
from sys import maxint
from itertools import permutations, product

ops = [operator.add, operator.sub, operator.mul, operator.div]

possibilities = set(reduce(lambda v, t: t[0](v,t[1]), zip(o, n[1:]), n[0]) for n in permutations(range(1,5)) for o in product(ops, repeat=3))

# Without repeating operators:
# possibilities = set(reduce(lambda v, t: t[0](v,t[1]), zip(o, n[1:]), n[0]) for n in permutations(range(1,5)) for o in permutations(ops, repeat=3))

shayelkin

class BooleanFunctor:
    """
    A neat trick: this can be used in conditions, where it returns the value of b,
    or as a decorator, where it returns the decorated function if b, or a lambda returning
    falseValue otherwise.

    >>> if BooleanFunctor(cond):
    ...  # only if cond is true
    ...  pass

shayelkin

# -*- coding: utf-8 -*-
# <nbformat>3.0</nbformat>

# <codecell>

from urllib2 import urlopen
import json

shayelkin

#!/usr/bin/env ruby

OUT_FILE = "#{ENV['HOME']}/Pictures/BingWallpaper.jpg"

require 'open-uri'

f = open('http://www.bing.com/HPImageArchive.aspx?format=xml&idx=1&n=1&mkt=en-US')
s = f.read
img_base = s.match('<urlBase>(.*)</urlBase>').captures[0]
img_url = 'http://www.bing.com/' + img_base + '_1920x1200.jpg'

shayelkin

#!/bin/sh
#
# Outputs $1 random lines from stdin.
# Sample usage: cat src_file | sort -R | head -n 100

sort -R | head -n $1

shayelkin

#!/usr/bin/env ruby
# -*- coding: utf-8 -*-
 
TENBIS_ID = 'xxx' # Get this value by inspecting the AJAX request 
NOTIFY_EXPIRE = '30000'


require 'open-uri'
require 'json'

shayelkin

#!/usr/bin/env ruby

def fizzbuzz(n)
  c = lambda {|i, s| ([nil] * i << s).cycle}
  # Must first zip with a finite range, else we'd get infinite loop
  Range.new(1, n).zip(c.call(2, 'Fizz'), c.call(4, 'Buzz')).map do |a,b,c|
    s = "#{b}#{c}"
    s.empty? ? a : s
  end
end

shayelkin

c i s = take i (repeat "") ++ [s]

fb = zipWith (++) (cycle (c 2 "Fizz")) (cycle (c 4 "Buzz"))

fizzbuzz = zipWith (\x y -> if null x then show y else x) fb [1..]

shayelkin

#!/usr/bin/env python

from itertools import cycle, izip

def lazy_fizzbuzz(n):
   	"""
	Returns iterator over fizzbuzz printout, starting at 1 and ending at n (inclusive)
	"""
	c = lambda i, s: cycle(([''] * i) + [s])
	fb = ('%s%s' % x for x in izip(c(2, 'Fizz'), c(4, 'Buzz')))