ll getPhi(ll n){ ll res = n; for(ll i = 2;i*i<=n;i++){ if(n % i == 0) res = res / i * (i - 1); while(n % i == 0) n /= i; } if(n > 1) res = res / n * (n - 1); return res; }
ll N;
intmain(){ scanf("%lld",&N); ll res = 0; ll i = 1; for(;i*i<N;i++){ if(N % i == 0) res += i * getPhi(N / i) + (N / i) * getPhi(i); } if(i * i == N) res += i * getPhi(i); printf("%ll\n",res); return0; }