Simple 2D Vector Field
Script Setup version 1
Fx(x, y) = x
Fy(x, y) = y
L = Sequence(k, k, -3, 3, 1)
LP = Flatten( Zip( Zip( (a, b), a, L ), b, L ) )
s = 0.5
VF = Zip( Translate( s * (Fx(P), Fy(P)), P ), P, LP )
Video: https://youtu.be/QB0p8qjL_xU
Script Setup version 2
Fx(x, y) = x
Fy(x, y) = y
L = Sequence(k, k, -3, 3, 1)
LP = Flatten( Zip( Zip( (a, b), a, L ), b, L ) )
s = 0.5
LQ = Zip((s * Fx(P), s * Fy(P)), P, LP)
VF = Zip(Vector(P, P + Q), P, LP, Q, LQ)
If you like my work, you can support me in Patreon:
https://www.patreon.com/jcponce