:: deftheorem defines Partial_Product CARDFIL3:def 7 :
for I being non empty set
for L being commutative TopGroup
for x being the carrier of b2 -valued ManySortedSet of I
for b4 being Function of ([#] (OrderedFIN I)), the carrier of L holds
( b4 = Partial_Product x iff for j being Element of Fin I holds b4 . j = Product (x,j) );