:: deftheorem Def1 defines Carrier PCS_0:def 1 :
for I being non empty set
for C being 1-sorted-yielding ManySortedSet of I
for b3 being set holds
( b3 = Carrier C iff for i being Element of I holds b3 . i = the carrier of (C . i) );