let MS be OrtAfPl; for a, b, c, d being Element of
for K being Subset of st a,b _|_ K & c,d _|_ K holds
( a,b // c,d & a,b // d,c )
let a, b, c, d be Element of ; for K being Subset of st a,b _|_ K & c,d _|_ K holds
( a,b // c,d & a,b // d,c )
let K be Subset of ; ( a,b _|_ K & c,d _|_ K implies ( a,b // c,d & a,b // d,c ) )
assume that
A1:
a,b _|_ K
and
A2:
c,d _|_ K
; ( a,b // c,d & a,b // d,c )
reconsider K' = K as Subset of by ANALMETR:57;
K is being_line
by A1, ANALMETR:62;
then
K' is being_line
by ANALMETR:58;
then consider p', q' being Element of such that
A3:
( p' in K' & q' in K' )
and
A4:
p' <> q'
by AFF_1:31;
reconsider p = p', q = q' as Element of by ANALMETR:47;
( a,b _|_ p,q & c,d _|_ p,q )
by A1, A2, A3, ANALMETR:75;
hence
a,b // c,d
by A4, ANALMETR:85; a,b // d,c
hence
a,b // d,c
by ANALMETR:81; verum