Grundseite g

Höhe anzeigen

Ziehe hier, um das 
größere Dreieck zu drehen

Ziehe hier, um das 
kleinste Dreieck zu drehen

A = (0, 0)
B = (4, 0)
C = (3, 4)
poly1, c_1, a, b = Polygon(A, B, C)
D = Midpoint(b)
E = Midpoint(a)
d = OrthogonalLine(D, c_1)
e = OrthogonalLine(E, c_1)
F = Intersect(c_1, d)
G = Intersect(c_1, e)
H = (6, 0)
I = Point(Circle[H, Distance[F, G]])
f = Segment(H, I)
M_b = (6, 2)
M_a = (8, 2)
g_1 = Circle(M_b, Distance[D, C])
h_3 = Circle(M_a, Distance[E, C])
L, M = Intersect(g_1, h_3)
poly2, h_1, i, k, l, j = Polygon(H, I, M_a, L, M_b)
P = Point(Circle[I, Distance[G, B]])
m = Segment(I, P)
Q = (8, 2)
poly3, k_1, i_1, p = Polygon(I, P, M_a)
n = Ray(L, M_b)
q = Ray(I, H)
R = Intersect(q, n)
poly4, j_1, r, h_2 = Polygon(R, H, M_b)
α = 0 rad (slider from 0 to 3.141592653589793, step 0.017453292519943295)
β = 0 rad (slider from 0 to 3.141592653589793, step 0.017453292519943295)
R' = Rotate(R, -α, M_b)
H' = Rotate(H, -α, M_b)
J' = Rotate(M_b, -α, M_b)
poly4', s, r', h' = Polygon(R', H', J')
I' = Rotate(I, β, M_a)
P' = Rotate(P, β, M_a)
K' = Rotate(M_a, β, M_a)
poly3', t, i', p' = Polygon(I', P', K')
a1 = OrthogonalLine(L, f)
S = Intersect(a1, f)
h = Segment(L, S)
γ = Angle(I, S, L)
o = false
g = Segment(R, P)
O = Point(j_1)
c = Segment(R, O)
T = Point(k_1)
b1 = Segment(I, T)