PostScriptとSchemeでコッホ雪片を書いた。 (define (Koch n) (if (= n 0) '(F L F L F) (fold-right (lambda (x y) (cond ((eq? x 'F) (append '(F R F L F R F) y)) (else (cons x y)))) '() (Koch (- n 1))))) こんな感じで再帰的にコッホ曲線を表現する…

平文テキストで拡張子をpsに変えるだけでpsファイルができるなんて知らなかったー。 PostScript Programing 入門 ここ見ればだいたい分かりそう。ネット上にあんまりPostScriptの詳しい情報がない。 http://www.adobe.com/devnet/postscript/pdfs/PLRM.pdf …