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
fa in UsedInt*Loc 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
fa in UsedInt*Loc 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
fa in UsedInt*Loc p
let a be Int-Location ; :: thesis: ( ic in rng p & ( ic = a :=len fa or ic = fa :=<0,...,0> a ) implies fa in UsedInt*Loc p )
assume A1: ( ic in rng p & ( ic = a :=len fa or ic = fa :=<0,...,0> a ) ) ; :: thesis: fa in UsedInt*Loc p
then A2: UsedInt*Loc ic = {fa} by SF_MASTR:38;
UsedInt*Loc ic c= UsedInt*Loc p by A1, SF_MASTR:39;
hence fa in UsedInt*Loc p by A2, ZFMISC_1:37; :: thesis: verum