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