:: deftheorem Def15 defines FreeGen MSAFREE:def 15 :
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 b4 being Subset of ((FreeSort X) . s) holds
( b4 = FreeGen (s,X) iff for x being set holds
( x in b4 iff ex a being set st
( a in X . s & x = root-tree [a,s] ) ) );