long long phi(long long x){    long long res=x,a=x,i;    for(i=2;i*i<=a;i++)    {        if(a%i==0)        {            res=res/i*(i-1);            while(a%i==0)                a=a/i;        }    }    if(a>1)            res=res/a*(a-1);    return res;}