let p be preProgram of SCM+FSA ; :: thesis: for ic being Instruction of SCM+FSA
for fa being FinSeq-Location
for a being Int-Location st ic in rng p & ( ic = a :=len fa or ic = fa :=<0,...,0> a ) holds
a in UsedIntLoc p
let ic be Instruction of SCM+FSA ; :: thesis: for fa being FinSeq-Location
for a being Int-Location st ic in rng p & ( ic = a :=len fa or ic = fa :=<0,...,0> a ) holds
a in UsedIntLoc p
let fa be FinSeq-Location ; :: thesis: for a being Int-Location st ic in rng p & ( ic = a :=len fa or ic = fa :=<0,...,0> a ) holds
a in UsedIntLoc p
let a be Int-Location ; :: thesis: ( ic in rng p & ( ic = a :=len fa or ic = fa :=<0,...,0> a ) implies a in UsedIntLoc p )
assume A1:
( ic in rng p & ( ic = a :=len fa or ic = fa :=<0,...,0> a ) )
; :: thesis: a in UsedIntLoc p
then A2:
UsedIntLoc ic = {a}
by SF_MASTR:22;
UsedIntLoc ic c= UsedIntLoc p
by A1, SF_MASTR:23;
hence
a in UsedIntLoc p
by A2, ZFMISC_1:37; :: thesis: verum