let p be preProgram of SCM+FSA ; :: thesis: for ic being Instruction of SCM+FSA
for fa being FinSeq-Location
for b, a being Int-Location st ic in rng p & ( ic = b := fa,a or ic = fa,a := b ) holds
( a in UsedIntLoc p & b in UsedIntLoc p )

let ic be Instruction of SCM+FSA ; :: thesis: for fa being FinSeq-Location
for b, a being Int-Location st ic in rng p & ( ic = b := fa,a or ic = fa,a := b ) holds
( a in UsedIntLoc p & b in UsedIntLoc p )

let fa be FinSeq-Location ; :: thesis: for b, a being Int-Location st ic in rng p & ( ic = b := fa,a or ic = fa,a := b ) holds
( a in UsedIntLoc p & b in UsedIntLoc p )

let b, a be Int-Location ; :: thesis: ( ic in rng p & ( ic = b := fa,a or ic = fa,a := b ) implies ( a in UsedIntLoc p & b in UsedIntLoc p ) )
assume A1: ( ic in rng p & ( ic = b := fa,a or ic = fa,a := b ) ) ; :: thesis: ( a in UsedIntLoc p & b in UsedIntLoc p )
then A2: UsedIntLoc ic = {a,b} by SF_MASTR:21;
UsedIntLoc ic c= UsedIntLoc p by A1, SF_MASTR:23;
hence ( a in UsedIntLoc p & b in UsedIntLoc p ) by A2, ZFMISC_1:38; :: thesis: verum