begin
definition
let X be ( ( ) ( )
set ) ;
end;
definition
let IT be ( ( non
empty ) ( non
empty )
CollStr ) ;
attr IT is
transitive means
for
a,
b,
p,
q,
r being ( ( ) ( )
Point of ( ( ) ( )
set ) ) st
a : ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) )
<> b : ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) ) &
[a : ( ( ) ( ) Point of ( ( ) ( non empty ) set ) ) ,b : ( ( ) ( ) Point of ( ( ) ( non empty ) set ) ) ,p : ( ( ) ( ) Point of ( ( ) ( non empty ) set ) ) ] : ( ( ) ( )
Element of
[: the carrier of IT : ( ( ) ( ) 2-sorted ) : ( ( ) ( ) set ) , the carrier of IT : ( ( ) ( ) 2-sorted ) : ( ( ) ( ) set ) , the carrier of IT : ( ( ) ( ) 2-sorted ) : ( ( ) ( ) set ) :] : ( ( ) ( )
set ) )
in the
Collinearity of
IT : ( ( ) ( )
2-sorted ) : ( ( ) ( )
Relation3 of the
carrier of
IT : ( ( ) ( )
2-sorted ) : ( ( ) ( )
set ) ) &
[a : ( ( ) ( ) Point of ( ( ) ( non empty ) set ) ) ,b : ( ( ) ( ) Point of ( ( ) ( non empty ) set ) ) ,q : ( ( ) ( ) Point of ( ( ) ( non empty ) set ) ) ] : ( ( ) ( )
Element of
[: the carrier of IT : ( ( ) ( ) 2-sorted ) : ( ( ) ( ) set ) , the carrier of IT : ( ( ) ( ) 2-sorted ) : ( ( ) ( ) set ) , the carrier of IT : ( ( ) ( ) 2-sorted ) : ( ( ) ( ) set ) :] : ( ( ) ( )
set ) )
in the
Collinearity of
IT : ( ( ) ( )
2-sorted ) : ( ( ) ( )
Relation3 of the
carrier of
IT : ( ( ) ( )
2-sorted ) : ( ( ) ( )
set ) ) &
[a : ( ( ) ( ) Point of ( ( ) ( non empty ) set ) ) ,b : ( ( ) ( ) Point of ( ( ) ( non empty ) set ) ) ,r : ( ( ) ( ) Point of ( ( ) ( non empty ) set ) ) ] : ( ( ) ( )
Element of
[: the carrier of IT : ( ( ) ( ) 2-sorted ) : ( ( ) ( ) set ) , the carrier of IT : ( ( ) ( ) 2-sorted ) : ( ( ) ( ) set ) , the carrier of IT : ( ( ) ( ) 2-sorted ) : ( ( ) ( ) set ) :] : ( ( ) ( )
set ) )
in the
Collinearity of
IT : ( ( ) ( )
2-sorted ) : ( ( ) ( )
Relation3 of the
carrier of
IT : ( ( ) ( )
2-sorted ) : ( ( ) ( )
set ) ) holds
[p : ( ( ) ( ) Point of ( ( ) ( non empty ) set ) ) ,q : ( ( ) ( ) Point of ( ( ) ( non empty ) set ) ) ,r : ( ( ) ( ) Point of ( ( ) ( non empty ) set ) ) ] : ( ( ) ( )
Element of
[: the carrier of IT : ( ( ) ( ) 2-sorted ) : ( ( ) ( ) set ) , the carrier of IT : ( ( ) ( ) 2-sorted ) : ( ( ) ( ) set ) , the carrier of IT : ( ( ) ( ) 2-sorted ) : ( ( ) ( ) set ) :] : ( ( ) ( )
set ) )
in the
Collinearity of
IT : ( ( ) ( )
2-sorted ) : ( ( ) ( )
Relation3 of the
carrier of
IT : ( ( ) ( )
2-sorted ) : ( ( ) ( )
set ) ) ;
end;
theorem
for
CLSP being ( ( non
empty reflexive transitive ) ( non
empty reflexive transitive )
CollSp)
for
a,
b,
p,
q,
r being ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) ) st
a : ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) )
<> b : ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) ) &
a : ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) ) ,
b : ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) ) ,
p : ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) )
is_collinear &
a : ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) ) ,
b : ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) ) ,
q : ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) )
is_collinear &
a : ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) ) ,
b : ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) ) ,
r : ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) )
is_collinear holds
p : ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) ) ,
q : ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) ) ,
r : ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) )
is_collinear ;
theorem
for
CLSP being ( ( non
empty reflexive transitive ) ( non
empty reflexive transitive )
CollSp)
for
p,
q,
a,
b,
r being ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) ) st
p : ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) )
<> q : ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) ) &
a : ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) ) ,
b : ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) ) ,
p : ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) )
is_collinear &
a : ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) ) ,
b : ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) ) ,
q : ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) )
is_collinear &
p : ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) ) ,
q : ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) ) ,
r : ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) )
is_collinear holds
a : ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) ) ,
b : ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) ) ,
r : ( ( ) ( )
Point of ( ( ) ( non
empty )
set ) )
is_collinear ;