begin
definition
let G be ( ( non
empty strict Group-like V109() ) ( non
empty strict unital Group-like V109() )
Group) ;
let H,
K be ( (
strict ) ( non
empty strict unital Group-like V109() )
Subgroup of
G : ( ( non
empty strict Group-like V109() ) ( non
empty strict unital Group-like V109() )
Group) ) ;
func Double_Cosets (
H,
K)
-> ( ( ) ( )
Subset-Family of )
means
for
A being ( ( ) ( )
Subset of ) holds
(
A : ( ( ) ( )
Subset of )
in it : ( ( ) ( )
Element of
G : ( ( ) ( )
doubleLoopStr ) ) iff ex
a being ( ( ) ( )
Element of ( ( ) ( )
set ) ) st
A : ( ( ) ( )
Subset of )
= (H : ( ( Function-like V25([:G : ( ( ) ( ) doubleLoopStr ) ,G : ( ( ) ( ) doubleLoopStr ) :] : ( ( ) ( ) set ) ,G : ( ( ) ( ) doubleLoopStr ) ) ) ( Relation-like [:G : ( ( ) ( ) doubleLoopStr ) ,G : ( ( ) ( ) doubleLoopStr ) :] : ( ( ) ( ) set ) -defined G : ( ( ) ( ) doubleLoopStr ) -valued Function-like V25([:G : ( ( ) ( ) doubleLoopStr ) ,G : ( ( ) ( ) doubleLoopStr ) :] : ( ( ) ( ) set ) ,G : ( ( ) ( ) doubleLoopStr ) ) ) Element of bool [:[:G : ( ( ) ( ) doubleLoopStr ) ,G : ( ( ) ( ) doubleLoopStr ) :] : ( ( ) ( ) set ) ,G : ( ( ) ( ) doubleLoopStr ) :] : ( ( ) ( ) set ) : ( ( ) ( non empty ) set ) ) * a : ( ( ) ( ) Element of ( ( ) ( non empty ) set ) ) ) : ( ( ) ( )
Element of
bool the
carrier of
G : ( ( ) ( )
doubleLoopStr ) : ( ( ) ( )
set ) : ( ( ) ( non
empty )
set ) )
* K : ( (
Function-like V25(
[:G : ( ( ) ( ) doubleLoopStr ) ,G : ( ( ) ( ) doubleLoopStr ) :] : ( ( ) ( )
set ) ,
G : ( ( ) ( )
doubleLoopStr ) ) ) (
Relation-like [:G : ( ( ) ( ) doubleLoopStr ) ,G : ( ( ) ( ) doubleLoopStr ) :] : ( ( ) ( )
set )
-defined G : ( ( ) ( )
doubleLoopStr )
-valued Function-like V25(
[:G : ( ( ) ( ) doubleLoopStr ) ,G : ( ( ) ( ) doubleLoopStr ) :] : ( ( ) ( )
set ) ,
G : ( ( ) ( )
doubleLoopStr ) ) )
Element of
bool [:[:G : ( ( ) ( ) doubleLoopStr ) ,G : ( ( ) ( ) doubleLoopStr ) :] : ( ( ) ( ) set ) ,G : ( ( ) ( ) doubleLoopStr ) :] : ( ( ) ( )
set ) : ( ( ) ( non
empty )
set ) ) : ( ( ) ( )
Element of
bool the
carrier of
G : ( ( ) ( )
doubleLoopStr ) : ( ( ) ( )
set ) : ( ( ) ( non
empty )
set ) ) );
end;