let s be State of SCM+FSA ; :: thesis: for I being Program of SCM+FSA
for a being Int-Location
for l being Element of NAT holds (s +* (I +* (Start-At l,SCM+FSA ))) . a = s . a

let I be Program of SCM+FSA ; :: thesis: for a being Int-Location
for l being Element of NAT holds (s +* (I +* (Start-At l,SCM+FSA ))) . a = s . a

let a be Int-Location ; :: thesis: for l being Element of NAT holds (s +* (I +* (Start-At l,SCM+FSA ))) . a = s . a
let l be Element of NAT ; :: thesis: (s +* (I +* (Start-At l,SCM+FSA ))) . a = s . a
not a in dom (I +* (Start-At l,SCM+FSA )) by SCMFSA6B:12;
hence (s +* (I +* (Start-At l,SCM+FSA ))) . a = s . a by FUNCT_4:12; :: thesis: verum