reserve n,i,j,k for Nat;
reserve T for TuringStr,
  s for All-State of T;

theorem Th19:
  for T being TuringStr, t be Tape of T, s,n1,n2 be Element of NAT
st t storeData <*s,n1,n2 *> holds t.s=0 & t.(s+n1+2)=0 & t.(s+n1+n2+4)=0 & (for
i be Integer st s < i & i < s+n1+2 holds t.i=1) & for i be Integer st s+n1+2 <
  i & i < s+n1+n2+4 holds t.i=1
proof
  let T be TuringStr, t be Tape of T, s,n1,n2 be Element of NAT;
  assume t storeData <*s,n1,n2 *>;
  then
A1: t is_1_between s,s+n1+2 & t is_1_between s+n1+2,s+n1+n2+4 by Th18;
  hence t.s=0 & t.(s+n1+2)=0 & t.(s+n1+n2+4)=0;
  thus thesis by A1;
end;
