O = (2.686239595702785, 3.5501544503774785)
c = Circle(O, 3)
A = Point(c)
D = Point(c)
C = Point(c)
B = Point(c)
f = Segment(A, O)
g = Segment(O, D)
h = Segment(O, C)
i = Segment(O, B)
j = OrthogonalLine(A, f)
k = OrthogonalLine(D, g)
l = OrthogonalLine(C, h)
m = OrthogonalLine(B, i)
E = Intersect(l, m)
F = Intersect(l, k)
G = Intersect(k, j)
H = Intersect(j, m)
I = Intersect(c, m, 1)
n = Segment(E, F)
p = Segment(F, G)
q = Segment(G, H)
r = Segment(H, E)
kaugusEF = Distance(E, F)
kaugusFG = Distance(F, G)
TekstFG: Name[F] + (Name[G]) + " = " + kaugusFG
kaugusGH = Distance(G, H)
TekstGH: Name[G] + (Name[H]) + " = " + kaugusGH
kaugusHE = Distance(H, E)
TekstHE: Name[H] + (Name[E]) + " = " + kaugusHE
TekstEF: "" + (Name[E] + (Name[F])) + " = " + kaugusEF + ""