:: deftheorem Def1 defines bool MBOOLEAN:def 1 :
for I being set
for A, b3 being ManySortedSet of I holds
( b3 = bool A iff for i being object st i in I holds
b3 . i = bool (A . i) );