let X be AffinPlane; :: thesis: ( X is Desarguesian iff X is satisfying_Scherungssatz )
A1: ( X is satisfying_Scherungssatz implies X is Desarguesian )
proof
assume A2: X is satisfying_Scherungssatz ; :: thesis: X is Desarguesian
now
let Y, Z, M be Subset of X; :: thesis: for o, a, b, c, a1, b1, c1 being Element of X st o in Y & o in Z & o in M & o <> a & o <> b & o <> c & a in Y & a1 in Y & b in Z & b1 in Z & c in M & c1 in M & Y is being_line & Z is being_line & M is being_line & Y <> Z & Y <> M & a,b // a1,b1 & a,c // a1,c1 holds
b,c // b1,c1

let o, a, b, c, a1, b1, c1 be Element of X; :: thesis: ( o in Y & o in Z & o in M & o <> a & o <> b & o <> c & a in Y & a1 in Y & b in Z & b1 in Z & c in M & c1 in M & Y is being_line & Z is being_line & M is being_line & Y <> Z & Y <> M & a,b // a1,b1 & a,c // a1,c1 implies b,c // b1,c1 )
assume A3: ( o in Y & o in Z & o in M & o <> a & o <> b & o <> c & a in Y & a1 in Y & b in Z & b1 in Z & c in M & c1 in M & Y is being_line & Z is being_line & M is being_line & Y <> Z & Y <> M & a,b // a1,b1 & a,c // a1,c1 ) ; :: thesis: b,c // b1,c1
assume A4: not b,c // b1,c1 ; :: thesis: contradiction
A5: now
let Y, Z, M be Subset of X; :: thesis: for o, a, b, c, a1, b1, c1, d being Element of X st X is satisfying_Scherungssatz & o in Y & o in Z & o in M & o <> a & o <> b & o <> c & a in Y & a1 in Y & b in Z & b1 in Z & c in M & c1 in M & Y is being_line & Z is being_line & M is being_line & Y <> Z & Y <> M & a,b // a1,b1 & a,c // a1,c1 & LIN b,c,d & LIN b1,c1,d & not LIN a,a1,d holds
b,c // b1,c1

let o, a, b, c, a1, b1, c1, d be Element of X; :: thesis: ( X is satisfying_Scherungssatz & o in Y & o in Z & o in M & o <> a & o <> b & o <> c & a in Y & a1 in Y & b in Z & b1 in Z & c in M & c1 in M & Y is being_line & Z is being_line & M is being_line & Y <> Z & Y <> M & a,b // a1,b1 & a,c // a1,c1 & LIN b,c,d & LIN b1,c1,d & not LIN a,a1,d implies b,c // b1,c1 )
assume A6: X is satisfying_Scherungssatz ; :: thesis: ( o in Y & o in Z & o in M & o <> a & o <> b & o <> c & a in Y & a1 in Y & b in Z & b1 in Z & c in M & c1 in M & Y is being_line & Z is being_line & M is being_line & Y <> Z & Y <> M & a,b // a1,b1 & a,c // a1,c1 & LIN b,c,d & LIN b1,c1,d & not LIN a,a1,d implies b,c // b1,c1 )
assume A7: ( o in Y & o in Z & o in M & o <> a & o <> b & o <> c & a in Y & a1 in Y & b in Z & b1 in Z & c in M & c1 in M & Y is being_line & Z is being_line & M is being_line & Y <> Z & Y <> M & a,b // a1,b1 & a,c // a1,c1 & LIN b,c,d & LIN b1,c1,d ) ; :: thesis: ( LIN a,a1,d or b,c // b1,c1 )
( LIN a,a1,d or b,c // b1,c1 )
proof
assume A8: ( not LIN a,a1,d & not b,c // b1,c1 ) ; :: thesis: contradiction
A9: ( c <> c1 & a <> a1 & b <> b1 )
proof
assume A10: ( not c <> c1 or not a <> a1 or not b <> b1 ) ; :: thesis: contradiction
A11: now end;
A19: now end;
now end;
hence contradiction by A10, A11, A19; :: thesis: verum
end;
now
assume A33: b <> c ; :: thesis: contradiction
A34: now
assume A35: b1 = o ; :: thesis: contradiction
A36: o = a1
proof end;
o = c1 hence contradiction by A8, A35, AFF_1:12; :: thesis: verum
end;
now
assume A49: b1 <> o ; :: thesis: contradiction
A50: ( a <> b & a <> c ) A55: ( a1 <> b1 & a1 <> c1 )
proof end;
A66: ( b <> c & b1 <> c1 ) by A8, AFF_1:12;
LIN b,b,c by AFF_1:16;
then consider A being Subset of X such that
A67: ( A is being_line & b in A & b in A & c in A ) by AFF_1:33;
LIN b1,b1,c1 by AFF_1:16;
then consider K being Subset of X such that
A68: ( K is being_line & b1 in K & b1 in K & c1 in K ) by AFF_1:33;
LIN o,o,a by AFF_1:16;
then consider C being Subset of X such that
A69: ( C is being_line & o in C & o in C & a in C ) by AFF_1:33;
ex d1 being Element of X st
( d1 in C & c,c1 // d,d1 )
proof
consider e1 being Element of X such that
A70: ( o,a // o,e1 & o <> e1 ) by DIRAF:47;
consider e2 being Element of X such that
A71: ( c,c1 // d,e2 & d <> e2 ) by DIRAF:47;
not o,e1 // d,e2 then consider d1 being Element of X such that
A74: ( LIN o,e1,d1 & LIN d,e2,d1 ) by AFF_1:74;
take d1 ; :: thesis: ( d1 in C & c,c1 // d,d1 )
LIN o,a,e1 by A70, AFF_1:def 1;
then A75: e1 in C by A7, A69, AFF_1:39;
d,e2 // d,d1 by A74, AFF_1:def 1;
hence ( d1 in C & c,c1 // d,d1 ) by A69, A70, A71, A74, A75, AFF_1:14, AFF_1:39; :: thesis: verum
end;
then consider d1 being Element of X such that
A76: ( d1 in C & c,c1 // d,d1 ) ;
ex d2 being Element of X st
( d2 in C & a,c // d,d2 )
proof
consider e1 being Element of X such that
A77: ( o,a // o,e1 & o <> e1 ) by DIRAF:47;
consider e2 being Element of X such that
A78: ( a,c // d,e2 & d <> e2 ) by DIRAF:47;
not o,e1 // d,e2 then consider d2 being Element of X such that
A80: ( LIN o,e1,d2 & LIN d,e2,d2 ) by AFF_1:74;
take d2 ; :: thesis: ( d2 in C & a,c // d,d2 )
LIN o,a,e1 by A77, AFF_1:def 1;
then A81: e1 in C by A7, A69, AFF_1:39;
d,e2 // d,d2 by A80, AFF_1:def 1;
hence ( d2 in C & a,c // d,d2 ) by A69, A77, A78, A80, A81, AFF_1:14, AFF_1:39; :: thesis: verum
end;
then consider d2 being Element of X such that
A82: ( d2 in C & a,c // d,d2 ) ;
ex d3 being Element of X st
( d3 in A & o,b // d1,d3 )
proof
consider e1 being Element of X such that
A83: ( b,c // b,e1 & b <> e1 ) by DIRAF:47;
consider e2 being Element of X such that
A84: ( o,b // d1,e2 & d1 <> e2 ) by DIRAF:47;
not b,e1 // d1,e2 then consider d3 being Element of X such that
A89: ( LIN b,e1,d3 & LIN d1,e2,d3 ) by AFF_1:74;
take d3 ; :: thesis: ( d3 in A & o,b // d1,d3 )
LIN b,c,e1 by A83, AFF_1:def 1;
then A90: e1 in A by A66, A67, AFF_1:39;
d1,e2 // d1,d3 by A89, AFF_1:def 1;
hence ( d3 in A & o,b // d1,d3 ) by A67, A83, A84, A89, A90, AFF_1:14, AFF_1:39; :: thesis: verum
end;
then consider d3 being Element of X such that
A91: ( d3 in A & o,b // d1,d3 ) ;
ex d4 being Element of X st
( d4 in K & d1,d3 // d1,d4 )
proof
consider e1 being Element of X such that
A92: ( b1,c1 // b1,e1 & b1 <> e1 ) by DIRAF:47;
consider e2 being Element of X such that
A93: ( d1,d3 // d1,e2 & d1 <> e2 ) by DIRAF:47;
not b1,e1 // d1,e2
proof
assume b1,e1 // d1,e2 ; :: thesis: contradiction
then b1,c1 // d1,e2 by A92, AFF_1:14;
then A94: b1,c1 // d1,d3 by A93, AFF_1:14;
A95: d1 <> d3
proof end;
Z // Z by A7, AFF_1:55;
then A106: o,b // o,b1 by A7, AFF_1:53;
then o,b1 // d1,d3 by A7, A91, AFF_1:14;
then A107: o,b1 // b1,c1 by A94, A95, AFF_1:14;
then b1,o // b1,c1 by AFF_1:13;
then LIN b1,o,c1 by AFF_1:def 1;
then LIN o,b1,c1 by AFF_1:15;
then o,b1 // o,c1 by AFF_1:def 1;
then A108: o,b // o,c1 by A49, A106, AFF_1:14;
A109: o <> c1
proof end;
M // M by A7, AFF_1:55;
then o,c // o,c1 by A7, AFF_1:53;
then o,b // o,c by A108, A109, AFF_1:14;
then LIN o,b,c by AFF_1:def 1;
then LIN b,o,c by AFF_1:15;
then b,o // b,c by AFF_1:def 1;
then o,b // b,c by AFF_1:13;
then o,b1 // b,c by A7, A106, AFF_1:14;
hence contradiction by A8, A49, A107, AFF_1:14; :: thesis: verum
end;
then consider d4 being Element of X such that
A115: ( LIN b1,e1,d4 & LIN d1,e2,d4 ) by AFF_1:74;
take d4 ; :: thesis: ( d4 in K & d1,d3 // d1,d4 )
LIN b1,c1,e1 by A92, AFF_1:def 1;
then A116: e1 in K by A66, A68, AFF_1:39;
d1,e2 // d1,d4 by A115, AFF_1:def 1;
hence ( d4 in K & d1,d3 // d1,d4 ) by A68, A92, A93, A115, A116, AFF_1:14, AFF_1:39; :: thesis: verum
end;
then consider d4 being Element of X such that
A117: ( d4 in K & d1,d3 // d1,d4 ) ;
A118: ( c in A & b in A & d in A & d3 in A ) by A7, A33, A67, A91, AFF_1:39;
A119: ( not o in A & not a in A & not d1 in A & not d2 in A )
proof
assume A120: ( o in A or a in A or d1 in A or d2 in A ) ; :: thesis: contradiction
A126: now end;
hence contradiction by A120, A121, A126, A135; :: thesis: verum
end;
A147: ( not c in C & not b in C & not d in C & not d3 in C )
proof
assume A148: ( c in C or b in C or d in C or d3 in C ) ; :: thesis: contradiction
now end;
hence contradiction by A148, A149, A152, A155; :: thesis: verum
end;
A171: a,c // d2,d by A82, AFF_1:13;
c,o // d,d1
proof
M // M by A7, AFF_1:55;
then c,c1 // c,o by A7, AFF_1:53;
hence c,o // d,d1 by A9, A76, AFF_1:14; :: thesis: verum
end;
then A172: a,b // d2,d3 by A6, A67, A69, A76, A82, A91, A118, A119, A147, A171, Def3;
A173: ( o in C & a1 in C & d1 in C & d2 in C )
proof
a1 in C
proof
Y // Y by A7, AFF_1:55;
then o,a // o,a1 by A7, AFF_1:53;
then LIN o,a,a1 by AFF_1:def 1;
hence a1 in C by A7, A69, AFF_1:39; :: thesis: verum
end;
hence ( o in C & a1 in C & d1 in C & d2 in C ) by A69, A76, A82; :: thesis: verum
end;
A174: ( c1 in K & b1 in K & d in K & d4 in K )
proof
d in K
proof
b1 <> c1 by A8, AFF_1:12;
hence d in K by A7, A68, AFF_1:39; :: thesis: verum
end;
hence ( c1 in K & b1 in K & d in K & d4 in K ) by A68, A117; :: thesis: verum
end;
A175: ( not o in K & not a1 in K & not d1 in K & not d2 in K )
proof
assume A176: ( o in K or a1 in K or d1 in K or d2 in K ) ; :: thesis: contradiction
A177: now
assume A178: o in K ; :: thesis: contradiction
K // K by A68, AFF_1:55;
then A179: o,b1 // o,c1 by A68, A178, AFF_1:53;
then LIN o,b1,c1 by AFF_1:def 1;
then LIN b1,c1,o by AFF_1:15;
then A180: b1,c1 // b1,o by AFF_1:def 1;
Z // Z by A7, AFF_1:55;
then A181: o,b1 // o,b by A7, AFF_1:53;
then A182: o,b // o,c1 by A49, A179, AFF_1:14;
A183: o <> c1
proof
assume A184: o = c1 ; :: thesis: contradiction
A185: a1 <> o
proof end;
A191: not LIN c,a,o A193: LIN c,o,a1 Y // Y by A7, AFF_1:55;
then a,o // a,a1 by A7, AFF_1:53;
hence contradiction by A185, A191, A193, AFF_1:23; :: thesis: verum
end;
M // M by A7, AFF_1:55;
then o,c // o,c1 by A7, AFF_1:53;
then o,b // o,c by A182, A183, AFF_1:14;
then LIN o,b,c by AFF_1:def 1;
then LIN b,c,o by AFF_1:15;
then b,c // b,o by AFF_1:def 1;
then b,c // o,b by AFF_1:13;
then b,c // o,b1 by A7, A181, AFF_1:14;
then b,c // b1,o by AFF_1:13;
hence contradiction by A8, A49, A180, AFF_1:14; :: thesis: verum
end;
hence contradiction by A176, A177, A195, A199; :: thesis: verum
end;
A211: ( not c1 in C & not b1 in C & not d in C & not d4 in C )
proof
assume A212: ( c1 in C or b1 in C or d in C or d4 in C ) ; :: thesis: contradiction
hence contradiction by A147, A212, A213, A215; :: thesis: verum
end;
A218: a1,c1 // d2,d A221: c1,o // d,d1
proof
M // M by A7, AFF_1:55;
then c1,o // c,c1 by A7, AFF_1:53;
hence c1,o // d,d1 by A9, A76, AFF_1:14; :: thesis: verum
end;
o,b1 // d1,d4
proof
A222: o,b // o,b1 by A7, AFF_1:65;
o,b // d1,d4 by A76, A91, A117, A147, AFF_1:14;
hence o,b1 // d1,d4 by A7, A222, AFF_1:14; :: thesis: verum
end;
then A223: a1,b1 // d2,d4 by A6, A68, A69, A173, A174, A175, A211, A218, A221, Def3;
A224: d1 <> d2 A226: d4 <> d3
proof end;
d2,d3 // a1,b1 by A7, A50, A172, AFF_1:14;
then d2,d3 // d2,d4 by A55, A223, AFF_1:14;
then LIN d2,d3,d4 by AFF_1:def 1;
then LIN d4,d3,d2 by AFF_1:15;
then A237: d4,d3 // d4,d2 by AFF_1:def 1;
LIN d1,d3,d4 by A117, AFF_1:def 1;
then LIN d4,d3,d1 by AFF_1:15;
then d4,d3 // d4,d1 by AFF_1:def 1;
then A238: d4,d2 // d4,d1 by A226, A237, AFF_1:14;
not LIN d4,d2,d1
proof
assume LIN d4,d2,d1 ; :: thesis: contradiction
then LIN d1,d2,d4 by AFF_1:15;
hence contradiction by A69, A76, A82, A211, A224, AFF_1:39; :: thesis: verum
end;
hence contradiction by A238, AFF_1:def 1; :: thesis: verum
end;
hence contradiction by A34; :: thesis: verum
end;
hence contradiction by A8, AFF_1:12; :: thesis: verum
end;
hence ( LIN a,a1,d or b,c // b1,c1 ) ; :: thesis: verum
end;
A239: now
assume Z // M ; :: thesis: contradiction
then A240: ( b in M & b1 in M ) by A3, AFF_1:59;
M // M by A3, AFF_1:55;
hence contradiction by A3, A4, A240, AFF_1:53; :: thesis: verum
end;
now
assume A241: not Z // M ; :: thesis: contradiction
A242: ( Y // Y & Z // Z & M // M ) by A3, AFF_1:55;
A243: ( not a in Z & not a in M ) A248: ( a <> a1 & b <> b1 & c <> c1 )
proof
assume A249: ( not a <> a1 or not b <> b1 or not c <> c1 ) ; :: thesis: contradiction
A250: now end;
hence contradiction by A249, A250, A257; :: thesis: verum
end;
A264: ( a1 <> o & b1 <> o & c1 <> o )
proof
assume A265: ( not a1 <> o or not b1 <> o or not c1 <> o ) ; :: thesis: contradiction
A266: now
assume A267: a1 = o ; :: thesis: contradiction
A268: o = b1 o = c1 hence contradiction by A4, A268, AFF_1:12; :: thesis: verum
end;
hence contradiction by A265, A266, A277; :: thesis: verum
end;
consider d being Element of X such that
A286: ( LIN b,c,d & LIN b1,c1,d ) by A4, AFF_1:74;
A287: LIN a,a1,d by A2, A3, A4, A5, A286;
ex d1 being Element of X st
( a,b // d,d1 & d1 in Z )
proof
consider e1 being Element of X such that
A288: ( o,b // o,e1 & o <> e1 ) by DIRAF:47;
consider e2 being Element of X such that
A289: ( a,b // d,e2 & d <> e2 ) by DIRAF:47;
not o,e1 // d,e2 then consider d1 being Element of X such that
A290: ( LIN o,e1,d1 & LIN d,e2,d1 ) by AFF_1:74;
take d1 ; :: thesis: ( a,b // d,d1 & d1 in Z )
o,e1 // o,d1 by A290, AFF_1:def 1;
then o,b // o,d1 by A288, AFF_1:14;
then A291: LIN o,b,d1 by AFF_1:def 1;
d,e2 // d,d1 by A290, AFF_1:def 1;
hence ( a,b // d,d1 & d1 in Z ) by A3, A289, A291, AFF_1:14, AFF_1:39; :: thesis: verum
end;
then consider d1 being Element of X such that
A292: ( a,b // d,d1 & d1 in Z ) ;
ex d2 being Element of X st
( a,c // d,d2 & d2 in M )
proof
consider e1 being Element of X such that
A293: ( o,c // o,e1 & o <> e1 ) by DIRAF:47;
consider e2 being Element of X such that
A294: ( a,c // d,e2 & d <> e2 ) by DIRAF:47;
not o,e1 // d,e2 then consider d2 being Element of X such that
A295: ( LIN o,e1,d2 & LIN d,e2,d2 ) by AFF_1:74;
take d2 ; :: thesis: ( a,c // d,d2 & d2 in M )
o,e1 // o,d2 by A295, AFF_1:def 1;
then o,c // o,d2 by A293, AFF_1:14;
then A296: LIN o,c,d2 by AFF_1:def 1;
d,e2 // d,d2 by A295, AFF_1:def 1;
hence ( a,c // d,d2 & d2 in M ) by A3, A294, A296, AFF_1:14, AFF_1:39; :: thesis: verum
end;
then consider d2 being Element of X such that
A297: ( a,c // d,d2 & d2 in M ) ;
A298: d1 <> d2
proof end;
A305: now
assume A306: b1,c1 // d1,d2 ; :: thesis: contradiction
ex d5 being Element of X st
( LIN b,c,d5 & LIN d1,d2,d5 )
proof
consider e1 being Element of X such that
A307: ( b,c // b,e1 & b <> e1 ) by DIRAF:47;
consider e2 being Element of X such that
A308: ( d1,d2 // d1,e2 & d1 <> e2 ) by DIRAF:47;
not b,e1 // d1,e2
proof
assume b,e1 // d1,e2 ; :: thesis: contradiction
then b,e1 // d1,d2 by A308, AFF_1:14;
then b,c // d1,d2 by A307, AFF_1:14;
hence contradiction by A4, A298, A306, AFF_1:14; :: thesis: verum
end;
then consider d5 being Element of X such that
A309: ( LIN b,e1,d5 & LIN d1,e2,d5 ) by AFF_1:74;
take d5 ; :: thesis: ( LIN b,c,d5 & LIN d1,d2,d5 )
( d1,e2 // d1,d5 & b,e1 // b,d5 ) by A309, AFF_1:def 1;
then ( d1,d2 // d1,d5 & b,c // b,d5 ) by A307, A308, AFF_1:14;
hence ( LIN b,c,d5 & LIN d1,d2,d5 ) by AFF_1:def 1; :: thesis: verum
end;
then consider d5 being Element of X such that
A310: ( LIN b,c,d5 & LIN d1,d2,d5 ) ;
A311: d in Y by A3, A248, A287, AFF_1:39;
A312: now
assume A313: LIN a,d,d5 ; :: thesis: contradiction
A314: not LIN a,b,d
proof end;
b,d // b,d5 then LIN d1,d2,d by A310, A313, A314, AFF_1:23;
then LIN d,d1,d2 by AFF_1:15;
then A323: d,d1 // d,d2 by AFF_1:def 1;
A324: o <> d A329: d <> d1 A331: d <> d2 a,b // d,d2 by A292, A323, A329, AFF_1:14;
then A333: a,b // a,c by A297, A331, AFF_1:14;
then a1,b1 // a,c by A3, A243, AFF_1:14;
then a1,b1 // a1,c1 by A3, A243, AFF_1:14;
then LIN a1,b1,c1 by AFF_1:def 1;
then LIN b1,c1,a1 by AFF_1:15;
then b1,c1 // b1,a1 by AFF_1:def 1;
then A334: b1,c1 // a1,b1 by AFF_1:13;
A335: a1 <> b1 LIN a,b,c by A333, AFF_1:def 1;
then LIN b,c,a by AFF_1:15;
then b,c // b,a by AFF_1:def 1;
then b,c // a,b by AFF_1:13;
then b,c // a1,b1 by A3, A243, AFF_1:14;
hence contradiction by A4, A334, A335, AFF_1:14; :: thesis: verum
end;
not b,c // d1,d2 by A4, A298, A306, AFF_1:14;
hence contradiction by A2, A3, A5, A292, A297, A310, A311, A312; :: thesis: verum
end;
now
assume A337: not b1,c1 // d1,d2 ; :: thesis: contradiction
then consider d5 being Element of X such that
A338: ( LIN b1,c1,d5 & LIN d1,d2,d5 ) by AFF_1:74;
A339: d in Y by A3, A248, A287, AFF_1:39;
A340: a1,b1 // d,d1 by A3, A243, A292, AFF_1:14;
a1,c1 // d,d2 by A3, A243, A297, AFF_1:14;
then A341: LIN a1,d,d5 by A2, A3, A5, A264, A292, A297, A337, A338, A339, A340;
A342: not LIN a1,b1,d
proof end;
b1,d // b1,d5 then d = d5 by A341, A342, AFF_1:23;
then LIN d,d1,d2 by A338, AFF_1:15;
then A351: d,d1 // d,d2 by AFF_1:def 1;
A352: d <> o A357: d <> d1 A359: d <> d2 a,b // d,d2 by A292, A351, A357, AFF_1:14;
then A361: a,b // a,c by A297, A359, AFF_1:14;
A362: a1 <> b1 a1,b1 // a,c by A3, A243, A361, AFF_1:14;
then a1,b1 // a1,c1 by A3, A243, AFF_1:14;
then LIN a1,b1,c1 by AFF_1:def 1;
then LIN b1,c1,a1 by AFF_1:15;
then b1,c1 // b1,a1 by AFF_1:def 1;
then A364: b1,c1 // a1,b1 by AFF_1:13;
LIN a,b,c by A361, AFF_1:def 1;
then LIN b,c,a by AFF_1:15;
then b,c // b,a by AFF_1:def 1;
then b,c // a,b by AFF_1:13;
then b,c // a1,b1 by A3, A243, AFF_1:14;
hence contradiction by A4, A362, A364, AFF_1:14; :: thesis: verum
end;
hence contradiction by A305; :: thesis: verum
end;
hence contradiction by A239; :: thesis: verum
end;
hence X is Desarguesian by AFF_2:def 4; :: thesis: verum
end;
( X is Desarguesian implies X is satisfying_Scherungssatz )
proof end;
hence ( X is Desarguesian iff X is satisfying_Scherungssatz ) by A1; :: thesis: verum