A = Point(a)
B = Point(a)
C = Point(yAxis)
D = Point(a)
c = CircumcircleArc(B, C, D)
FLYTmig = Point(c)
b = OrthogonalLine(FLYTmig, a)
e = OrthogonalLine(FLYTmig, d)
F = Intersect(c, e, 2)
f = OrthogonalLine(F, a)
G = Intersect(a, b)
H = Intersect(a, f)
ArealFirkant, h, Højde, Længde, f_1 = Polygon(H, G, FLYTmig, F)