:: deftheorem BDef defines Bnumber_of_divisors NUMBER18:def 1 :
for n being Nat
for b2 being ManySortedSet of SetPrimes holds
( b2 = Bnumber_of_divisors n iff ( support b2 = support (pfexp n) & ( for p being Nat st p in support (pfexp n) holds
b2 . p = (p |-count n) + 1 ) ) );