B: (6, 0, 0)
C: (6, 6, 0)
D: (0, 6, 0)
A = Intersect(yAxis, xAxis)
S: (3, 3, 4)
f = Segment(S, B)
g = Segment(S, C)
h = Segment(S, D)
i = Segment(S, A)
j = Segment(B, C)
k = Segment(C, D)
l = Segment(D, A)
m = Segment(A, B)
E: (6, 2, 0)
F: (6, 4, 0)
O: (0, 0, 0)
G: F + (1 / 2 * Vector[F, S])
H: E + (1 / 2 * Vector[E, S])
n = Segment(H, E)
p = Segment(H, G)
q = Segment(G, F)
EF = Distance(E, F)
a: abs(EF)
GH = Distance(G, H)
b: abs(GH)