Oceanic Stir -
BradN
'24 Mar 29
: x x 0.2 + ; : y y 0.2 + ; : t t 4 / ; t x + 9.1 * my 10 * + cos y / cos t y + 9.2 * cos x / cos t x y - + 9.3 * mx 10 * + cos x y + / cos 2dup z* push 2dup z* pop dup z+ + sin dup 1.3 * dup 1.3 *
▶
*
:
x
x
0.2
+
;
:
y
y
0.2
+
;
:
t
t
4
/
;
t
x
+
9.1
*
my
10
*
+
cos
y
/
cos
t
y
+
9.2
*
cos
x
/
cos
t
x
y
-
+
9.3
*
mx
10
*
+
cos
x
y
+
/
cos
2dup
z*
push
2dup
z*
pop
dup
z+
+
sin
dup
1.3
*
dup
1.3
*
Based on:
Oceanic
-
BradN
Create a derived work
Printer View