DSolve[Derivative[1][y][x] == -((y[x]*(-Log[y[x]]^2/(2*x) - _F1[x]))/Log[y[x]]),y[x],x]