:: deftheorem TRANS defines transl MSAFREE5:def 35 :
for S being non empty non void ManySortedSign
for X being non-empty ManySortedSet of the carrier of S
for s being SortSymbol of S
for x being Element of X . s
for C being context of x
for b₆ being Function of ( the Sorts of (Free (S,X)) . s),( the Sorts of (Free (S,X)) . (the_sort_of C)) holds
( b₆ = transl C iff for t being Element of (Free (S,X)) st the_sort_of t = s holds
b₆ . t = C -sub t );