theorem
 IC S in dom p implies  p = Start-At(IC p,S) +* DataPart p by Th19;
