Quesito esame
Author: Ubaldo Pernigo  - www.ubimath.org

A = Point(yAxis)
c = Circle(A, 8)
a, d, b = Cylinder(c, 36)
e, f, g = Cone(d, 6)
B = Point(f)
h = Segment(A, B)
C = Center(d)
D = PointIn(g)
poli1, b_1, c_1, d_1 = Polygon(C, D, B)
i = Segment(C, B)
j = Segment(A, C)
k = Line(D, j)
E = Intersect(k, b)
l = Line(A, b_1)
F = Intersect(k, l)
poli2, b_2, a_1, f_1, d_2 = Polygon(B, A, F, D)