s = DivisorSum[64, 2^(64/#) MoebiusMu[#] &, OddQ[#] &]/(2*64)