Four bar variations 2
Author: Chris Sangwin
Date: 27 December 2006

Here is a rather intriguing motion from a four-bar mechanism.  Move the point B, and look at the midpoint of the bar BC.

y1 = 0
x1 = -2
y4 = 0
x4 = 2
r1 = 5
r2 = 6
r5 = 3
A: (x1, y1)
D: (x4, y4)
c = Circle(A, r1)
d = Circle(D, r1)
B = Point(c)
e = Circle(B, r2)
C = Intersect(d, e, 2)
a = Segment(A, B)
f = Segment(C, D)
b = Segment(C, B)
g = 3
h = Circle(B, g)
i = 3
k = Circle(C, i)
E = Intersect(h, b)
loc1 = Locus(E, B)