Golf

LL Golf Hole 4

doukaku.org 正規表現使わずに、CLとxyzzyで動くよう解いてみる。 (defun llgolf4 (f) (flet ((p (c) (or (alpha-char-p c) (digit-char-p c)))) (with-open-file (s f) (do ((h (make-hash-table :test #'equal)) (r 0 (1+ r)) (l "" (read-line s nil))) (…

LLGolf Hole 3

doukaku.orgxyzzyでも動くよう、ごく普通に。 ;xyzzy用 ;(defmacro nth-value (n form) ; `(nth ,n (multiple-value-list ,form))) (do*((m 1 (1+ (mod m 12))) (y 2008 (+ y (if (= 1 m) 1 0))) (u 0 (encode-universal-time 0 0 0 13 m y)) (c 0)) ((< 201…

LLFuture

定員1000人なら、ただのミーハーがちょっとくらい紛れ込んでも大丈夫かと思って少し前にチケット買っちゃったんだけど、去年のプログラムを見直したり大物ゲストの発表とか見ると不安になってくる。まあでも折角なので空気読まずに行ってみよう。とりあえず …

Grassでecho

アナゴル2問目のecho wWWWWWwWWWwWWWwwwエラー吐いて終わってもOKならこれでいいんだけど。 ちゃんと書くと wwWWWwwWWwwv wwWWwWWWwv wwWWwWWWwWWWWwv wWWwwwWwwwwwwwWwwwwwwwwwWWWWWWWWWWWwWwwWwWwwwwwwwwwwWwwwwWwwwwwwwww長い。