Input := sol = DSolve[{eqDe,OilSize[0] == 1.047},OilSize[t],t];
Input := OilSlick[t_] = OilSize[t]/.sol[[1]];