let s be SCM+FSA-State; :: thesis: for t being Element of SCM+FSA-Data*-Loc
for u being FinSequence of INT
for v being Element of NAT holds (SCM+FSA-Chg s,t,u) . v = s . v
let t be Element of SCM+FSA-Data*-Loc ; :: thesis: for u being FinSequence of INT
for v being Element of NAT holds (SCM+FSA-Chg s,t,u) . v = s . v
let u be FinSequence of INT ; :: thesis: for v being Element of NAT holds (SCM+FSA-Chg s,t,u) . v = s . v
let v be Element of NAT ; :: thesis: (SCM+FSA-Chg s,t,u) . v = s . v
A1: ( SCM+FSA-OK . v = SCM+FSA-Instr & SCM+FSA-OK . t = INT * ) by Th11, Th12;
{t} = dom (t .--> u) by FUNCOP_1:19;
then not v in dom (t .--> u) by A1, Th13, TARSKI:def 1;
hence (SCM+FSA-Chg s,t,u) . v = s . v by FUNCT_4:12; :: thesis: verum