:: deftheorem Def3 defines {| ALTCAT_1:def 3 :
for I being set
for G being ManySortedSet of [:I,I:]
for b3 being ManySortedSet of [:I,I,I:] holds
( b3 = {|G|} iff for i, j, k being object st i in I & j in I & k in I holds
b3 . (i,j,k) = G . (i,k) );