:: deftheorem Def13 defines Carrier PRALG_1:def 14 :
for A being 1-sorted-yielding Function
for b2 being Function holds
( b2 = Carrier A iff ( dom b2 = dom A & ( for j being set st j in dom A holds
ex R being 1-sorted st
( R = A . j & b2 . j = the carrier of R ) ) ) );