S = (0, 0)
L = (0, 16.65)
O = (18.5, 0)
TERRAIN, o, s, l = Polygon(S, L, O)
A = Point(s)
a = OrthogonalLine(A, o)
b = OrthogonalLine(A, l)
I = Intersect(o, a)
M = Intersect(b, l)
TERRASSE, i, a_1, m, s_1 = Polygon(I, A, M, S)
d = Segment(S, M)