:: deftheorem SqDef defines SqFactors MOEBIUS2:def 3 :
for n being non zero Nat
for b2 being ManySortedSet of SetPrimes holds
( b2 = SqFactors n iff ( support b2 = support (pfexp n) & ( for p being Nat st p in support (pfexp n) holds
b2 . p = p |^ ((p |-count n) div 2) ) ) );