観測 047
クリオネ
Clione — Sea Angel
画かボタンを押すと、点が減ります。40,000 → 625 → 40 → 1 の次は、40,000に戻ります。
少数点では、点を大きくし、残像を長くして通り道を見やすくしています。
「聴く」は、表示中の点の配置を音へ写します。点数を変えると音を作り直します。
小さな翼が、ひらいて、戻る。
両わきが羽ばたくと、細い体が少し浮きます。
翼の先は、根元より遅れてついてきます。
頭の突起と尾は、また違う揺れ方をしています。
六百二十五点にすると、透けた体の向こうが見えてきます。
一点になっても、ひと打ちごとの道は残ります。
泳いでいると感じたのは、
翼でしょうか。その少しあとの、体でしょうか。
式を読む・確かめる
(i, t, p = i < 20000 ? 0 : i < 36000 ? 1 : 2, j = p === 0 ? i : p === 1 ? (i - 20000) % 8000 : (i - 36000) % 2000, e = p === 1 ? (i < 28000 ? -1 : 1) : (i <
38000 ? -1 : 1), s = j * .61803398875 % 1, b = (j * .75487766625 % 1) * TAU, v = sin(b), q = t * 1.5 + .35 * sin(t * 1.5), h = q - .75 * s, r = 33 * max(0,
sin(PI * s)) ** .65 * (1 - .58 * s), Q = p === 0 ? [r * cos(b) + 5 * s * s * sin(4 * s - q), 113 + 194 * s + r * sin(b) * .18] : p === 1 ? [e * (16 + 94 * s *
cos(.72 * sin(h))), 164 + 24 * s + 43 * s * sin(h) + 23 * max(0, sin(PI * s)) ** .7 * v] : [e * (12 + 8 * s + 3 * s * sin(q - .7)) + 4 * (1 - s) * cos(b), 133 -
35 * s + 3 * (1 - s) * sin(b)], dx = 200 + 14 * sin(t * .25 + .3) + 5 * sin(t * .5), dy = 200 + 11 * cos(t * .25) - 6 * sin(q) ) => [dx + Q[0] * .94, dy + (Q[1]
- 200) * .94]
この式の指紋
sha256:4095a9381dd8c37c4a5d1da9b61f8ecb659caca3e31679b2d837dcddc690315f
同じ点番号と時刻を渡すと、同じ座標が得られます。
残像や点の見え方は、描画設定と端末によって変わります。
上のボタンで式をそのまま持ち出せます。手元で数え直すなら:
pbpaste > f.txt && printf %s "$(cat f.txt)" | shasum -a 256
持ち帰って走らせてください。式を変えると、どんな姿になるでしょう。 この式を、その場で走らせて書き換える →