Educated Monkey, der rechnende Affe
Author: Prof. Dr. Dörte Haftendorn

Nachgebaut nach dem Original aus Metall

Educated Monkey

Ha 08

a = 4
w = 30
B = Point(xAxis)
b: sqrt(3) a
f = Circle(B, b)
A = Point(xAxis)
e = Circle(A, b)
D, E_1 = Intersect(e, f)
E = Rotate(B, w °, D)
d = LineBisector(A, B)
g = Circle(D, a)
l = Segment(D, A)
m = Segment(D, B)
T1: "" + (x(A) x(B))
C = (11.526075790318243, 1.1519201532317935)
n = Line(D, E)
I, J = Intersect(g, n)
c = Circle(J, a)
F, G = Intersect(c, d)
h = Mirror(n, n)
K = Mirror(J, d)
poly1, d_1, j, f_1, k = Polygon(D, J, F, K)
α = Angle(B, D, E)
T4: "A = " + (x(A))
T5: "B = " + (x(B))