SchemeとRubyで図形言語を学ぼう

「計算機プログラムの構造と解釈」を読んでいる
2.2.4章に高階手続きを使った図形言語のサンプルが出てくる
何度か読み返しコードを実行しRuby版も一応できたけど
高階手続きの使い方に自分の思考がついていけない

とりあえずRuby版をShoesで描画できるようにしたので
サンプルコードを公開しておきます