emanon001 emanon001

インストール

デーモンとして登録

	// ==UserScript==
	// @name Sponichi image easy access
	// @namespace https://github.com/emanon001/
	// @description スポニチの画像表示用Flash をクリックすると、実際の画像リンクを開く
	// @include http://www.sponichi.co.jp//gazo/.html

	// ==/UserScript==

	(function () {
	"use strict";

	on run
	tell application "System Events"

	set processName to "OSCulator"
	if not (application process processName exists) then
	return
	end if
	set p to application process processName

	set windowName to "OSCulator"

	// ==UserScript==
	// @name Github WIP pull request
	// @namespace https://github.com/emanon001/
	// @description Github での WIP pull request 運用を便利にするあれこれ
	// @include https://github.com//pull/
	// @require http://ajax.googleapis.com/ajax/libs/jquery/1.9.1/jquery.min.js
	// ==/UserScript==

	this.$ = this.jQuery = jQuery.noConflict(true);

	;;;; http://npnl.hatenablog.jp/entry/20110812/1313138407

	(ns twenty-five-minutes-programming.drop-starts-same
	(:use [clojure.test :only [are]]))


	(defn drop-starts-same
	[& args]
	(if (some empty? args)
	args

	#!/bin/bash

	REPOS="$1"
	REV="$2"
	UUID=$(svnlook uuid $REPOS)

	# 適宜設定
	JENKINS_HOME=http://localhost:8080

	svnlook changed --revision $REV $REPOS \| /usr/bin/curl \

	;;; Project Euler Problem 20
	;;; 「100! の各桁の数字の和を求めよ」
	;;; http://odz.sakura.ne.jp/projecteuler/index.php?cmd=read&page=Problem%2020

	(ns emanon001.projecteuler-answers.problem-020
	(:require [clojure.test :refer [are]]))

	(defn factorial
	"n の階乗を返します"
	[n]

	;;; Project Euler Problem 13
	;;; 「50桁の数字100個の和の上位10桁を求めよ」
	;;; http://odz.sakura.ne.jp/projecteuler/index.php?cmd=read&page=Problem%2013

	(ns projecteuler-answers.problem-013
	(:require [clojure.math.numeric-tower :as math]
	[clojure.test :refer [are]]))

	(def nums
	[37107287533902102798797998220837590246510135740250