Solve[x == Cot[x],x]