A = Point(xAxis)
C = Point(xAxis)
a = OrthogonalLine(C, xAxis)
b = OrthogonalLine(A, xAxis)
B = Point(b)
D = Point(a)
c = Segment(B, C)
d = Segment(D, A)
e = Segment(D, C)
f = Segment(B, A)
E = Intersect(c, d)
g = Segment(A, C)
h = OrthogonalLine(E, g)
F = Intersect(h, g)
i = Segment(E, F)
text1: "" + (10 * g) + ""
text2: "" + (10 * f) + ""
text3: "" + (10 * e) + ""
text4: "" + (10 * i) + ""
K1 = Midpoint(f)
K3 = Midpoint(g)
K4 = Midpoint(i)
K2 = Midpoint(e)