Secant Chord Related Areas
Author: Scott Farrar

Points P, A and C are all drag-able.

PD * PA  = PE * PC

Show Area Rectangles

Rotate PD and PE

O = (5.319999999999999, 0.4399999999999997)
B = (6.92, 1.8799999999999997)
c = Circle(O, B)
P = (0.36, 0.66)
A = Point(c)
a = Segment(P, A)
C = Point(c)
b = Segment(P, C)
D = Intersect(c, a, 2)
E = Intersect(c, b, 2)
d = Segment(P, D)
e = Segment(P, E)
P' = Rotate(P, 90°, P)
D' = Rotate(D, 90°, P)
d' = Segment(P', D')
P'_1 = Rotate(P, 270°, P)
E' = Rotate(E, 270°, P)
e' = Segment(P'_1, E')
f = Line(E', b)
g = Line(D', a)
h = Line(C, e')
i = Line(A, d')
F = Intersect(g, i)
G = Intersect(f, h)
poly1, p, d'_1, f_1, a_1 = Polygon(P, D', F, A)
poly2, p_1, c_1, g_1, e'_1 = Polygon(P, C, G, E')
sqrootpoly1area: poly1^(1 / 2)
sqrootpoly2area: poly2^(1 / 2)
j = false
α = Angle(D, P, D')
β = Angle(E', P, E)
k = false