Teorema de Pappus
Elementos dados:
dos rectas, a, b, tres puntos A, A', A'' sobre a y tres puntos B, B', B'' sobre b.
Elementos construidos a partir de los elementos dados:
C = Intersección[Recta[A', B''], Recta[B', A'']]
C' = Intersección[Recta[A, B''], Recta[B, A'']]
C'' = Intersección[Recta[A, B'], Recta[B, A']]