kill(all);

left:integrate(1/tan(v),v);

left;

rite:integrate(1/x,x);

left=rite+C;

soln: substitute(y/x,v,left=rite+C);

g(x):=%e^lhs(soln)=%e^rhs(soln)$g(x);

asin(lhs(g(x)))=asin(rhs(g(x)));

cSoln:first(solve(g(x),C));

ySoln:first(solve(g(x),y));

ySoln;