DSolve[Cos[y[x]]*(1 - x*Cos[y[x]]) + x*Log[x]*Sin[y[x]]*Derivative[1][y][x] == 0,y[x],x]