- Now we determine the times at which our OilSlick[t] function is at the IO(t + 10) times.

Input := 

timeL = Table[t/.FindRoot[IL[[i]]== OilSlick[t],
		{t,300}][[1]], {i,1, Length[IO]}];
General::spell1: 
   Possible spelling error: new symbol name "timeL"
     is similar to existing symbol "time".