Plot[{cos[x], x}, {x, -1.0, 1.0}]