:: deftheorem PART defines partition BAGORD_2:def 8 :
for I being set
for b being bag of I
for b3 being Bags b1 -valued FinSequence holds
( b3 is partition of b iff b = Sum b3 );