reserve p,p1,p2,h for Instruction-Sequence of SCM+FSA;
reserve k, l, n for Nat,
  j for Integer,
  i,i1 for Instruction of SCM+FSA;

theorem Th6: :: GotoUsedF:
  UsedI*Loc Goto l = {}
proof
  Goto l =  Load goto l by SCMFSA8A:def 1;
  hence UsedI*Loc Goto l = UsedInt*Loc goto l by Th2
    .= {} by SF_MASTR:32;
end;
