Skip to content

Instantly share code, notes, and snippets.

View tnoda's full-sized avatar

Takahiro Noda tnoda

View GitHub Profile
@tnoda
tnoda / imsmanifest.xml
Created February 16, 2011 15:12
A patch to fix the minor technical error in test case CO-03 of SCORM Test Suite (SCORM 2004 4th Edicion, v.1.1.1)
<?xml version = "1.0" standalone = "no"?>
<manifest identifier = "LMSTestPackage_CO-03" version = "1.1.1"
xmlns = "http://www.imsglobal.org/xsd/imscp_v1p1"
xmlns:adlcp = "http://www.adlnet.org/xsd/adlcp_v1p3"
xmlns:adlseq = "http://www.adlnet.org/xsd/adlseq_v1p3"
xmlns:adlnav = "http://www.adlnet.org/xsd/adlnav_v1p3"
xmlns:imsss = "http://www.imsglobal.org/xsd/imsss"
xmlns:xsi = "http://www.w3.org/2001/XMLSchema-instance"
xsi:schemaLocation = "http://www.imsglobal.org/xsd/imscp_v1p1 imscp_v1p1.xsd
http://www.adlnet.org/xsd/adlcp_v1p3 adlcp_v1p3.xsd
@tnoda
tnoda / sense-region.el
Last active June 24, 2021 19:58
sense-region.el
;;; sense-region.el --- minor mode to toggle region and rectangle.
;;; $Id: sense-region.el,v 1.9 2002/10/16 13:47:14 komatsu Exp $
;;;
;;; AUTHOR: Hiroyuki KOMATSU <komatsu@taiyaki.org>
;;; LICENSE: GPL2
;;; ORIGINAL-SOURCE: http://www.taiyaki.org/elisp/sense-region/ (in Japanese)
;;; Version: 1.9.0
;;;
;;; ------------------------------------------------------------
@tnoda
tnoda / cmigemo.rb
Created February 14, 2012 06:25
A homebrew formula for cmigemo on Mac OS X 10.6.8
require 'formula'
class Cmigemo < Formula
url 'http://cmigemo.googlecode.com/files/cmigemo-default-src-20110227.zip'
homepage 'http://www.kaoriya.net/software/cmigemo'
sha1 '25e279c56d3a8f1e82cbfb3526d1b38742d1d66c'
depends_on 'nkf'
def patches
@tnoda
tnoda / imsmanifest.xml
Created March 10, 2012 05:33
ADL SCORM 2004 4th Edition MBCE
<?xml version = "1.0" standalone = "no"?>
<manifest identifier = "LMSTestPackage_T-01b" version = "1.0"
xmlns = "http://www.imsglobal.org/xsd/imscp_v1p1"
xmlns:adlcp = "http://www.adlnet.org/xsd/adlcp_v1p3"
xmlns:adlseq = "http://www.adlnet.org/xsd/adlseq_v1p3"
xmlns:adlnav = "http://www.adlnet.org/xsd/adlnav_v1p3"
xmlns:imsss = "http://www.imsglobal.org/xsd/imsss"
xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
xsi:schemaLocation = "http://www.imsglobal.org/xsd/imscp_v1p1 imscp_v1p1.xsd
http://www.adlnet.org/xsd/adlcp_v1p3 adlcp_v1p3.xsd
@tnoda
tnoda / imsmanifest.xml
Created March 12, 2012 06:44
ADL SCORM 2004 4th Edition SECE
<?xml version = "1.0" standalone = "no"?>
<manifest identifier = "LMSTestPackage_T-01b" version = "1.0"
xmlns = "http://www.imsglobal.org/xsd/imscp_v1p1"
xmlns:adlcp = "http://www.adlnet.org/xsd/adlcp_v1p3"
xmlns:adlseq = "http://www.adlnet.org/xsd/adlseq_v1p3"
xmlns:adlnav = "http://www.adlnet.org/xsd/adlnav_v1p3"
xmlns:imsss = "http://www.imsglobal.org/xsd/imsss"
xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
xsi:schemaLocation = "http://www.imsglobal.org/xsd/imscp_v1p1 imscp_v1p1.xsd
http://www.adlnet.org/xsd/adlcp_v1p3 adlcp_v1p3.xsd
@tnoda
tnoda / imsmanifest.xml
Created March 14, 2012 05:29
ADL SCORM 2004 4th Edition MSCE (Competency Assessment)
<?xml version = "1.0" standalone = "no"?>
<manifest identifier = "LMSTestPackage_RU-12b" version = "1.0"
xmlns = "http://www.imsglobal.org/xsd/imscp_v1p1"
xmlns:adlcp = "http://www.adlnet.org/xsd/adlcp_v1p3"
xmlns:adlseq = "http://www.adlnet.org/xsd/adlseq_v1p3"
xmlns:adlnav = "http://www.adlnet.org/xsd/adlnav_v1p3"
xmlns:imsss = "http://www.imsglobal.org/xsd/imsss"
xmlns:xsi = "http://www.w3.org/2001/XMLSchema-instance"
xsi:schemaLocation = "http://www.imsglobal.org/xsd/imscp_v1p1 imscp_v1p1.xsd
http://www.adlnet.org/xsd/adlcp_v1p3 adlcp_v1p3.xsd
@tnoda
tnoda / cljdoc.el
Created April 9, 2012 01:57 — forked from tavisrudd/cljdoc.el
cljdoc.el --- eldoc mode for clojure
;;; cljdoc.el --- eldoc mode for clojure
;; Copyright (C) 2011 tomykaira
;; Version 0.1.0
;; Keywords: eldoc clojure
;; Author: tomykaira <tomykaira@gmail.com>
;; URL: https://gist.github.com/1386472
;; This file is not part of GNU Emacs.
@tnoda
tnoda / core.clj
Created May 17, 2012 08:15
Inverse Fizzbuzz solver in Clojure
;; Question: Inverse FizzBuzz (Clojure version) - Given a collection
;; whose elements are one of :fizz, :buzz, and :fizzbuzz, what's the
;; shortest contiguous sequence of numbers that produces that list when
;; you run fizzbuzz ?
;;
;; Originally introduced at:
;; http://www.jasq.org/2/post/2012/05/inverse-fizzbuzz.html
(ns tnoda.inverse-fizzbuzz.core
(:use [clojure.test :only [deftest are]]))
@tnoda
tnoda / core.clj
Created June 9, 2012 08:05
learn-you-a-haskell.geometry
(ns learn-you-a-haskell.geometry.core
(:require (learn-you-a-haskell.geometry [sphere :as sphere]
[cuboid :as cuboid]
[cube :as cube])))
(defn -main
"I don't do a whole lot."
[& args]
(print (sphere/volume 10)))
@tnoda
tnoda / naive-primes.clj
Created July 1, 2012 14:51
Sieve of Eratosthenes in Clojure
(defn prime? [n]
(every? #(pos? (rem n %)) (range 2 (Math/sqrt (inc n)))))
(defn naive-primes [n]
(filter prime? (range 2 (inc n))))