Solve[e^(y) *(Cos[x] + Sin[x] *a) == 1,a]