Lissajous figures
Author: Miguel Bayona

This applet was produced by Miguel Bayona at the Lawrenceville School

It is one of the applets available at 
http://mathplotter.lawrenceville.org

Used with permission

t = 0 (slider from 0 to 37.69911184307752, step 0.01)
C1 = (-3, 3)
C2 = (3, -3)
R1 = 2.5 (slider from 0 to 2.5, step 0.1)
R2 = 2.5 (slider from 0 to 2.5, step 0.1)
ρ = 0 (slider from -6.283185307179586 to 6.283185307179586, step 0.017453292519943295)
ω1 = 1 (slider from -10 to 10, step 0.01)
ω2 = 1 (slider from -10 to 10, step 0.01)
c = Circle(C1, R1)
d = Circle(C2, R2)
A: (-1.0 * 3.0 + R1 cos(ω1 t + ρ), 3.0 + R1 sin(ω1 t + ρ))
B: (3.0 + R2 cos(ω2 t), -1.0 * 3.0 + R2 sin(ω2 t))
a = Segment(A, (6.0, y(A)))
b = Segment(B, (x(B), 6.0))
P = Intersect(a, b)
e = CurveCartesian(3.0 + R2 cos(ω2 z), 3.0 + R1 sin(ω1 z + ρ), z, 0.0, t)
P1 = (0, 0)
P2 = (0, 6)
P3 = (6, 6)
P4 = (6, 0)
poly1, p1, p2, p3, p4 = Polygon(P1, P2, P3, P4)