Piecewise[{{D[1 - E^(-y), y], y >= 0}}, 0]