reserve J,J1,K for Element of Segm 13,
  b,b1,b2,c,c1,c2 for Element of SCM+FSA-Data-Loc,
  f,f1,f2 for Element of SCM+FSA-Data*-Loc;
reserve k for Nat,
  J,K,L for Element of Segm 13,
  O,P,R for Element of Segm 9;
reserve da for Int-Location,
  fa for FinSeq-Location,
  x,y for set;

theorem
  for dl being Int-Location ex i being Nat st dl = intloc i
proof
  let dl be Int-Location;
  dl in SCM-Data-Loc by AMI_2:def 16;
  then reconsider D = dl as Data-Location;
  consider i being Nat such that
A1: D = dl.i by AMI_5:1;
  take i;
  thus thesis by A1;
end;
