観測 032
蛇
Hebi — Snake
画かボタンを押すと、点が減ります。40,000 → 625 → 40 → 1 の次は、40,000に戻ります。
少数点では、点を大きくし、残像を長くして通り道を見やすくしています。
「聴く」は、表示中の点の配置を音へ写します。点数を変えると音を作り直します。
胴は地の面に伏せています。
決めてあるのは形ではなく、断片ごとの向きです。向きは波になっていて、位置はその波を足し上げた結果です。
波は頭で立ち、時刻をずらしながら尾へ抜けます。同じ曲がりが体を通り過ぎていきます。
振れ幅は一定ではありません。首と頭では小さく、尾へ行くほど大きくなります。
だから頭はほとんど据わったまま、尾だけが大きく払います。
胴は四百八十の輪でできています。輪は横向きの法線と上向きの副法線に、同じ半径で張ってあります。
だから体がどちらを向いても、平たい帯にならず、丸い管のまま立ちます。
輪の半径は尾で細く、胴の半ばで太く、首でまた絞られます。頭はその首より広く、はっきり分かれます。
舌は短いあいだだけ出ます。出ていないあいだ、その六百点は頭の中に畳まれています。
点を減らすと、まず輪の太さが消えて、巻きの筋だけが残ります。
次に筋も切れ、最後は一つの点の通り道になります。
その一本が動いているあいだは蛇に見え、止めればただの線になります。
式を読む・確かめる
(i, t,
b = i < 33600, hd = i < 39400, S = b ? (i / 70 | 0) / 479 : 1,
A = S * 12 + t * .5, B2 = S * 4.5 + t * .25, V = S * 7 + t * .5, EV = .3 + .7 * (1 - S),
P1 = 62 * cos(A) + 40 * cos(B2), P2 = 744 * sin(A) + 180 * sin(B2),
Tx = 300, Tz = .7 * P1 + EV * P2, Ty = 63 * cos(V),
Cx = 300 * S - 150, Cz = -EV * P1, Cy = 9 * sin(V),
Th = max(.01, hypot(Tx, Tz)), TL = max(.01, hypot(Th, Ty)), G = Th * TL,
R = .5 + 9.2 * max(0, min(1, S)) ** .5 * (1 - .55 * max(0, min(1, S)) ** 8),
a = (i % 70) / 70 * TAU, e = (i * .618034 % 1) * 2 - 1, g = i * 2.39996,
rr = sqrt(max(0, 1 - e * e)), z = i % 2 ? 1 : -1, p = (i - 39400) / 599,
fl = max(0, sin(t * .5)) ** 9, fk = max(0, (p - .55) / .45),
lt = b ? 0 : hd ? 15 + 23 * e : 36 + 28 * fl * p,
ln = b ? R * cos(a) : hd ? (16 - 7 * e) * rr * cos(g) : z * 4.4 * fk * fl,
lb = b ? R * sin(a) : hd ? (8.6 - 3.7 * e) * rr * sin(g) + 1.6 : 1.8 - 2.4 * p * fl,
X = Cx + lt * Tx / TL - ln * Tz / Th - lb * Tx * Ty / G, Y = Cy + lt * Ty / TL + lb * Th / TL,
Z = Cz + lt * Tz / TL + ln * Tx / Th - lb * Ty * Tz / G,
Dx = 200 + 12 * sin(t * .25 + 1.9), Dy = 200 + 9 * cos(t * .25 + 4.1) + 4 * sin(t * .75 + 2)
) => [Dx + (X + .18 * Y) * .86, Dy + (Z * .84 - .5 * Y) * .86]
この式の指紋
sha256:77aa41591568b9403d70d804e6c9ac0a85b14a0e769fef2341d8024ab54f7566
同じ点番号と時刻を渡すと、同じ座標が得られます。
残像や点の見え方は、描画設定と端末によって変わります。
上のボタンで式をそのまま持ち出せます。手元で数え直すなら:
pbpaste > f.txt && printf %s "$(cat f.txt)" | shasum -a 256
持ち帰って走らせてください。式を変えると、どんな姿になるでしょう。 この式を、その場で走らせて書き換える →