let s be SCM+FSA-State; :: thesis: for t being Element of SCM+FSA-Data*-Loc
for u being FinSequence of INT holds (SCM+FSA-Chg (s,t,u)) . t = u

let t be Element of SCM+FSA-Data*-Loc ; :: thesis: for u being FinSequence of INT holds (SCM+FSA-Chg (s,t,u)) . t = u
let u be FinSequence of INT ; :: thesis: (SCM+FSA-Chg (s,t,u)) . t = u
t in dom (t .--> u) by TARSKI:def 1;
hence (SCM+FSA-Chg (s,t,u)) . t = (t .--> u) . t by FUNCT_4:13
.= u by FUNCOP_1:72 ;
:: thesis: verum