:: WAYBEL27 semantic presentation

begin

definition
let F be ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) ;
attr F is uncurrying means :: WAYBEL27:def 1
( ( for x being ( ( ) ( ) set ) st x : ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) in dom F : ( ( ) ( ) TopRelStr ) : ( ( ) ( ) set ) holds
x : ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) is ( ( Relation-like Function-like Function-yielding ) ( Relation-like Function-like Function-yielding V33() ) Function) ) & ( for f being ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) st f : ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) in dom F : ( ( ) ( ) TopRelStr ) : ( ( ) ( ) set ) holds
F : ( ( ) ( ) TopRelStr ) . f : ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) : ( ( ) ( ) set ) = uncurry f : ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) : ( ( Relation-like Function-like ) ( Relation-like Function-like ) set ) ) );
attr F is currying means :: WAYBEL27:def 2
( ( for x being ( ( ) ( ) set ) st x : ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) in dom F : ( ( ) ( ) TopRelStr ) : ( ( ) ( ) set ) holds
( x : ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) is ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) & proj1 x : ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) : ( ( ) ( ) set ) is ( ( Relation-like ) ( Relation-like ) Relation) ) ) & ( for f being ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) st f : ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) in dom F : ( ( ) ( ) TopRelStr ) : ( ( ) ( ) set ) holds
F : ( ( ) ( ) TopRelStr ) . f : ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) : ( ( ) ( ) set ) = curry f : ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) : ( ( Relation-like Function-like ) ( Relation-like Function-like ) set ) ) );
attr F is commuting means :: WAYBEL27:def 3
( ( for x being ( ( ) ( ) set ) st x : ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) in dom F : ( ( ) ( ) TopRelStr ) : ( ( ) ( ) set ) holds
x : ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) is ( ( Relation-like Function-like Function-yielding ) ( Relation-like Function-like Function-yielding V33() ) Function) ) & ( for f being ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) st f : ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) in dom F : ( ( ) ( ) TopRelStr ) : ( ( ) ( ) set ) holds
F : ( ( ) ( ) TopRelStr ) . f : ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) : ( ( ) ( ) set ) = commute f : ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) : ( ( Relation-like Function-like Function-yielding ) ( Relation-like Function-like Function-yielding V33() ) set ) ) );
end;

registration
cluster empty Relation-like Function-like -> Relation-like Function-like uncurrying currying commuting for ( ( ) ( ) set ) ;
end;

registration
cluster Relation-like Function-like uncurrying currying commuting for ( ( ) ( ) set ) ;
end;

registration
let F be ( ( Relation-like Function-like uncurrying ) ( Relation-like Function-like uncurrying ) Function) ;
let X be ( ( ) ( ) set ) ;
cluster F : ( ( Relation-like Function-like uncurrying ) ( Relation-like Function-like uncurrying ) set ) | X : ( ( ) ( ) set ) : ( ( Relation-like ) ( Relation-like Function-like ) set ) -> Relation-like uncurrying ;
end;

registration
let F be ( ( Relation-like Function-like currying ) ( Relation-like Function-like currying ) Function) ;
let X be ( ( ) ( ) set ) ;
cluster F : ( ( Relation-like Function-like currying ) ( Relation-like Function-like currying ) set ) | X : ( ( ) ( ) set ) : ( ( Relation-like ) ( Relation-like Function-like ) set ) -> Relation-like currying ;
end;

theorem :: WAYBEL27:1
for X, Y, Z, D being ( ( ) ( ) set ) st D : ( ( ) ( ) set ) c= Funcs (X : ( ( ) ( ) set ) ,(Funcs (Y : ( ( ) ( ) set ) ,Z : ( ( ) ( ) set ) )) : ( ( ) ( functional ) set ) ) : ( ( ) ( functional ) set ) holds
ex F being ( ( Relation-like b4 : ( ( ) ( ) set ) -defined Function-like V27(b4 : ( ( ) ( ) set ) ) ) ( Relation-like b4 : ( ( ) ( ) set ) -defined Function-like V27(b4 : ( ( ) ( ) set ) ) ) ManySortedSet of D : ( ( ) ( ) set ) ) st
( F : ( ( Relation-like b4 : ( ( ) ( ) set ) -defined Function-like V27(b4 : ( ( ) ( ) set ) ) ) ( Relation-like b4 : ( ( ) ( ) set ) -defined Function-like V27(b4 : ( ( ) ( ) set ) ) ) ManySortedSet of b4 : ( ( ) ( ) set ) ) is uncurrying & rng F : ( ( Relation-like b4 : ( ( ) ( ) set ) -defined Function-like V27(b4 : ( ( ) ( ) set ) ) ) ( Relation-like b4 : ( ( ) ( ) set ) -defined Function-like V27(b4 : ( ( ) ( ) set ) ) ) ManySortedSet of b4 : ( ( ) ( ) set ) ) : ( ( ) ( ) set ) c= Funcs ([:X : ( ( ) ( ) set ) ,Y : ( ( ) ( ) set ) :] : ( ( ) ( Relation-like ) set ) ,Z : ( ( ) ( ) set ) ) : ( ( ) ( functional ) set ) ) ;

theorem :: WAYBEL27:2
for X, Y, Z, D being ( ( ) ( ) set ) st D : ( ( ) ( ) set ) c= Funcs ([:X : ( ( ) ( ) set ) ,Y : ( ( ) ( ) set ) :] : ( ( ) ( Relation-like ) set ) ,Z : ( ( ) ( ) set ) ) : ( ( ) ( functional ) set ) holds
ex F being ( ( Relation-like b4 : ( ( ) ( ) set ) -defined Function-like V27(b4 : ( ( ) ( ) set ) ) ) ( Relation-like b4 : ( ( ) ( ) set ) -defined Function-like V27(b4 : ( ( ) ( ) set ) ) ) ManySortedSet of D : ( ( ) ( ) set ) ) st
( F : ( ( Relation-like b4 : ( ( ) ( ) set ) -defined Function-like V27(b4 : ( ( ) ( ) set ) ) ) ( Relation-like b4 : ( ( ) ( ) set ) -defined Function-like V27(b4 : ( ( ) ( ) set ) ) ) ManySortedSet of b4 : ( ( ) ( ) set ) ) is currying & ( ( Y : ( ( ) ( ) set ) = {} : ( ( ) ( empty Relation-like non-empty empty-yielding Function-like one-to-one constant functional Function-yielding V33() uncurrying currying commuting ) set ) implies X : ( ( ) ( ) set ) = {} : ( ( ) ( empty Relation-like non-empty empty-yielding Function-like one-to-one constant functional Function-yielding V33() uncurrying currying commuting ) set ) ) implies rng F : ( ( Relation-like b4 : ( ( ) ( ) set ) -defined Function-like V27(b4 : ( ( ) ( ) set ) ) ) ( Relation-like b4 : ( ( ) ( ) set ) -defined Function-like V27(b4 : ( ( ) ( ) set ) ) ) ManySortedSet of b4 : ( ( ) ( ) set ) ) : ( ( ) ( ) set ) c= Funcs (X : ( ( ) ( ) set ) ,(Funcs (Y : ( ( ) ( ) set ) ,Z : ( ( ) ( ) set ) )) : ( ( ) ( functional ) set ) ) : ( ( ) ( functional ) set ) ) ) ;

registration
let X, Y, Z be ( ( ) ( ) set ) ;
cluster Relation-like Funcs (X : ( ( ) ( ) set ) ,(Funcs (Y : ( ( ) ( ) set ) ,Z : ( ( ) ( ) set ) )) : ( ( ) ( functional ) set ) ) : ( ( ) ( functional ) set ) -defined Function-like V27( Funcs (X : ( ( ) ( ) set ) ,(Funcs (Y : ( ( ) ( ) set ) ,Z : ( ( ) ( ) set ) )) : ( ( ) ( functional ) set ) ) : ( ( ) ( functional ) set ) ) uncurrying for ( ( ) ( ) set ) ;
cluster Relation-like Funcs ([:X : ( ( ) ( ) set ) ,Y : ( ( ) ( ) set ) :] : ( ( ) ( Relation-like ) set ) ,Z : ( ( ) ( ) set ) ) : ( ( ) ( functional ) set ) -defined Function-like V27( Funcs ([:X : ( ( ) ( ) set ) ,Y : ( ( ) ( ) set ) :] : ( ( ) ( Relation-like ) set ) ,Z : ( ( ) ( ) set ) ) : ( ( ) ( functional ) set ) ) currying for ( ( ) ( ) set ) ;
end;

theorem :: WAYBEL27:3
for A, B being ( ( non empty ) ( non empty ) set )
for C being ( ( ) ( ) set )
for f, g being ( ( Relation-like Function-like commuting ) ( Relation-like Function-like commuting ) Function) st dom f : ( ( Relation-like Function-like commuting ) ( Relation-like Function-like commuting ) Function) : ( ( ) ( ) set ) c= Funcs (A : ( ( non empty ) ( non empty ) set ) ,(Funcs (B : ( ( non empty ) ( non empty ) set ) ,C : ( ( ) ( ) set ) )) : ( ( ) ( functional ) set ) ) : ( ( ) ( functional ) set ) & rng f : ( ( Relation-like Function-like commuting ) ( Relation-like Function-like commuting ) Function) : ( ( ) ( ) set ) c= dom g : ( ( Relation-like Function-like commuting ) ( Relation-like Function-like commuting ) Function) : ( ( ) ( ) set ) holds
g : ( ( Relation-like Function-like commuting ) ( Relation-like Function-like commuting ) Function) * f : ( ( Relation-like Function-like commuting ) ( Relation-like Function-like commuting ) Function) : ( ( Relation-like ) ( Relation-like Function-like ) set ) = id (dom f : ( ( Relation-like Function-like commuting ) ( Relation-like Function-like commuting ) Function) ) : ( ( ) ( ) set ) : ( ( V27( dom b4 : ( ( Relation-like Function-like commuting ) ( Relation-like Function-like commuting ) Function) : ( ( ) ( ) set ) ) ) ( Relation-like dom b4 : ( ( Relation-like Function-like commuting ) ( Relation-like Function-like commuting ) Function) : ( ( ) ( ) set ) -defined dom b4 : ( ( Relation-like Function-like commuting ) ( Relation-like Function-like commuting ) Function) : ( ( ) ( ) set ) -valued Function-like one-to-one V19() V21() V22() V26() V27( dom b4 : ( ( Relation-like Function-like commuting ) ( Relation-like Function-like commuting ) Function) : ( ( ) ( ) set ) ) quasi_total onto bijective ) Element of bool [:(dom b4 : ( ( Relation-like Function-like commuting ) ( Relation-like Function-like commuting ) Function) ) : ( ( ) ( ) set ) ,(dom b4 : ( ( Relation-like Function-like commuting ) ( Relation-like Function-like commuting ) Function) ) : ( ( ) ( ) set ) :] : ( ( ) ( Relation-like ) set ) : ( ( ) ( non empty ) set ) ) ;

theorem :: WAYBEL27:4
for B being ( ( non empty ) ( non empty ) set )
for A, C being ( ( ) ( ) set )
for f being ( ( Relation-like Function-like uncurrying ) ( Relation-like Function-like uncurrying ) Function)
for g being ( ( Relation-like Function-like currying ) ( Relation-like Function-like currying ) Function) st dom f : ( ( Relation-like Function-like uncurrying ) ( Relation-like Function-like uncurrying ) Function) : ( ( ) ( ) set ) c= Funcs (A : ( ( ) ( ) set ) ,(Funcs (B : ( ( non empty ) ( non empty ) set ) ,C : ( ( ) ( ) set ) )) : ( ( ) ( functional ) set ) ) : ( ( ) ( functional ) set ) & rng f : ( ( Relation-like Function-like uncurrying ) ( Relation-like Function-like uncurrying ) Function) : ( ( ) ( ) set ) c= dom g : ( ( Relation-like Function-like currying ) ( Relation-like Function-like currying ) Function) : ( ( ) ( ) set ) holds
g : ( ( Relation-like Function-like currying ) ( Relation-like Function-like currying ) Function) * f : ( ( Relation-like Function-like uncurrying ) ( Relation-like Function-like uncurrying ) Function) : ( ( Relation-like ) ( Relation-like Function-like ) set ) = id (dom f : ( ( Relation-like Function-like uncurrying ) ( Relation-like Function-like uncurrying ) Function) ) : ( ( ) ( ) set ) : ( ( V27( dom b4 : ( ( Relation-like Function-like uncurrying ) ( Relation-like Function-like uncurrying ) Function) : ( ( ) ( ) set ) ) ) ( Relation-like dom b4 : ( ( Relation-like Function-like uncurrying ) ( Relation-like Function-like uncurrying ) Function) : ( ( ) ( ) set ) -defined dom b4 : ( ( Relation-like Function-like uncurrying ) ( Relation-like Function-like uncurrying ) Function) : ( ( ) ( ) set ) -valued Function-like one-to-one V19() V21() V22() V26() V27( dom b4 : ( ( Relation-like Function-like uncurrying ) ( Relation-like Function-like uncurrying ) Function) : ( ( ) ( ) set ) ) quasi_total onto bijective ) Element of bool [:(dom b4 : ( ( Relation-like Function-like uncurrying ) ( Relation-like Function-like uncurrying ) Function) ) : ( ( ) ( ) set ) ,(dom b4 : ( ( Relation-like Function-like uncurrying ) ( Relation-like Function-like uncurrying ) Function) ) : ( ( ) ( ) set ) :] : ( ( ) ( Relation-like ) set ) : ( ( ) ( non empty ) set ) ) ;

theorem :: WAYBEL27:5
for A, B, C being ( ( ) ( ) set )
for f being ( ( Relation-like Function-like currying ) ( Relation-like Function-like currying ) Function)
for g being ( ( Relation-like Function-like uncurrying ) ( Relation-like Function-like uncurrying ) Function) st dom f : ( ( Relation-like Function-like currying ) ( Relation-like Function-like currying ) Function) : ( ( ) ( ) set ) c= Funcs ([:A : ( ( ) ( ) set ) ,B : ( ( ) ( ) set ) :] : ( ( ) ( Relation-like ) set ) ,C : ( ( ) ( ) set ) ) : ( ( ) ( functional ) set ) & rng f : ( ( Relation-like Function-like currying ) ( Relation-like Function-like currying ) Function) : ( ( ) ( ) set ) c= dom g : ( ( Relation-like Function-like uncurrying ) ( Relation-like Function-like uncurrying ) Function) : ( ( ) ( ) set ) holds
g : ( ( Relation-like Function-like uncurrying ) ( Relation-like Function-like uncurrying ) Function) * f : ( ( Relation-like Function-like currying ) ( Relation-like Function-like currying ) Function) : ( ( Relation-like ) ( Relation-like Function-like ) set ) = id (dom f : ( ( Relation-like Function-like currying ) ( Relation-like Function-like currying ) Function) ) : ( ( ) ( ) set ) : ( ( V27( dom b4 : ( ( Relation-like Function-like currying ) ( Relation-like Function-like currying ) Function) : ( ( ) ( ) set ) ) ) ( Relation-like dom b4 : ( ( Relation-like Function-like currying ) ( Relation-like Function-like currying ) Function) : ( ( ) ( ) set ) -defined dom b4 : ( ( Relation-like Function-like currying ) ( Relation-like Function-like currying ) Function) : ( ( ) ( ) set ) -valued Function-like one-to-one V19() V21() V22() V26() V27( dom b4 : ( ( Relation-like Function-like currying ) ( Relation-like Function-like currying ) Function) : ( ( ) ( ) set ) ) quasi_total onto bijective ) Element of bool [:(dom b4 : ( ( Relation-like Function-like currying ) ( Relation-like Function-like currying ) Function) ) : ( ( ) ( ) set ) ,(dom b4 : ( ( Relation-like Function-like currying ) ( Relation-like Function-like currying ) Function) ) : ( ( ) ( ) set ) :] : ( ( ) ( Relation-like ) set ) : ( ( ) ( non empty ) set ) ) ;

theorem :: WAYBEL27:6
for f being ( ( Relation-like Function-like Function-yielding ) ( Relation-like Function-like Function-yielding V33() ) Function)
for i, A being ( ( ) ( ) set ) st i : ( ( ) ( ) set ) in dom (commute f : ( ( Relation-like Function-like Function-yielding ) ( Relation-like Function-like Function-yielding V33() ) Function) ) : ( ( Relation-like Function-like Function-yielding ) ( Relation-like Function-like Function-yielding V33() ) set ) : ( ( ) ( ) set ) holds
((commute f : ( ( Relation-like Function-like Function-yielding ) ( Relation-like Function-like Function-yielding V33() ) Function) ) : ( ( Relation-like Function-like Function-yielding ) ( Relation-like Function-like Function-yielding V33() ) set ) . i : ( ( ) ( ) set ) ) : ( ( ) ( Relation-like Function-like ) set ) .: A : ( ( ) ( ) set ) : ( ( ) ( ) set ) c= pi ((f : ( ( Relation-like Function-like Function-yielding ) ( Relation-like Function-like Function-yielding V33() ) Function) .: A : ( ( ) ( ) set ) ) : ( ( ) ( ) set ) ,i : ( ( ) ( ) set ) ) : ( ( ) ( ) set ) ;

theorem :: WAYBEL27:7
for f being ( ( Relation-like Function-like Function-yielding ) ( Relation-like Function-like Function-yielding V33() ) Function)
for i, A being ( ( ) ( ) set ) st ( for g being ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) st g : ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) in f : ( ( Relation-like Function-like Function-yielding ) ( Relation-like Function-like Function-yielding V33() ) Function) .: A : ( ( ) ( ) set ) : ( ( ) ( ) set ) holds
i : ( ( ) ( ) set ) in dom g : ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) : ( ( ) ( ) set ) ) holds
pi ((f : ( ( Relation-like Function-like Function-yielding ) ( Relation-like Function-like Function-yielding V33() ) Function) .: A : ( ( ) ( ) set ) ) : ( ( ) ( ) set ) ,i : ( ( ) ( ) set ) ) : ( ( ) ( ) set ) c= ((commute f : ( ( Relation-like Function-like Function-yielding ) ( Relation-like Function-like Function-yielding V33() ) Function) ) : ( ( Relation-like Function-like Function-yielding ) ( Relation-like Function-like Function-yielding V33() ) set ) . i : ( ( ) ( ) set ) ) : ( ( ) ( Relation-like Function-like ) set ) .: A : ( ( ) ( ) set ) : ( ( ) ( ) set ) ;

theorem :: WAYBEL27:8
for X, Y being ( ( ) ( ) set )
for f being ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) st rng f : ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) : ( ( ) ( ) set ) c= Funcs (X : ( ( ) ( ) set ) ,Y : ( ( ) ( ) set ) ) : ( ( ) ( functional ) set ) holds
for i, A being ( ( ) ( ) set ) st i : ( ( ) ( ) set ) in X : ( ( ) ( ) set ) holds
((commute f : ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) ) : ( ( Relation-like Function-like Function-yielding ) ( Relation-like Function-like Function-yielding V33() ) set ) . i : ( ( ) ( ) set ) ) : ( ( ) ( Relation-like Function-like ) set ) .: A : ( ( ) ( ) set ) : ( ( ) ( ) set ) = pi ((f : ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) .: A : ( ( ) ( ) set ) ) : ( ( ) ( ) set ) ,i : ( ( ) ( ) set ) ) : ( ( ) ( ) set ) ;

theorem :: WAYBEL27:9
for f being ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function)
for i, A being ( ( ) ( ) set ) st [:A : ( ( ) ( ) set ) ,{i : ( ( ) ( ) set ) } : ( ( ) ( non empty ) set ) :] : ( ( ) ( Relation-like ) set ) c= dom f : ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) : ( ( ) ( ) set ) holds
pi (((curry f : ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) ) : ( ( Relation-like Function-like ) ( Relation-like Function-like ) set ) .: A : ( ( ) ( ) set ) ) : ( ( ) ( ) set ) ,i : ( ( ) ( ) set ) ) : ( ( ) ( ) set ) = f : ( ( Relation-like Function-like ) ( Relation-like Function-like ) Function) .: [:A : ( ( ) ( ) set ) ,{i : ( ( ) ( ) set ) } : ( ( ) ( non empty ) set ) :] : ( ( ) ( Relation-like ) set ) : ( ( ) ( ) set ) ;

registration
let T be ( ( constituted-Functions ) ( constituted-Functions ) 1-sorted ) ;
cluster the carrier of T : ( ( constituted-Functions ) ( constituted-Functions ) 1-sorted ) : ( ( ) ( ) set ) -> functional ;
end;

registration
cluster non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete non void for ( ( ) ( ) RelStr ) ;
cluster non empty constituted-Functions for ( ( ) ( ) 1-sorted ) ;
end;

registration
let T be ( ( non empty constituted-Functions ) ( non empty constituted-Functions ) RelStr ) ;
cluster non empty -> non empty constituted-Functions for ( ( ) ( ) SubRelStr of T : ( ( ) ( ) set ) ) ;
end;

theorem :: WAYBEL27:10
for S, T being ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE)
for f being ( ( Function-like quasi_total idempotent ) ( non empty Relation-like the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -defined the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) quasi_total idempotent ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) )
for h being ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -defined the carrier of (Image b3 : ( ( Function-like quasi_total idempotent ) ( non empty Relation-like the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -defined the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) quasi_total idempotent ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) ) : ( ( strict full ) ( non empty strict reflexive transitive antisymmetric full non void ) SubRelStr of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) quasi_total ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) holds f : ( ( Function-like quasi_total idempotent ) ( non empty Relation-like the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -defined the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) quasi_total idempotent ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) * h : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -defined the carrier of (Image b3 : ( ( Function-like quasi_total idempotent ) ( non empty Relation-like the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -defined the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) quasi_total idempotent ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) ) : ( ( strict full ) ( non empty strict reflexive transitive antisymmetric full non void ) SubRelStr of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) quasi_total ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) : ( ( Function-like ) ( Relation-like the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -defined the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -valued Function-like ) Element of bool [: the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) , the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) :] : ( ( ) ( non empty Relation-like ) set ) : ( ( ) ( non empty ) set ) ) = h : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -defined the carrier of (Image b3 : ( ( Function-like quasi_total idempotent ) ( non empty Relation-like the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -defined the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) quasi_total idempotent ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) ) : ( ( strict full ) ( non empty strict reflexive transitive antisymmetric full non void ) SubRelStr of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) quasi_total ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) ;

theorem :: WAYBEL27:11
for S, T, T1 being ( ( non empty ) ( non empty ) RelStr ) st T : ( ( non empty ) ( non empty ) RelStr ) is ( ( ) ( ) SubRelStr of T1 : ( ( non empty ) ( non empty ) RelStr ) ) holds
for f being ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b1 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of b2 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b1 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) ) quasi_total ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) )
for f1 being ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b1 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of b3 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b1 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) ) quasi_total ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) st f : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b1 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of b2 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b1 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) ) quasi_total ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) is monotone & f : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b1 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of b2 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b1 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) ) quasi_total ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) = f1 : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b1 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of b3 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b1 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) ) quasi_total ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) holds
f1 : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b1 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of b3 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b1 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) ) quasi_total ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) is monotone ;

theorem :: WAYBEL27:12
for S, T, T1 being ( ( non empty ) ( non empty ) RelStr ) st T : ( ( non empty ) ( non empty ) RelStr ) is ( ( full ) ( full ) SubRelStr of T1 : ( ( non empty ) ( non empty ) RelStr ) ) holds
for f being ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b1 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of b2 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b1 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) ) quasi_total ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) )
for f1 being ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b1 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of b3 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b1 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) ) quasi_total ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) st f1 : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b1 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of b3 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b1 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) ) quasi_total ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) is monotone & f : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b1 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of b2 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b1 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) ) quasi_total ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) = f1 : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b1 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of b3 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b1 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) ) quasi_total ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) holds
f : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b1 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of b2 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b1 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) ) quasi_total ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) is monotone ;

theorem :: WAYBEL27:13
for X being ( ( ) ( ) set )
for V being ( ( ) ( ) Subset of ( ( ) ( non empty ) set ) ) holds
( (chi (V : ( ( ) ( ) Subset of ( ( ) ( non empty ) set ) ) ,X : ( ( ) ( ) set ) )) : ( ( Function-like quasi_total ) ( Relation-like b1 : ( ( ) ( ) set ) -defined {{} : ( ( ) ( empty Relation-like non-empty empty-yielding Function-like one-to-one constant functional Function-yielding V33() uncurrying currying commuting ) set ) ,1 : ( ( ) ( non empty ) set ) } : ( ( ) ( non empty ) set ) -valued Function-like V27(b1 : ( ( ) ( ) set ) ) quasi_total ) Element of bool [:b1 : ( ( ) ( ) set ) ,{{} : ( ( ) ( empty Relation-like non-empty empty-yielding Function-like one-to-one constant functional Function-yielding V33() uncurrying currying commuting ) set ) ,1 : ( ( ) ( non empty ) set ) } : ( ( ) ( non empty ) set ) :] : ( ( ) ( Relation-like ) set ) : ( ( ) ( non empty ) set ) ) " {1 : ( ( ) ( non empty ) set ) } : ( ( ) ( non empty ) set ) : ( ( ) ( ) Element of bool b1 : ( ( ) ( ) set ) : ( ( ) ( non empty ) set ) ) = V : ( ( ) ( ) Subset of ( ( ) ( non empty ) set ) ) & (chi (V : ( ( ) ( ) Subset of ( ( ) ( non empty ) set ) ) ,X : ( ( ) ( ) set ) )) : ( ( Function-like quasi_total ) ( Relation-like b1 : ( ( ) ( ) set ) -defined {{} : ( ( ) ( empty Relation-like non-empty empty-yielding Function-like one-to-one constant functional Function-yielding V33() uncurrying currying commuting ) set ) ,1 : ( ( ) ( non empty ) set ) } : ( ( ) ( non empty ) set ) -valued Function-like V27(b1 : ( ( ) ( ) set ) ) quasi_total ) Element of bool [:b1 : ( ( ) ( ) set ) ,{{} : ( ( ) ( empty Relation-like non-empty empty-yielding Function-like one-to-one constant functional Function-yielding V33() uncurrying currying commuting ) set ) ,1 : ( ( ) ( non empty ) set ) } : ( ( ) ( non empty ) set ) :] : ( ( ) ( Relation-like ) set ) : ( ( ) ( non empty ) set ) ) " {0 : ( ( ) ( empty Relation-like non-empty empty-yielding Function-like one-to-one constant functional Function-yielding V33() uncurrying currying commuting ) Element of K181() : ( ( ) ( ) Element of bool K177() : ( ( ) ( ) set ) : ( ( ) ( non empty ) set ) ) ) } : ( ( ) ( non empty functional ) set ) : ( ( ) ( ) Element of bool b1 : ( ( ) ( ) set ) : ( ( ) ( non empty ) set ) ) = X : ( ( ) ( ) set ) \ V : ( ( ) ( ) Subset of ( ( ) ( non empty ) set ) ) : ( ( ) ( ) Element of bool b1 : ( ( ) ( ) set ) : ( ( ) ( non empty ) set ) ) ) ;

begin

definition
let X be ( ( non empty ) ( non empty ) set ) ;
let T be ( ( non empty ) ( non empty ) RelStr ) ;
let f be ( ( ) ( Relation-like Function-like ) Element of ( ( ) ( non empty functional ) set ) ) ;
let x be ( ( ) ( ) Element of X : ( ( non empty ) ( non empty ) set ) ) ;
:: original: .
redefine func f . x -> ( ( ) ( ) Element of ( ( ) ( ) set ) ) ;
end;

theorem :: WAYBEL27:14
for X being ( ( non empty ) ( non empty ) set )
for T being ( ( non empty ) ( non empty ) RelStr )
for f, g being ( ( ) ( Relation-like Function-like ) Element of ( ( ) ( non empty functional ) set ) ) holds
( f : ( ( ) ( Relation-like Function-like ) Element of ( ( ) ( non empty functional ) set ) ) <= g : ( ( ) ( Relation-like Function-like ) Element of ( ( ) ( non empty functional ) set ) ) iff for x being ( ( ) ( ) Element of X : ( ( non empty ) ( non empty ) set ) ) holds f : ( ( ) ( Relation-like Function-like ) Element of ( ( ) ( non empty functional ) set ) ) . x : ( ( ) ( ) Element of b1 : ( ( non empty ) ( non empty ) set ) ) : ( ( ) ( ) Element of ( ( ) ( non empty ) set ) ) <= g : ( ( ) ( Relation-like Function-like ) Element of ( ( ) ( non empty functional ) set ) ) . x : ( ( ) ( ) Element of b1 : ( ( non empty ) ( non empty ) set ) ) : ( ( ) ( ) Element of ( ( ) ( non empty ) set ) ) ) ;

theorem :: WAYBEL27:15
for X being ( ( ) ( ) set )
for L, S being ( ( non empty ) ( non empty ) RelStr ) st RelStr(# the carrier of L : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) , the InternalRel of L : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( Relation-like the carrier of b2 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of b2 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -valued ) Element of bool [: the carrier of b2 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) , the carrier of b2 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) :] : ( ( ) ( non empty Relation-like ) set ) : ( ( ) ( non empty ) set ) ) #) : ( ( strict ) ( non empty strict ) RelStr ) = RelStr(# the carrier of S : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) , the InternalRel of S : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( Relation-like the carrier of b3 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of b3 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -valued ) Element of bool [: the carrier of b3 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) , the carrier of b3 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) :] : ( ( ) ( non empty Relation-like ) set ) : ( ( ) ( non empty ) set ) ) #) : ( ( strict ) ( non empty strict ) RelStr ) holds
L : ( ( non empty ) ( non empty ) RelStr ) |^ X : ( ( ) ( ) set ) : ( ( strict ) ( non empty constituted-Functions strict ) RelStr ) = S : ( ( non empty ) ( non empty ) RelStr ) |^ X : ( ( ) ( ) set ) : ( ( strict ) ( non empty constituted-Functions strict ) RelStr ) ;

theorem :: WAYBEL27:16
for S1, S2, T1, T2 being ( ( non empty TopSpace-like ) ( non empty TopSpace-like ) TopSpace) st TopStruct(# the carrier of S1 : ( ( non empty TopSpace-like ) ( non empty TopSpace-like ) TopSpace) : ( ( ) ( non empty ) set ) , the topology of S1 : ( ( non empty TopSpace-like ) ( non empty TopSpace-like ) TopSpace) : ( ( ) ( ) Element of bool (bool the carrier of b1 : ( ( non empty TopSpace-like ) ( non empty TopSpace-like ) TopSpace) : ( ( ) ( non empty ) set ) ) : ( ( ) ( non empty ) set ) : ( ( ) ( non empty ) set ) ) #) : ( ( strict ) ( strict ) TopStruct ) = TopStruct(# the carrier of S2 : ( ( non empty TopSpace-like ) ( non empty TopSpace-like ) TopSpace) : ( ( ) ( non empty ) set ) , the topology of S2 : ( ( non empty TopSpace-like ) ( non empty TopSpace-like ) TopSpace) : ( ( ) ( ) Element of bool (bool the carrier of b2 : ( ( non empty TopSpace-like ) ( non empty TopSpace-like ) TopSpace) : ( ( ) ( non empty ) set ) ) : ( ( ) ( non empty ) set ) : ( ( ) ( non empty ) set ) ) #) : ( ( strict ) ( strict ) TopStruct ) & TopStruct(# the carrier of T1 : ( ( non empty TopSpace-like ) ( non empty TopSpace-like ) TopSpace) : ( ( ) ( non empty ) set ) , the topology of T1 : ( ( non empty TopSpace-like ) ( non empty TopSpace-like ) TopSpace) : ( ( ) ( ) Element of bool (bool the carrier of b3 : ( ( non empty TopSpace-like ) ( non empty TopSpace-like ) TopSpace) : ( ( ) ( non empty ) set ) ) : ( ( ) ( non empty ) set ) : ( ( ) ( non empty ) set ) ) #) : ( ( strict ) ( strict ) TopStruct ) = TopStruct(# the carrier of T2 : ( ( non empty TopSpace-like ) ( non empty TopSpace-like ) TopSpace) : ( ( ) ( non empty ) set ) , the topology of T2 : ( ( non empty TopSpace-like ) ( non empty TopSpace-like ) TopSpace) : ( ( ) ( ) Element of bool (bool the carrier of b4 : ( ( non empty TopSpace-like ) ( non empty TopSpace-like ) TopSpace) : ( ( ) ( non empty ) set ) ) : ( ( ) ( non empty ) set ) : ( ( ) ( non empty ) set ) ) #) : ( ( strict ) ( strict ) TopStruct ) holds
oContMaps (S1 : ( ( non empty TopSpace-like ) ( non empty TopSpace-like ) TopSpace) ,T1 : ( ( non empty TopSpace-like ) ( non empty TopSpace-like ) TopSpace) ) : ( ( non empty strict ) ( non empty strict ) RelStr ) = oContMaps (S2 : ( ( non empty TopSpace-like ) ( non empty TopSpace-like ) TopSpace) ,T2 : ( ( non empty TopSpace-like ) ( non empty TopSpace-like ) TopSpace) ) : ( ( non empty strict ) ( non empty strict ) RelStr ) ;

theorem :: WAYBEL27:17
for X being ( ( ) ( ) set ) ex f being ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of (BoolePoset b1 : ( ( ) ( ) set ) ) : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() satisfying_axiom_K algebraic up-complete /\-complete V375() continuous non void distributive V393() complemented Boolean ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of ((BoolePoset 1 : ( ( ) ( non empty ) set ) ) : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() satisfying_axiom_K algebraic up-complete /\-complete V375() continuous non void distributive V393() complemented Boolean ) RelStr ) |^ b1 : ( ( ) ( ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of (BoolePoset b1 : ( ( ) ( ) set ) ) : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() satisfying_axiom_K algebraic up-complete /\-complete V375() continuous non void distributive V393() complemented Boolean ) RelStr ) : ( ( ) ( non empty ) set ) ) quasi_total Function-yielding V33() ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty functional ) set ) ) st
( f : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of (BoolePoset b1 : ( ( ) ( ) set ) ) : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() satisfying_axiom_K algebraic up-complete /\-complete V375() continuous non void distributive V393() complemented Boolean ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of ((BoolePoset 1 : ( ( ) ( non empty ) set ) ) : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() satisfying_axiom_K algebraic up-complete /\-complete V375() continuous non void distributive V393() complemented Boolean ) RelStr ) |^ b1 : ( ( ) ( ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of (BoolePoset b1 : ( ( ) ( ) set ) ) : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() satisfying_axiom_K algebraic up-complete /\-complete V375() continuous non void distributive V393() complemented Boolean ) RelStr ) : ( ( ) ( non empty ) set ) ) quasi_total Function-yielding V33() ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty functional ) set ) ) is isomorphic & ( for Y being ( ( ) ( ) Subset of ( ( ) ( non empty ) set ) ) holds f : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of (BoolePoset b1 : ( ( ) ( ) set ) ) : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() satisfying_axiom_K algebraic up-complete /\-complete V375() continuous non void distributive V393() complemented Boolean ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of ((BoolePoset 1 : ( ( ) ( non empty ) set ) ) : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() satisfying_axiom_K algebraic up-complete /\-complete V375() continuous non void distributive V393() complemented Boolean ) RelStr ) |^ b1 : ( ( ) ( ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of (BoolePoset b1 : ( ( ) ( ) set ) ) : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() satisfying_axiom_K algebraic up-complete /\-complete V375() continuous non void distributive V393() complemented Boolean ) RelStr ) : ( ( ) ( non empty ) set ) ) quasi_total Function-yielding V33() ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty functional ) set ) ) . Y : ( ( ) ( ) Subset of ( ( ) ( non empty ) set ) ) : ( ( ) ( Relation-like Function-like ) set ) = chi (Y : ( ( ) ( ) Subset of ( ( ) ( non empty ) set ) ) ,X : ( ( ) ( ) set ) ) : ( ( Function-like quasi_total ) ( Relation-like b1 : ( ( ) ( ) set ) -defined {{} : ( ( ) ( empty Relation-like non-empty empty-yielding Function-like one-to-one constant functional Function-yielding V33() uncurrying currying commuting ) set ) ,1 : ( ( ) ( non empty ) set ) } : ( ( ) ( non empty ) set ) -valued Function-like V27(b1 : ( ( ) ( ) set ) ) quasi_total ) Element of bool [:b1 : ( ( ) ( ) set ) ,{{} : ( ( ) ( empty Relation-like non-empty empty-yielding Function-like one-to-one constant functional Function-yielding V33() uncurrying currying commuting ) set ) ,1 : ( ( ) ( non empty ) set ) } : ( ( ) ( non empty ) set ) :] : ( ( ) ( Relation-like ) set ) : ( ( ) ( non empty ) set ) ) ) ) ;

theorem :: WAYBEL27:18
for X being ( ( ) ( ) set ) holds BoolePoset X : ( ( ) ( ) set ) : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() satisfying_axiom_K algebraic up-complete /\-complete V375() continuous non void distributive V393() complemented Boolean ) RelStr ) ,(BoolePoset 1 : ( ( ) ( non empty ) set ) ) : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() satisfying_axiom_K algebraic up-complete /\-complete V375() continuous non void distributive V393() complemented Boolean ) RelStr ) |^ X : ( ( ) ( ) set ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) are_isomorphic ;

theorem :: WAYBEL27:19
for X, Y being ( ( non empty ) ( non empty ) set )
for T being ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset)
for S1 being ( ( non empty full ) ( non empty constituted-Functions full ) SubRelStr of (T : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ X : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) |^ Y : ( ( non empty ) ( non empty ) set ) : ( ( strict ) ( non empty constituted-Functions strict ) RelStr ) )
for S2 being ( ( non empty full ) ( non empty constituted-Functions reflexive transitive antisymmetric full non void ) SubRelStr of (T : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ Y : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) |^ X : ( ( non empty ) ( non empty ) set ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) )
for F being ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b4 : ( ( non empty full ) ( non empty constituted-Functions full ) SubRelStr of (b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ b1 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) |^ b2 : ( ( non empty ) ( non empty ) set ) : ( ( strict ) ( non empty constituted-Functions strict ) RelStr ) ) : ( ( ) ( non empty functional ) set ) -defined the carrier of b5 : ( ( non empty full ) ( non empty constituted-Functions reflexive transitive antisymmetric full non void ) SubRelStr of (b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ b2 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) |^ b1 : ( ( non empty ) ( non empty ) set ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of b4 : ( ( non empty full ) ( non empty constituted-Functions full ) SubRelStr of (b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ b1 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) |^ b2 : ( ( non empty ) ( non empty ) set ) : ( ( strict ) ( non empty constituted-Functions strict ) RelStr ) ) : ( ( ) ( non empty functional ) set ) ) quasi_total Function-yielding V33() ) Function of ( ( ) ( non empty functional ) set ) , ( ( ) ( non empty functional ) set ) ) st F : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b4 : ( ( non empty full ) ( non empty constituted-Functions full ) SubRelStr of (b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ b1 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) |^ b2 : ( ( non empty ) ( non empty ) set ) : ( ( strict ) ( non empty constituted-Functions strict ) RelStr ) ) : ( ( ) ( non empty functional ) set ) -defined the carrier of b5 : ( ( non empty full ) ( non empty constituted-Functions reflexive transitive antisymmetric full non void ) SubRelStr of (b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ b2 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) |^ b1 : ( ( non empty ) ( non empty ) set ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of b4 : ( ( non empty full ) ( non empty constituted-Functions full ) SubRelStr of (b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ b1 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) |^ b2 : ( ( non empty ) ( non empty ) set ) : ( ( strict ) ( non empty constituted-Functions strict ) RelStr ) ) : ( ( ) ( non empty functional ) set ) ) quasi_total Function-yielding V33() ) Function of ( ( ) ( non empty functional ) set ) , ( ( ) ( non empty functional ) set ) ) is commuting holds
F : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b4 : ( ( non empty full ) ( non empty constituted-Functions full ) SubRelStr of (b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ b1 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) |^ b2 : ( ( non empty ) ( non empty ) set ) : ( ( strict ) ( non empty constituted-Functions strict ) RelStr ) ) : ( ( ) ( non empty functional ) set ) -defined the carrier of b5 : ( ( non empty full ) ( non empty constituted-Functions reflexive transitive antisymmetric full non void ) SubRelStr of (b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ b2 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) |^ b1 : ( ( non empty ) ( non empty ) set ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of b4 : ( ( non empty full ) ( non empty constituted-Functions full ) SubRelStr of (b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ b1 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) |^ b2 : ( ( non empty ) ( non empty ) set ) : ( ( strict ) ( non empty constituted-Functions strict ) RelStr ) ) : ( ( ) ( non empty functional ) set ) ) quasi_total Function-yielding V33() ) Function of ( ( ) ( non empty functional ) set ) , ( ( ) ( non empty functional ) set ) ) is monotone ;

theorem :: WAYBEL27:20
for X, Y being ( ( non empty ) ( non empty ) set )
for T being ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset)
for S1 being ( ( non empty full ) ( non empty constituted-Functions reflexive transitive antisymmetric full non void ) SubRelStr of (T : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ Y : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) |^ X : ( ( non empty ) ( non empty ) set ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) )
for S2 being ( ( non empty full ) ( non empty constituted-Functions reflexive transitive antisymmetric full non void ) SubRelStr of T : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ [:X : ( ( non empty ) ( non empty ) set ) ,Y : ( ( non empty ) ( non empty ) set ) :] : ( ( ) ( non empty Relation-like ) set ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) )
for F being ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b4 : ( ( non empty full ) ( non empty constituted-Functions reflexive transitive antisymmetric full non void ) SubRelStr of (b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ b2 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) |^ b1 : ( ( non empty ) ( non empty ) set ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) ) : ( ( ) ( non empty functional ) set ) -defined the carrier of b5 : ( ( non empty full ) ( non empty constituted-Functions reflexive transitive antisymmetric full non void ) SubRelStr of b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ [:b1 : ( ( non empty ) ( non empty ) set ) ,b2 : ( ( non empty ) ( non empty ) set ) :] : ( ( ) ( non empty Relation-like ) set ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of b4 : ( ( non empty full ) ( non empty constituted-Functions reflexive transitive antisymmetric full non void ) SubRelStr of (b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ b2 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) |^ b1 : ( ( non empty ) ( non empty ) set ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) ) : ( ( ) ( non empty functional ) set ) ) quasi_total Function-yielding V33() ) Function of ( ( ) ( non empty functional ) set ) , ( ( ) ( non empty functional ) set ) ) st F : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b4 : ( ( non empty full ) ( non empty constituted-Functions reflexive transitive antisymmetric full non void ) SubRelStr of (b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ b2 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) |^ b1 : ( ( non empty ) ( non empty ) set ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) ) : ( ( ) ( non empty functional ) set ) -defined the carrier of b5 : ( ( non empty full ) ( non empty constituted-Functions reflexive transitive antisymmetric full non void ) SubRelStr of b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ [:b1 : ( ( non empty ) ( non empty ) set ) ,b2 : ( ( non empty ) ( non empty ) set ) :] : ( ( ) ( non empty Relation-like ) set ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of b4 : ( ( non empty full ) ( non empty constituted-Functions reflexive transitive antisymmetric full non void ) SubRelStr of (b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ b2 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) |^ b1 : ( ( non empty ) ( non empty ) set ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) ) : ( ( ) ( non empty functional ) set ) ) quasi_total Function-yielding V33() ) Function of ( ( ) ( non empty functional ) set ) , ( ( ) ( non empty functional ) set ) ) is uncurrying holds
F : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b4 : ( ( non empty full ) ( non empty constituted-Functions reflexive transitive antisymmetric full non void ) SubRelStr of (b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ b2 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) |^ b1 : ( ( non empty ) ( non empty ) set ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) ) : ( ( ) ( non empty functional ) set ) -defined the carrier of b5 : ( ( non empty full ) ( non empty constituted-Functions reflexive transitive antisymmetric full non void ) SubRelStr of b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ [:b1 : ( ( non empty ) ( non empty ) set ) ,b2 : ( ( non empty ) ( non empty ) set ) :] : ( ( ) ( non empty Relation-like ) set ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of b4 : ( ( non empty full ) ( non empty constituted-Functions reflexive transitive antisymmetric full non void ) SubRelStr of (b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ b2 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) |^ b1 : ( ( non empty ) ( non empty ) set ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) ) : ( ( ) ( non empty functional ) set ) ) quasi_total Function-yielding V33() ) Function of ( ( ) ( non empty functional ) set ) , ( ( ) ( non empty functional ) set ) ) is monotone ;

theorem :: WAYBEL27:21
for X, Y being ( ( non empty ) ( non empty ) set )
for T being ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset)
for S1 being ( ( non empty full ) ( non empty constituted-Functions reflexive transitive antisymmetric full non void ) SubRelStr of (T : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ Y : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) |^ X : ( ( non empty ) ( non empty ) set ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) )
for S2 being ( ( non empty full ) ( non empty constituted-Functions reflexive transitive antisymmetric full non void ) SubRelStr of T : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ [:X : ( ( non empty ) ( non empty ) set ) ,Y : ( ( non empty ) ( non empty ) set ) :] : ( ( ) ( non empty Relation-like ) set ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) )
for F being ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b5 : ( ( non empty full ) ( non empty constituted-Functions reflexive transitive antisymmetric full non void ) SubRelStr of b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ [:b1 : ( ( non empty ) ( non empty ) set ) ,b2 : ( ( non empty ) ( non empty ) set ) :] : ( ( ) ( non empty Relation-like ) set ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) ) : ( ( ) ( non empty functional ) set ) -defined the carrier of b4 : ( ( non empty full ) ( non empty constituted-Functions reflexive transitive antisymmetric full non void ) SubRelStr of (b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ b2 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) |^ b1 : ( ( non empty ) ( non empty ) set ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of b5 : ( ( non empty full ) ( non empty constituted-Functions reflexive transitive antisymmetric full non void ) SubRelStr of b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ [:b1 : ( ( non empty ) ( non empty ) set ) ,b2 : ( ( non empty ) ( non empty ) set ) :] : ( ( ) ( non empty Relation-like ) set ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) ) : ( ( ) ( non empty functional ) set ) ) quasi_total ) Function of ( ( ) ( non empty functional ) set ) , ( ( ) ( non empty functional ) set ) ) st F : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b5 : ( ( non empty full ) ( non empty constituted-Functions reflexive transitive antisymmetric full non void ) SubRelStr of b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ [:b1 : ( ( non empty ) ( non empty ) set ) ,b2 : ( ( non empty ) ( non empty ) set ) :] : ( ( ) ( non empty Relation-like ) set ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) ) : ( ( ) ( non empty functional ) set ) -defined the carrier of b4 : ( ( non empty full ) ( non empty constituted-Functions reflexive transitive antisymmetric full non void ) SubRelStr of (b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ b2 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) |^ b1 : ( ( non empty ) ( non empty ) set ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of b5 : ( ( non empty full ) ( non empty constituted-Functions reflexive transitive antisymmetric full non void ) SubRelStr of b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ [:b1 : ( ( non empty ) ( non empty ) set ) ,b2 : ( ( non empty ) ( non empty ) set ) :] : ( ( ) ( non empty Relation-like ) set ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) ) : ( ( ) ( non empty functional ) set ) ) quasi_total ) Function of ( ( ) ( non empty functional ) set ) , ( ( ) ( non empty functional ) set ) ) is currying holds
F : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b5 : ( ( non empty full ) ( non empty constituted-Functions reflexive transitive antisymmetric full non void ) SubRelStr of b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ [:b1 : ( ( non empty ) ( non empty ) set ) ,b2 : ( ( non empty ) ( non empty ) set ) :] : ( ( ) ( non empty Relation-like ) set ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) ) : ( ( ) ( non empty functional ) set ) -defined the carrier of b4 : ( ( non empty full ) ( non empty constituted-Functions reflexive transitive antisymmetric full non void ) SubRelStr of (b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ b2 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) |^ b1 : ( ( non empty ) ( non empty ) set ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of b5 : ( ( non empty full ) ( non empty constituted-Functions reflexive transitive antisymmetric full non void ) SubRelStr of b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ [:b1 : ( ( non empty ) ( non empty ) set ) ,b2 : ( ( non empty ) ( non empty ) set ) :] : ( ( ) ( non empty Relation-like ) set ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) ) : ( ( ) ( non empty functional ) set ) ) quasi_total ) Function of ( ( ) ( non empty functional ) set ) , ( ( ) ( non empty functional ) set ) ) is monotone ;

begin

definition
let S be ( ( non empty ) ( non empty ) RelStr ) ;
let T be ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) ;
func UPS (S,T) -> ( ( strict ) ( strict ) RelStr ) means :: WAYBEL27:def 4
( it : ( ( ) ( ) set ) is ( ( full ) ( reflexive antisymmetric full ) SubRelStr of T : ( ( ) ( ) set ) |^ the carrier of S : ( ( ) ( ) set ) : ( ( ) ( ) set ) : ( ( strict ) ( strict ) RelStr ) ) & ( for x being ( ( ) ( ) set ) holds
( x : ( ( ) ( ) set ) in the carrier of it : ( ( ) ( ) set ) : ( ( ) ( ) set ) iff x : ( ( ) ( ) set ) is ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of S : ( ( ) ( ) set ) : ( ( ) ( ) set ) -defined the carrier of T : ( ( ) ( ) set ) : ( ( ) ( ) set ) -valued Function-like V27( the carrier of S : ( ( ) ( ) set ) : ( ( ) ( ) set ) ) quasi_total directed-sups-preserving ) Function of ( ( ) ( ) set ) , ( ( ) ( ) set ) ) ) ) );
end;

registration
let S be ( ( non empty ) ( non empty ) RelStr ) ;
let T be ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) ;
cluster UPS (S : ( ( non empty ) ( non empty ) RelStr ) ,T : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) ) : ( ( strict ) ( strict ) RelStr ) -> non empty constituted-Functions strict reflexive antisymmetric ;
end;

registration
let S be ( ( non empty ) ( non empty ) RelStr ) ;
let T be ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ;
cluster UPS (S : ( ( non empty ) ( non empty ) RelStr ) ,T : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) RelStr ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive antisymmetric non void ) RelStr ) -> strict transitive ;
end;

theorem :: WAYBEL27:22
for S being ( ( non empty ) ( non empty ) RelStr )
for T being ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) holds the carrier of (UPS (S : ( ( non empty ) ( non empty ) RelStr ) ,T : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) c= Funcs ( the carrier of S : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) , the carrier of T : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) ) : ( ( ) ( non empty functional ) FUNCTION_DOMAIN of the carrier of b1 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) , the carrier of b2 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) ) ;

definition
let S be ( ( non empty ) ( non empty ) RelStr ) ;
let T be ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) ;
let f be ( ( ) ( Relation-like Function-like ) Element of ( ( ) ( non empty functional ) set ) ) ;
let s be ( ( ) ( ) Element of ( ( ) ( non empty ) set ) ) ;
:: original: .
redefine func f . s -> ( ( ) ( ) Element of ( ( ) ( ) set ) ) ;
end;

theorem :: WAYBEL27:23
for S being ( ( non empty ) ( non empty ) RelStr )
for T being ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr )
for f, g being ( ( ) ( Relation-like Function-like ) Element of ( ( ) ( non empty functional ) set ) ) holds
( f : ( ( ) ( Relation-like Function-like ) Element of ( ( ) ( non empty functional ) set ) ) <= g : ( ( ) ( Relation-like Function-like ) Element of ( ( ) ( non empty functional ) set ) ) iff for s being ( ( ) ( ) Element of ( ( ) ( non empty ) set ) ) holds f : ( ( ) ( Relation-like Function-like ) Element of ( ( ) ( non empty functional ) set ) ) . s : ( ( ) ( ) Element of ( ( ) ( non empty ) set ) ) : ( ( ) ( ) Element of ( ( ) ( non empty ) set ) ) <= g : ( ( ) ( Relation-like Function-like ) Element of ( ( ) ( non empty functional ) set ) ) . s : ( ( ) ( ) Element of ( ( ) ( non empty ) set ) ) : ( ( ) ( ) Element of ( ( ) ( non empty ) set ) ) ) ;

theorem :: WAYBEL27:24
for S, T being ( ( TopSpace-like reflexive transitive antisymmetric V219() V220() complete Scott ) ( non empty TopSpace-like T_0 reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete Scott non void ) TopLattice) holds UPS (S : ( ( TopSpace-like reflexive transitive antisymmetric V219() V220() complete Scott ) ( non empty TopSpace-like T_0 reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete Scott non void ) TopLattice) ,T : ( ( TopSpace-like reflexive transitive antisymmetric V219() V220() complete Scott ) ( non empty TopSpace-like T_0 reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete Scott non void ) TopLattice) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) = SCMaps (S : ( ( TopSpace-like reflexive transitive antisymmetric V219() V220() complete Scott ) ( non empty TopSpace-like T_0 reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete Scott non void ) TopLattice) ,T : ( ( TopSpace-like reflexive transitive antisymmetric V219() V220() complete Scott ) ( non empty TopSpace-like T_0 reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete Scott non void ) TopLattice) ) : ( ( strict full ) ( non empty constituted-Functions strict reflexive transitive antisymmetric full non void ) SubRelStr of MonMaps (b1 : ( ( TopSpace-like reflexive transitive antisymmetric V219() V220() complete Scott ) ( non empty TopSpace-like T_0 reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete Scott non void ) TopLattice) ,b2 : ( ( TopSpace-like reflexive transitive antisymmetric V219() V220() complete Scott ) ( non empty TopSpace-like T_0 reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete Scott non void ) TopLattice) ) : ( ( strict full ) ( non empty constituted-Functions strict reflexive transitive antisymmetric full non void ) SubRelStr of b2 : ( ( TopSpace-like reflexive transitive antisymmetric V219() V220() complete Scott ) ( non empty TopSpace-like T_0 reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete Scott non void ) TopLattice) |^ the carrier of b1 : ( ( TopSpace-like reflexive transitive antisymmetric V219() V220() complete Scott ) ( non empty TopSpace-like T_0 reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete Scott non void ) TopLattice) : ( ( ) ( non empty ) set ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) ) ) ;

theorem :: WAYBEL27:25
for S, S9 being ( ( non empty ) ( non empty ) RelStr )
for T, T9 being ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) st RelStr(# the carrier of S : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) , the InternalRel of S : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( Relation-like the carrier of b1 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of b1 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -valued ) Element of bool [: the carrier of b1 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) , the carrier of b1 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) :] : ( ( ) ( non empty Relation-like ) set ) : ( ( ) ( non empty ) set ) ) #) : ( ( strict ) ( non empty strict ) RelStr ) = RelStr(# the carrier of S9 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) , the InternalRel of S9 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( Relation-like the carrier of b2 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of b2 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) -valued ) Element of bool [: the carrier of b2 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) , the carrier of b2 : ( ( non empty ) ( non empty ) RelStr ) : ( ( ) ( non empty ) set ) :] : ( ( ) ( non empty Relation-like ) set ) : ( ( ) ( non empty ) set ) ) #) : ( ( strict ) ( non empty strict ) RelStr ) & RelStr(# the carrier of T : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) , the InternalRel of T : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty Relation-like the carrier of b3 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of b3 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) -valued ) Element of bool [: the carrier of b3 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) , the carrier of b3 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) :] : ( ( ) ( non empty Relation-like ) set ) : ( ( ) ( non empty ) set ) ) #) : ( ( strict ) ( non empty strict reflexive antisymmetric non void ) RelStr ) = RelStr(# the carrier of T9 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) , the InternalRel of T9 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty Relation-like the carrier of b4 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of b4 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) -valued ) Element of bool [: the carrier of b4 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) , the carrier of b4 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) :] : ( ( ) ( non empty Relation-like ) set ) : ( ( ) ( non empty ) set ) ) #) : ( ( strict ) ( non empty strict reflexive antisymmetric non void ) RelStr ) holds
UPS (S : ( ( non empty ) ( non empty ) RelStr ) ,T : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive antisymmetric non void ) RelStr ) = UPS (S9 : ( ( non empty ) ( non empty ) RelStr ) ,T9 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive antisymmetric non void ) RelStr ) ;

registration
let S, T be ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ;
cluster UPS (S : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) ,T : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) -> strict complete ;
end;

theorem :: WAYBEL27:26
for S, T being ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) holds UPS (S : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,T : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) is ( ( sups-inheriting ) ( non empty constituted-Functions join-inheriting sups-inheriting directed-sups-inheriting ) SubRelStr of T : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) |^ the carrier of S : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) ) ;

theorem :: WAYBEL27:27
for S, T being ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE)
for A being ( ( ) ( functional ) Subset of ) holds sup A : ( ( ) ( functional ) Subset of ) : ( ( ) ( Relation-like Function-like ) Element of the carrier of (UPS (b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) ) = "\/" (A : ( ( ) ( functional ) Subset of ) ,(T : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) |^ the carrier of S : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) ) : ( ( ) ( Relation-like Function-like ) Element of the carrier of (b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) |^ the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) ) ;

definition
let S1, S2, T1, T2 be ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) ;
let f be ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of S1 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of S2 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of S1 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) ) quasi_total ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) ;
assume f : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of S1 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of S2 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of S1 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) ) quasi_total ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) is directed-sups-preserving ;
let g be ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of T1 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of T2 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of T1 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) ) quasi_total ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) ;
assume g : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of T1 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of T2 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of T1 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) ) quasi_total ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) is directed-sups-preserving ;
func UPS (f,g) -> ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of (UPS (S2 : ( ( ) ( ) set ) ,T1 : ( ( ) ( ) set ) )) : ( ( strict ) ( strict ) RelStr ) : ( ( ) ( ) set ) -defined the carrier of (UPS (S1 : ( ( ) ( ) set ) ,T2 : ( ( Function-like quasi_total ) ( Relation-like S2 : ( ( ) ( ) set ) -defined the carrier of S1 : ( ( ) ( ) set ) : ( ( ) ( ) set ) -valued Function-like quasi_total ) Element of bool [:S2 : ( ( ) ( ) set ) , the carrier of S1 : ( ( ) ( ) set ) : ( ( ) ( ) set ) :] : ( ( ) ( Relation-like ) set ) : ( ( ) ( non empty ) set ) ) )) : ( ( strict ) ( strict ) RelStr ) : ( ( ) ( ) set ) -valued Function-like V27( the carrier of (UPS (S2 : ( ( ) ( ) set ) ,T1 : ( ( ) ( ) set ) )) : ( ( strict ) ( strict ) RelStr ) : ( ( ) ( ) set ) ) quasi_total Function-yielding V33() ) Function of ( ( ) ( ) set ) , ( ( ) ( ) set ) ) means :: WAYBEL27:def 5
for h being ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of S2 : ( ( ) ( ) set ) : ( ( ) ( ) set ) -defined the carrier of T1 : ( ( ) ( ) set ) : ( ( ) ( ) set ) -valued Function-like V27( the carrier of S2 : ( ( ) ( ) set ) : ( ( ) ( ) set ) ) quasi_total monotone directed-sups-preserving ) Function of ( ( ) ( ) set ) , ( ( ) ( ) set ) ) holds it : ( ( ) ( ) Element of S1 : ( ( ) ( ) set ) ) . h : ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of S2 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of T1 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of S2 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) ) quasi_total monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) : ( ( ) ( ) set ) = (g : ( ( ) ( ) Element of S1 : ( ( ) ( ) set ) ) * h : ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of S2 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of T1 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of S2 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) ) quasi_total monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) ) : ( ( Function-like ) ( Relation-like the carrier of S2 : ( ( ) ( ) set ) : ( ( ) ( ) set ) -defined the carrier of T2 : ( ( Function-like quasi_total ) ( Relation-like S2 : ( ( ) ( ) set ) -defined the carrier of S1 : ( ( ) ( ) set ) : ( ( ) ( ) set ) -valued Function-like quasi_total ) Element of bool [:S2 : ( ( ) ( ) set ) , the carrier of S1 : ( ( ) ( ) set ) : ( ( ) ( ) set ) :] : ( ( ) ( Relation-like ) set ) : ( ( ) ( non empty ) set ) ) : ( ( ) ( ) set ) -valued Function-like ) Element of bool [: the carrier of S2 : ( ( ) ( ) set ) : ( ( ) ( ) set ) , the carrier of T2 : ( ( Function-like quasi_total ) ( Relation-like S2 : ( ( ) ( ) set ) -defined the carrier of S1 : ( ( ) ( ) set ) : ( ( ) ( ) set ) -valued Function-like quasi_total ) Element of bool [:S2 : ( ( ) ( ) set ) , the carrier of S1 : ( ( ) ( ) set ) : ( ( ) ( ) set ) :] : ( ( ) ( Relation-like ) set ) : ( ( ) ( non empty ) set ) ) : ( ( ) ( ) set ) :] : ( ( ) ( Relation-like ) set ) : ( ( ) ( non empty ) set ) ) * f : ( ( ) ( ) Element of S1 : ( ( ) ( ) set ) ) : ( ( Function-like ) ( Relation-like the carrier of S1 : ( ( ) ( ) set ) : ( ( ) ( ) set ) -defined the carrier of T2 : ( ( Function-like quasi_total ) ( Relation-like S2 : ( ( ) ( ) set ) -defined the carrier of S1 : ( ( ) ( ) set ) : ( ( ) ( ) set ) -valued Function-like quasi_total ) Element of bool [:S2 : ( ( ) ( ) set ) , the carrier of S1 : ( ( ) ( ) set ) : ( ( ) ( ) set ) :] : ( ( ) ( Relation-like ) set ) : ( ( ) ( non empty ) set ) ) : ( ( ) ( ) set ) -valued Function-like ) Element of bool [: the carrier of S1 : ( ( ) ( ) set ) : ( ( ) ( ) set ) , the carrier of T2 : ( ( Function-like quasi_total ) ( Relation-like S2 : ( ( ) ( ) set ) -defined the carrier of S1 : ( ( ) ( ) set ) : ( ( ) ( ) set ) -valued Function-like quasi_total ) Element of bool [:S2 : ( ( ) ( ) set ) , the carrier of S1 : ( ( ) ( ) set ) : ( ( ) ( ) set ) :] : ( ( ) ( Relation-like ) set ) : ( ( ) ( non empty ) set ) ) : ( ( ) ( ) set ) :] : ( ( ) ( Relation-like ) set ) : ( ( ) ( non empty ) set ) ) ;
end;

theorem :: WAYBEL27:28
for S1, S2, S3, T1, T2, T3 being ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset)
for f1 being ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -defined the carrier of b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) ) quasi_total monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) )
for f2 being ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of b1 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -defined the carrier of b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b1 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) ) quasi_total monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) )
for g1 being ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of b4 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -defined the carrier of b5 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b4 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) ) quasi_total monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) )
for g2 being ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of b5 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -defined the carrier of b6 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b5 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) ) quasi_total monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) holds (UPS (f2 : ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of b1 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -defined the carrier of b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b1 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) ) quasi_total monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) ,g2 : ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of b5 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -defined the carrier of b6 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b5 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) ) quasi_total monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) )) : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of (UPS (b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,b5 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -defined the carrier of (UPS (b1 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,b6 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of (UPS (b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,b5 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) ) quasi_total Function-yielding V33() ) Function of ( ( ) ( non empty functional ) set ) , ( ( ) ( non empty functional ) set ) ) * (UPS (f1 : ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -defined the carrier of b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) ) quasi_total monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) ,g1 : ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of b4 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -defined the carrier of b5 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b4 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) ) quasi_total monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) )) : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of (UPS (b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,b4 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -defined the carrier of (UPS (b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,b5 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of (UPS (b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,b4 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) ) quasi_total Function-yielding V33() ) Function of ( ( ) ( non empty functional ) set ) , ( ( ) ( non empty functional ) set ) ) : ( ( Function-like ) ( non empty Relation-like the carrier of (UPS (b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,b4 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -defined the carrier of (UPS (b1 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,b6 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of (UPS (b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,b4 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) ) quasi_total Function-yielding V33() ) Element of bool [: the carrier of (UPS (b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,b4 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) , the carrier of (UPS (b1 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,b6 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) :] : ( ( ) ( non empty Relation-like ) set ) : ( ( ) ( non empty ) set ) ) = UPS ((f1 : ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -defined the carrier of b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) ) quasi_total monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) * f2 : ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of b1 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -defined the carrier of b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b1 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) ) quasi_total monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) ) : ( ( Function-like ) ( non empty Relation-like the carrier of b1 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -defined the carrier of b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b1 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) ) quasi_total ) Element of bool [: the carrier of b1 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) , the carrier of b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) :] : ( ( ) ( non empty Relation-like ) set ) : ( ( ) ( non empty ) set ) ) ,(g2 : ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of b5 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -defined the carrier of b6 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b5 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) ) quasi_total monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) * g1 : ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of b4 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -defined the carrier of b5 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b4 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) ) quasi_total monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) ) : ( ( Function-like ) ( non empty Relation-like the carrier of b4 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -defined the carrier of b6 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b4 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) ) quasi_total ) Element of bool [: the carrier of b4 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) , the carrier of b6 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) :] : ( ( ) ( non empty Relation-like ) set ) : ( ( ) ( non empty ) set ) ) ) : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of (UPS (b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,b4 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -defined the carrier of (UPS (b1 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,b6 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of (UPS (b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,b4 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) ) quasi_total Function-yielding V33() ) Function of ( ( ) ( non empty functional ) set ) , ( ( ) ( non empty functional ) set ) ) ;

theorem :: WAYBEL27:29
for S, T being ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) holds UPS ((id S : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) ) : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b1 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of b1 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) -valued Function-like one-to-one V27( the carrier of b1 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) ) quasi_total idempotent monotone infs-preserving sups-preserving meet-preserving join-preserving filtered-infs-preserving directed-sups-preserving isomorphic projection closure kernel ) Element of bool [: the carrier of b1 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) , the carrier of b1 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) :] : ( ( ) ( non empty Relation-like ) set ) : ( ( ) ( non empty ) set ) ) ,(id T : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) ) : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b2 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of b2 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) -valued Function-like one-to-one V27( the carrier of b2 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) ) quasi_total idempotent monotone infs-preserving sups-preserving meet-preserving join-preserving filtered-infs-preserving directed-sups-preserving isomorphic projection closure kernel ) Element of bool [: the carrier of b2 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) , the carrier of b2 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) :] : ( ( ) ( non empty Relation-like ) set ) : ( ( ) ( non empty ) set ) ) ) : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of (UPS (b1 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) ,b2 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -defined the carrier of (UPS (b1 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) ,b2 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of (UPS (b1 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) ,b2 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) ) quasi_total Function-yielding V33() ) Function of ( ( ) ( non empty functional ) set ) , ( ( ) ( non empty functional ) set ) ) = id (UPS (S : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) ,T : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive antisymmetric non void ) RelStr ) : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of (UPS (b1 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) ,b2 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -defined the carrier of (UPS (b1 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) ,b2 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -valued Function-like one-to-one V27( the carrier of (UPS (b1 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) ,b2 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) ) quasi_total Function-yielding V33() idempotent monotone infs-preserving sups-preserving meet-preserving join-preserving filtered-infs-preserving directed-sups-preserving isomorphic projection closure kernel ) Element of bool [: the carrier of (UPS (b1 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) ,b2 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) , the carrier of (UPS (b1 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) ,b2 : ( ( non empty reflexive antisymmetric ) ( non empty reflexive antisymmetric non void ) RelStr ) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) :] : ( ( ) ( non empty Relation-like ) set ) : ( ( ) ( non empty ) set ) ) ;

theorem :: WAYBEL27:30
for S1, S2, T1, T2 being ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE)
for f being ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -defined the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) quasi_total monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) )
for g being ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of b3 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -defined the carrier of b4 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b3 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) quasi_total monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) holds UPS (f : ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -defined the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) quasi_total monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) ,g : ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of b3 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -defined the carrier of b4 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b3 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) quasi_total monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) ) : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of (UPS (b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,b3 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -defined the carrier of (UPS (b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,b4 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of (UPS (b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,b3 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) ) quasi_total Function-yielding V33() ) Function of ( ( ) ( non empty functional ) set ) , ( ( ) ( non empty functional ) set ) ) is directed-sups-preserving ;

theorem :: WAYBEL27:31
Omega Sierpinski_Space : ( ( strict ) ( non empty strict TopSpace-like T_0 non T_1 V381() monotone-convergence ) TopStruct ) : ( ( strict ) ( non empty TopSpace-like reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete strict V375() continuous non void ) TopRelStr ) is Scott ;

theorem :: WAYBEL27:32
for S being ( ( TopSpace-like reflexive transitive antisymmetric V219() V220() complete Scott ) ( non empty TopSpace-like T_0 reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete Scott non void ) TopLattice) holds oContMaps (S : ( ( TopSpace-like reflexive transitive antisymmetric V219() V220() complete Scott ) ( non empty TopSpace-like T_0 reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete Scott non void ) TopLattice) ,Sierpinski_Space : ( ( strict ) ( non empty strict TopSpace-like T_0 non T_1 V381() monotone-convergence ) TopStruct ) ) : ( ( non empty strict ) ( non empty strict ) RelStr ) = UPS (S : ( ( TopSpace-like reflexive transitive antisymmetric V219() V220() complete Scott ) ( non empty TopSpace-like T_0 reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete Scott non void ) TopLattice) ,(BoolePoset 1 : ( ( ) ( non empty ) set ) ) : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() satisfying_axiom_K algebraic up-complete /\-complete V375() continuous non void distributive V393() complemented Boolean ) RelStr ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) ;

theorem :: WAYBEL27:33
for S being ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ex F being ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of (UPS (b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,(BoolePoset 1 : ( ( ) ( non empty ) set ) ) : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() satisfying_axiom_K algebraic up-complete /\-complete V375() continuous non void distributive V393() complemented Boolean ) RelStr ) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -defined the carrier of (InclPoset (sigma b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ) : ( ( ) ( non empty ) Element of bool (bool the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) : ( ( ) ( non empty ) set ) : ( ( ) ( non empty ) set ) ) ) : ( ( strict ) ( non empty strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of (UPS (b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,(BoolePoset 1 : ( ( ) ( non empty ) set ) ) : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() satisfying_axiom_K algebraic up-complete /\-complete V375() continuous non void distributive V393() complemented Boolean ) RelStr ) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) ) quasi_total ) Function of ( ( ) ( non empty functional ) set ) , ( ( ) ( non empty ) set ) ) st
( F : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of (UPS (b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,(BoolePoset 1 : ( ( ) ( non empty ) set ) ) : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() satisfying_axiom_K algebraic up-complete /\-complete V375() continuous non void distributive V393() complemented Boolean ) RelStr ) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -defined the carrier of (InclPoset (sigma b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ) : ( ( ) ( non empty ) Element of bool (bool the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) : ( ( ) ( non empty ) set ) : ( ( ) ( non empty ) set ) ) ) : ( ( strict ) ( non empty strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of (UPS (b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,(BoolePoset 1 : ( ( ) ( non empty ) set ) ) : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() satisfying_axiom_K algebraic up-complete /\-complete V375() continuous non void distributive V393() complemented Boolean ) RelStr ) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) ) quasi_total ) Function of ( ( ) ( non empty functional ) set ) , ( ( ) ( non empty ) set ) ) is isomorphic & ( for f being ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -defined the carrier of (BoolePoset 1 : ( ( ) ( non empty ) set ) ) : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() satisfying_axiom_K algebraic up-complete /\-complete V375() continuous non void distributive V393() complemented Boolean ) RelStr ) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) quasi_total monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) holds F : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of (UPS (b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,(BoolePoset 1 : ( ( ) ( non empty ) set ) ) : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() satisfying_axiom_K algebraic up-complete /\-complete V375() continuous non void distributive V393() complemented Boolean ) RelStr ) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -defined the carrier of (InclPoset (sigma b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ) : ( ( ) ( non empty ) Element of bool (bool the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) : ( ( ) ( non empty ) set ) : ( ( ) ( non empty ) set ) ) ) : ( ( strict ) ( non empty strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of (UPS (b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,(BoolePoset 1 : ( ( ) ( non empty ) set ) ) : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() satisfying_axiom_K algebraic up-complete /\-complete V375() continuous non void distributive V393() complemented Boolean ) RelStr ) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) ) quasi_total ) Function of ( ( ) ( non empty functional ) set ) , ( ( ) ( non empty ) set ) ) . f : ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -defined the carrier of (BoolePoset 1 : ( ( ) ( non empty ) set ) ) : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() satisfying_axiom_K algebraic up-complete /\-complete V375() continuous non void distributive V393() complemented Boolean ) RelStr ) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) quasi_total monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) : ( ( ) ( ) set ) = f : ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -defined the carrier of (BoolePoset 1 : ( ( ) ( non empty ) set ) ) : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() satisfying_axiom_K algebraic up-complete /\-complete V375() continuous non void distributive V393() complemented Boolean ) RelStr ) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) quasi_total monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) " {1 : ( ( ) ( non empty ) set ) } : ( ( ) ( non empty ) set ) : ( ( ) ( ) Element of bool the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) : ( ( ) ( non empty ) set ) ) ) ) ;

theorem :: WAYBEL27:34
for S being ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) holds UPS (S : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,(BoolePoset 1 : ( ( ) ( non empty ) set ) ) : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() satisfying_axiom_K algebraic up-complete /\-complete V375() continuous non void distributive V393() complemented Boolean ) RelStr ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) , InclPoset (sigma S : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ) : ( ( ) ( non empty ) Element of bool (bool the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) : ( ( ) ( non empty ) set ) : ( ( ) ( non empty ) set ) ) : ( ( strict ) ( non empty strict reflexive transitive antisymmetric non void ) RelStr ) are_isomorphic ;

theorem :: WAYBEL27:35
for S1, S2, T1, T2 being ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE)
for f being ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -defined the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) quasi_total ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) )
for g being ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b3 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -defined the carrier of b4 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b3 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) quasi_total ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) st f : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -defined the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) quasi_total ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) is isomorphic & g : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b3 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -defined the carrier of b4 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b3 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) quasi_total ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) is isomorphic holds
UPS (f : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -defined the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) quasi_total ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) ,g : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b3 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -defined the carrier of b4 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b3 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) quasi_total ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) ) : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of (UPS (b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,b3 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -defined the carrier of (UPS (b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,b4 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of (UPS (b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,b3 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) ) quasi_total Function-yielding V33() ) Function of ( ( ) ( non empty functional ) set ) , ( ( ) ( non empty functional ) set ) ) is isomorphic ;

theorem :: WAYBEL27:36
for S1, S2, T1, T2 being ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) st S1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,S2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) are_isomorphic & T1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,T2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) are_isomorphic holds
UPS (S2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,T1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) , UPS (S1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,T2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) are_isomorphic ;

theorem :: WAYBEL27:37
for S, T being ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE)
for f being ( ( Function-like quasi_total directed-sups-preserving projection ) ( non empty Relation-like the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -defined the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) quasi_total idempotent monotone directed-sups-preserving projection ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) holds Image (UPS ((id S : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ) : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -defined the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -valued Function-like one-to-one V27( the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) quasi_total idempotent monotone infs-preserving sups-preserving meet-preserving join-preserving filtered-infs-preserving directed-sups-preserving isomorphic projection closure kernel ) Element of bool [: the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) , the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) :] : ( ( ) ( non empty Relation-like ) set ) : ( ( ) ( non empty ) set ) ) ,f : ( ( Function-like quasi_total directed-sups-preserving projection ) ( non empty Relation-like the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -defined the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) quasi_total idempotent monotone directed-sups-preserving projection ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) )) : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of (UPS (b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -defined the carrier of (UPS (b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of (UPS (b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) ) quasi_total Function-yielding V33() ) Function of ( ( ) ( non empty functional ) set ) , ( ( ) ( non empty functional ) set ) ) : ( ( strict full ) ( non empty constituted-Functions strict reflexive transitive antisymmetric full non void ) SubRelStr of UPS (b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) ) = UPS (S : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,(Image f : ( ( Function-like quasi_total directed-sups-preserving projection ) ( non empty Relation-like the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -defined the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) quasi_total idempotent monotone directed-sups-preserving projection ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) ) : ( ( strict full ) ( non empty strict reflexive transitive antisymmetric full non void ) SubRelStr of b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) ;

theorem :: WAYBEL27:38
for X being ( ( non empty ) ( non empty ) set )
for S, T being ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset)
for f being ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -defined the carrier of (b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ b1 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) ) quasi_total Function-yielding V33() monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty functional ) set ) )
for i being ( ( ) ( ) Element of X : ( ( non empty ) ( non empty ) set ) ) holds (commute f : ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -defined the carrier of (b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ b1 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) ) quasi_total Function-yielding V33() monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty functional ) set ) ) ) : ( ( Relation-like Function-like Function-yielding ) ( Relation-like Function-like Function-yielding V33() ) set ) . i : ( ( ) ( ) Element of b1 : ( ( non empty ) ( non empty ) set ) ) : ( ( ) ( Relation-like Function-like ) set ) is ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -defined the carrier of b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) ) quasi_total monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) ;

theorem :: WAYBEL27:39
for X being ( ( non empty ) ( non empty ) set )
for S, T being ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset)
for f being ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -defined the carrier of (b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ b1 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) ) quasi_total Function-yielding V33() monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty functional ) set ) ) holds commute f : ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -defined the carrier of (b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ b1 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) ) quasi_total Function-yielding V33() monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty functional ) set ) ) : ( ( Relation-like Function-like Function-yielding ) ( Relation-like Function-like Function-yielding V33() ) set ) is ( ( Function-like quasi_total ) ( non empty Relation-like b1 : ( ( non empty ) ( non empty ) set ) -defined the carrier of (UPS (b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27(b1 : ( ( non empty ) ( non empty ) set ) ) quasi_total Function-yielding V33() ) Function of X : ( ( non empty ) ( non empty ) set ) , the carrier of (UPS (S : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,T : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) ) ;

theorem :: WAYBEL27:40
for X being ( ( non empty ) ( non empty ) set )
for S, T being ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset)
for f being ( ( Function-like quasi_total ) ( non empty Relation-like b1 : ( ( non empty ) ( non empty ) set ) -defined the carrier of (UPS (b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27(b1 : ( ( non empty ) ( non empty ) set ) ) quasi_total Function-yielding V33() ) Function of X : ( ( non empty ) ( non empty ) set ) , the carrier of (UPS (S : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,T : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) ) holds commute f : ( ( Function-like quasi_total ) ( non empty Relation-like b1 : ( ( non empty ) ( non empty ) set ) -defined the carrier of (UPS (b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27(b1 : ( ( non empty ) ( non empty ) set ) ) quasi_total Function-yielding V33() ) Function of b1 : ( ( non empty ) ( non empty ) set ) , the carrier of (UPS (b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) ) : ( ( Relation-like Function-like Function-yielding ) ( Relation-like Function-like Function-yielding V33() ) set ) is ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) -defined the carrier of (b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ b1 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) : ( ( ) ( non empty ) set ) ) quasi_total Function-yielding V33() monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty functional ) set ) ) ;

theorem :: WAYBEL27:41
for X being ( ( non empty ) ( non empty ) set )
for S, T being ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ex F being ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of (UPS (b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,(b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ b1 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -defined the carrier of ((UPS (b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) |^ b1 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of (UPS (b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,(b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ b1 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) ) quasi_total Function-yielding V33() ) Function of ( ( ) ( non empty functional ) set ) , ( ( ) ( non empty functional ) set ) ) st
( F : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of (UPS (b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,(b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ b1 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -defined the carrier of ((UPS (b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) |^ b1 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of (UPS (b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,(b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ b1 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) ) quasi_total Function-yielding V33() ) Function of ( ( ) ( non empty functional ) set ) , ( ( ) ( non empty functional ) set ) ) is commuting & F : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of (UPS (b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,(b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ b1 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -defined the carrier of ((UPS (b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) |^ b1 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of (UPS (b2 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,(b3 : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ b1 : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) : ( ( ) ( non empty functional ) set ) ) quasi_total Function-yielding V33() ) Function of ( ( ) ( non empty functional ) set ) , ( ( ) ( non empty functional ) set ) ) is isomorphic ) ;

theorem :: WAYBEL27:42
for X being ( ( non empty ) ( non empty ) set )
for S, T being ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) holds UPS (S : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,(T : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) |^ X : ( ( non empty ) ( non empty ) set ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) ,(UPS (S : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) ,T : ( ( non empty reflexive transitive antisymmetric ) ( non empty reflexive transitive antisymmetric non void ) Poset) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric non void ) RelStr ) |^ X : ( ( non empty ) ( non empty ) set ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) are_isomorphic ;

theorem :: WAYBEL27:43
for S, T being ( ( reflexive transitive antisymmetric V219() V220() complete continuous ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete V375() continuous non void ) LATTICE) holds UPS (S : ( ( reflexive transitive antisymmetric V219() V220() complete continuous ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete V375() continuous non void ) LATTICE) ,T : ( ( reflexive transitive antisymmetric V219() V220() complete continuous ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete V375() continuous non void ) LATTICE) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) is continuous ;

theorem :: WAYBEL27:44
for S, T being ( ( reflexive transitive antisymmetric V219() V220() complete algebraic ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() satisfying_axiom_K algebraic up-complete /\-complete V375() continuous non void ) LATTICE) holds UPS (S : ( ( reflexive transitive antisymmetric V219() V220() complete algebraic ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() satisfying_axiom_K algebraic up-complete /\-complete V375() continuous non void ) LATTICE) ,T : ( ( reflexive transitive antisymmetric V219() V220() complete algebraic ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() satisfying_axiom_K algebraic up-complete /\-complete V375() continuous non void ) LATTICE) ) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) is algebraic ;

theorem :: WAYBEL27:45
for R, S, T being ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE)
for f being ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -defined the carrier of (UPS (b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,b3 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) quasi_total Function-yielding V33() monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty functional ) set ) ) holds uncurry f : ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -defined the carrier of (UPS (b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,b3 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) quasi_total Function-yielding V33() monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty functional ) set ) ) : ( ( Relation-like Function-like ) ( Relation-like Function-like ) set ) is ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of [:b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) :] : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of b3 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of [:b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) :] : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty ) set ) ) quasi_total monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) ;

theorem :: WAYBEL27:46
for R, S, T being ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE)
for f being ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of [:b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) :] : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of b3 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of [:b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) :] : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty ) set ) ) quasi_total monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) holds curry f : ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of [:b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) :] : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty ) set ) -defined the carrier of b3 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -valued Function-like V27( the carrier of [:b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) :] : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty ) set ) ) quasi_total monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty ) set ) ) : ( ( Relation-like Function-like ) ( Relation-like Function-like ) set ) is ( ( Function-like quasi_total directed-sups-preserving ) ( non empty Relation-like the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) -defined the carrier of (UPS (b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,b3 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) : ( ( ) ( non empty ) set ) ) quasi_total Function-yielding V33() monotone directed-sups-preserving ) Function of ( ( ) ( non empty ) set ) , ( ( ) ( non empty functional ) set ) ) ;

theorem :: WAYBEL27:47
for R, S, T being ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ex f being ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of (UPS (b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,(UPS (b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,b3 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -defined the carrier of (UPS ([:b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) :] : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) ,b3 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of (UPS (b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,(UPS (b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,b3 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) ) quasi_total Function-yielding V33() ) Function of ( ( ) ( non empty functional ) set ) , ( ( ) ( non empty functional ) set ) ) st
( f : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of (UPS (b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,(UPS (b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,b3 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -defined the carrier of (UPS ([:b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) :] : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) ,b3 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of (UPS (b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,(UPS (b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,b3 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) ) quasi_total Function-yielding V33() ) Function of ( ( ) ( non empty functional ) set ) , ( ( ) ( non empty functional ) set ) ) is uncurrying & f : ( ( Function-like quasi_total ) ( non empty Relation-like the carrier of (UPS (b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,(UPS (b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,b3 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -defined the carrier of (UPS ([:b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) :] : ( ( strict ) ( non empty strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) ,b3 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) -valued Function-like V27( the carrier of (UPS (b1 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,(UPS (b2 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) ,b3 : ( ( reflexive transitive antisymmetric V219() V220() complete ) ( non empty reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) LATTICE) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) )) : ( ( strict ) ( non empty constituted-Functions strict reflexive transitive antisymmetric V219() V220() complete lower-bounded upper-bounded V307() up-complete /\-complete non void ) RelStr ) : ( ( ) ( non empty functional ) set ) ) quasi_total Function-yielding V33() ) Function of ( ( ) ( non empty functional ) set ) , ( ( ) ( non empty functional ) set ) ) is isomorphic ) ;