reserve a,b for object, I,J for set;

theorem Th11:
  1.finite-MultiSet_over I = EmptyBag I
  proof
    1.MultiSet_over I = I --> 0 = EmptyBag I by MONOID_1:26;
    hence thesis by MONOID_0:def 24;
  end;
