let s be SCM+FSA-State; :: thesis: for u, v being Element of NAT holds (SCM+FSA-Chg (s,u)) . v = s . v
let u, v be Element of NAT ; :: thesis: (SCM+FSA-Chg (s,u)) . v = s . v
{NAT} = dom (NAT .--> u) by FUNCOP_1:13;
then not v in dom (NAT .--> u) by TARSKI:def 1;
hence (SCM+FSA-Chg (s,u)) . v = s . v by FUNCT_4:11; :: thesis: verum