reserve S for with_non_trivial_Instructions COM-Struct;
reserve i,j,k for No-StopCode Instruction of S,
        I,J,K for MacroInstruction of S;
reserve i1,i2,i3,i4,i5,i6 for No-StopCode Instruction of S;
reserve I,J for non empty NAT-defined finite Function;
reserve I,J for MacroInstruction of S;

theorem Th27:
 for k being Nat st k < LastLoc I
  holds (CutLastLoc I).k = I.k
proof
 let k be Nat;
 assume k < LastLoc I;
  then
A1: k in dom CutLastLoc I by Th26;
 thus thesis by A1,GRFUNC_1:2;
end;
