let s be SCM+FSA-State; :: thesis: for u being Nat holds (SCM+FSA-Chg (s,u)) . NAT = u
let u be Nat; :: thesis: (SCM+FSA-Chg (s,u)) . NAT = u
NAT in dom (NAT .--> u) by TARSKI:def 1;
hence (SCM+FSA-Chg (s,u)) . NAT = (NAT .--> u) . NAT by FUNCT_4:13
.= u by FUNCOP_1:72 ;
:: thesis: verum