Derivative[1][y][x] == (x - Log[y[x]])*y[x]