begin
begin
definition
let S be ( ( non
empty non
void ) ( non
empty non
void V55() )
ManySortedSign ) ;
let MSA be ( (
non-empty ) (
non-empty )
MSAlgebra over
S : ( ( non
empty non
void ) ( non
empty non
void V55() )
ManySortedSign ) ) ;
func Eval MSA -> ( ( ) ( non
empty Relation-like the
carrier of
S : ( ( ) ( )
set ) : ( ( ) ( )
set )
-defined Function-like total Function-yielding V41() )
ManySortedFunction of
S : ( ( ) ( )
set ) ,
S : ( ( ) ( )
set ) )
means
(
it : ( ( ) (
Relation-like S : ( ( ) ( )
set )
-defined S : ( ( ) ( )
set )
* : ( ( ) ( non
empty functional FinSequence-membered )
M8(
S : ( ( ) ( )
set ) ))
-valued )
Element of
bool [:S : ( ( ) ( ) set ) ,(S : ( ( ) ( ) set ) *) : ( ( ) ( non empty functional FinSequence-membered ) M8(S : ( ( ) ( ) set ) )) :] : ( ( ) (
Relation-like )
set ) : ( ( ) ( )
set ) )
is_homomorphism FreeEnv MSA : ( ( ) ( )
set ) : ( (
strict non-empty free ) (
strict non-empty free )
MSAlgebra over
S : ( ( ) ( )
set ) ) ,
MSA : ( ( ) ( )
set ) & ( for
s being ( ( ) ( )
SortSymbol of ( ( ) ( )
set ) )
for
x,
y being ( ( ) ( )
set ) st
y : ( ( ) ( )
set )
in FreeSort ( the
Sorts of
MSA : ( ( ) ( )
set ) : ( (
Relation-like the
carrier of
S : ( ( ) ( )
set ) : ( ( ) ( )
set )
-defined Function-like total ) (
Relation-like the
carrier of
S : ( ( ) ( )
set ) : ( ( ) ( )
set )
-defined Function-like total )
set ) ,
s : ( ( ) ( )
SortSymbol of ( ( ) ( non
empty )
set ) ) ) : ( ( ) (
functional constituted-DTrees )
Element of
bool (TS (DTConMSA the Sorts of MSA : ( ( ) ( ) set ) : ( ( Relation-like the carrier of S : ( ( ) ( ) set ) : ( ( ) ( ) set ) -defined Function-like total ) ( Relation-like the carrier of S : ( ( ) ( ) set ) : ( ( ) ( ) set ) -defined Function-like total ) set ) ) : ( ( ) ( ) DTConstrStr ) ) : ( ( ) (
functional constituted-DTrees )
Element of
bool (FinTrees the carrier of (DTConMSA the Sorts of MSA : ( ( ) ( ) set ) : ( ( Relation-like the carrier of S : ( ( ) ( ) set ) : ( ( ) ( ) set ) -defined Function-like total ) ( Relation-like the carrier of S : ( ( ) ( ) set ) : ( ( ) ( ) set ) -defined Function-like total ) set ) ) : ( ( ) ( ) DTConstrStr ) : ( ( ) ( ) set ) ) : ( ( ) ( non
empty functional constituted-DTrees )
DTree-set of the
carrier of
(DTConMSA the Sorts of MSA : ( ( ) ( ) set ) : ( ( Relation-like the carrier of S : ( ( ) ( ) set ) : ( ( ) ( ) set ) -defined Function-like total ) ( Relation-like the carrier of S : ( ( ) ( ) set ) : ( ( ) ( ) set ) -defined Function-like total ) set ) ) : ( ( ) ( )
DTConstrStr ) : ( ( ) ( )
set ) ) : ( ( ) ( )
set ) ) : ( ( ) ( )
set ) ) &
y : ( ( ) ( )
set )
= root-tree [x : ( ( ) ( ) set ) ,s : ( ( ) ( ) SortSymbol of ( ( ) ( non empty ) set ) ) ] : ( ( ) ( )
set ) : ( (
Relation-like Function-like DecoratedTree-like ) (
Relation-like Function-like finite countable DecoratedTree-like )
set ) &
x : ( ( ) ( )
set )
in the
Sorts of
MSA : ( ( ) ( )
set ) : ( (
Relation-like the
carrier of
S : ( ( ) ( )
set ) : ( ( ) ( )
set )
-defined Function-like total ) (
Relation-like the
carrier of
S : ( ( ) ( )
set ) : ( ( ) ( )
set )
-defined Function-like total )
set )
. s : ( ( ) ( )
SortSymbol of ( ( ) ( non
empty )
set ) ) : ( ( ) ( )
set ) holds
(it : ( ( ) ( Relation-like S : ( ( ) ( ) set ) -defined S : ( ( ) ( ) set ) * : ( ( ) ( non empty functional FinSequence-membered ) M8(S : ( ( ) ( ) set ) )) -valued ) Element of bool [:S : ( ( ) ( ) set ) ,(S : ( ( ) ( ) set ) *) : ( ( ) ( non empty functional FinSequence-membered ) M8(S : ( ( ) ( ) set ) )) :] : ( ( ) ( Relation-like ) set ) : ( ( ) ( ) set ) ) . s : ( ( ) ( ) SortSymbol of ( ( ) ( non empty ) set ) ) ) : ( (
Function-like V29( the
Sorts of
(FreeEnv MSA : ( ( ) ( ) set ) ) : ( (
strict non-empty free ) (
strict non-empty free )
MSAlgebra over
S : ( ( ) ( )
set ) ) : ( (
Relation-like the
carrier of
S : ( ( ) ( )
set ) : ( ( ) ( )
set )
-defined Function-like total ) (
Relation-like the
carrier of
S : ( ( ) ( )
set ) : ( ( ) ( )
set )
-defined Function-like total )
set )
. b1 : ( ( ) ( )
SortSymbol of ( ( ) ( non
empty )
set ) ) : ( ( ) ( )
set ) , the
Sorts of
MSA : ( ( ) ( )
set ) : ( (
Relation-like the
carrier of
S : ( ( ) ( )
set ) : ( ( ) ( )
set )
-defined Function-like total ) (
Relation-like the
carrier of
S : ( ( ) ( )
set ) : ( ( ) ( )
set )
-defined Function-like total )
set )
. b1 : ( ( ) ( )
SortSymbol of ( ( ) ( non
empty )
set ) ) : ( ( ) ( )
set ) ) ) (
Relation-like the
Sorts of
(FreeEnv MSA : ( ( ) ( ) set ) ) : ( (
strict non-empty free ) (
strict non-empty free )
MSAlgebra over
S : ( ( ) ( )
set ) ) : ( (
Relation-like the
carrier of
S : ( ( ) ( )
set ) : ( ( ) ( )
set )
-defined Function-like total ) (
Relation-like the
carrier of
S : ( ( ) ( )
set ) : ( ( ) ( )
set )
-defined Function-like total )
set )
. b1 : ( ( ) ( )
SortSymbol of ( ( ) ( non
empty )
set ) ) : ( ( ) ( )
set )
-defined the
Sorts of
MSA : ( ( ) ( )
set ) : ( (
Relation-like the
carrier of
S : ( ( ) ( )
set ) : ( ( ) ( )
set )
-defined Function-like total ) (
Relation-like the
carrier of
S : ( ( ) ( )
set ) : ( ( ) ( )
set )
-defined Function-like total )
set )
. b1 : ( ( ) ( )
SortSymbol of ( ( ) ( non
empty )
set ) ) : ( ( ) ( )
set )
-valued Function-like V29( the
Sorts of
(FreeEnv MSA : ( ( ) ( ) set ) ) : ( (
strict non-empty free ) (
strict non-empty free )
MSAlgebra over
S : ( ( ) ( )
set ) ) : ( (
Relation-like the
carrier of
S : ( ( ) ( )
set ) : ( ( ) ( )
set )
-defined Function-like total ) (
Relation-like the
carrier of
S : ( ( ) ( )
set ) : ( ( ) ( )
set )
-defined Function-like total )
set )
. b1 : ( ( ) ( )
SortSymbol of ( ( ) ( non
empty )
set ) ) : ( ( ) ( )
set ) , the
Sorts of
MSA : ( ( ) ( )
set ) : ( (
Relation-like the
carrier of
S : ( ( ) ( )
set ) : ( ( ) ( )
set )
-defined Function-like total ) (
Relation-like the
carrier of
S : ( ( ) ( )
set ) : ( ( ) ( )
set )
-defined Function-like total )
set )
. b1 : ( ( ) ( )
SortSymbol of ( ( ) ( non
empty )
set ) ) : ( ( ) ( )
set ) ) )
Element of
bool [:( the Sorts of (FreeEnv MSA : ( ( ) ( ) set ) ) : ( ( strict non-empty free ) ( strict non-empty free ) MSAlgebra over S : ( ( ) ( ) set ) ) : ( ( Relation-like the carrier of S : ( ( ) ( ) set ) : ( ( ) ( ) set ) -defined Function-like total ) ( Relation-like the carrier of S : ( ( ) ( ) set ) : ( ( ) ( ) set ) -defined Function-like total ) set ) . b1 : ( ( ) ( ) SortSymbol of ( ( ) ( non empty ) set ) ) ) : ( ( ) ( ) set ) ,( the Sorts of MSA : ( ( ) ( ) set ) : ( ( Relation-like the carrier of S : ( ( ) ( ) set ) : ( ( ) ( ) set ) -defined Function-like total ) ( Relation-like the carrier of S : ( ( ) ( ) set ) : ( ( ) ( ) set ) -defined Function-like total ) set ) . b1 : ( ( ) ( ) SortSymbol of ( ( ) ( non empty ) set ) ) ) : ( ( ) ( ) set ) :] : ( ( ) (
Relation-like )
set ) : ( ( ) ( )
set ) )
. y : ( ( ) ( )
set ) : ( ( ) ( )
set )
= x : ( ( ) ( )
set ) ) );
end;